مطلوب كود لمحترفين

[GOKAR]

السلام عليكم

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

؟

GUIEditor = { 
    gridlist = {}, 
    button = {}, 
    label = {}, 
    window = {}, 
} 
GUIEditor.window[1] = guiCreateWindow(176, 57, 437, 422, "لوحة حفظ الاماكن", false) 
guiWindowSetSizable(GUIEditor.window[1], false) 
guiSetAlpha(GUIEditor.window[1], 1.00) 
guiSetProperty(GUIEditor.window[1], "CaptionColour", "FF17E74D") 
  
GUIEditor.gridlist[2] = guiCreateGridList(10, 169, 179, 244, false, GUIEditor.window[1]) 
guiGridListAddColumn(GUIEditor.gridlist[2], "ألأمأكن ألمحفوظةة_#", 0.9) 
GUIEditor.button[2] = guiCreateButton(327, 361, 101, 52, "X", false, GUIEditor.window[1]) 
guiSetFont(GUIEditor.button[2], "sa-header") 
guiSetProperty(GUIEditor.button[2], "NormalTextColour", "FF007DFD") 
GUIEditor.button[3] = guiCreateButton(9, 25, 190, 58, "حذف المكان المحدد", false, GUIEditor.window[1]) 
guiSetFont(GUIEditor.button[3], "default-bold-small") 
guiSetProperty(GUIEditor.button[3], "NormalTextColour", "FFFB0000") 
GUIEditor.button[4] = guiCreateButton(246, 25, 181, 58, "حفظ المكان", false, GUIEditor.window[1]) 
guiSetFont(GUIEditor.button[4], "default-bold-small") 
guiSetProperty(GUIEditor.button[4], "NormalTextColour", "FF00FACE") 
GUIEditor.button[5] = guiCreateButton(116, 101, 181, 58, "الانتقال الى المكان", false, GUIEditor.window[1]) 
guiSetFont(GUIEditor.button[5], "default-bold-small") 
guiSetProperty(GUIEditor.button[5], "NormalTextColour", "FF6500FC") 
GUIEditor.label[1] = guiCreateLabel(199, 176, 227, 25, "لوحة حفظ ألأمأكن ألمطورة", false, GUIEditor.window[1]) 
guiSetFont(GUIEditor.label[1], "default-bold-small") 
GUIEditor.label[2] = guiCreateLabel(200, 226, 227, 25, "By SiR,GoKa[R]", false, GUIEditor.window[1]) 
guiSetFont(GUIEditor.label[2], "default-bold-small") 

ولو تقدرو تبرمجوها لي بكون افضل

[iPrestege]

تقدر تستعمل الـ SQL

او

XML

لكن ال SQL

افضل بقاعدة بيانات بدون ملفات ..الخ لكن يبيلها واحد فاهم فيها اما واحد يبرمجها لك هذي اللي ماضنيتها

[Anis]

ماحد راح يبرمجها اعتمد على نفسك

+

شوف الموضوع ءا

https://forum.multitheftauto.com/viewtopic.php?f=160&t=100292

+

شوف المود ذا مو مشفر تعلم منوا

https://forum.multitheftauto.com/viewtopic.php?f=161&t=99518

+

درس قاعدوة بيانات

https://forum.multitheftauto.com/viewtopic.php?f=164&t=99321

[GOKAR]

اوكي شباب شكرا الكم انا راح اشوف واردلكم خبر

[iPrestege]

مثال تسوي نظام حفظ الاحداثيات بـ SQL ( Serial ) ..

اول شيء نسوية نظيفة للقاعدة نسوي جدول بالقاعدة registry.db

لانه الفنكشن حق SQL

يستخدم قاعدهـ ( registry ) ..

اول شيء نسوي جدول داخل قاعدة :

addEventHandler('onResourceStart',resourceRoot, 
    function (      ) 
        local CreateNewTable = executeSQLQuery ('CREATE TABLE IF NOT EXISTS  `Save Position System` ( PlayerSerial,PlayerX,PlayerY,PlayerZ ) ') 
            if ( CreateNewTable ) then 
                outputDebugString('Create [ Save Position System ] Table done .') 
        end 
    end 
) 

اللي سويتة انا :

executeSQLQuery ('CREATE TABLE IF NOT EXISTS  `Save Position System` ( PlayerSerial,PlayerX,PlayerY,PlayerZ ) ') 

بس سويت متغير او مسمى للتيبل اللي بيتخزن بقاعدتنا الاولى و سويت الكولومن اللي احتاجهم على حسب اللي تسوية انا سويت هذولا :

PlayerSerial = بخزنة عالسريال

PlayerX = احداثي X

PlayerY = احداثي Y

PlayerZ = احداثي Z

وسميت الجدول حق القاعدة :

Save Position System = نظام حفظ الاحداثيات

الحين سوينا القاعدة عشان بـ استخدم :

executeSQLQuery ( 'CREATE TABLE IF NOT EXISTS MyTable or `MY TABLE` or 'My Table' ( column,... )' ) 

الحين ودكـ تخزن الاشياء صح ؟ انا بخزنها يوم يطلع الاعب من الروم . . :

addEventHandler('onPlayerQuit',root, 
    function (  ) 
    local x,y,z = getElementPosition ( source ) 
    local Results = executeSQLQuery("SELECT * FROM `Save Position System` WHERE PlayerSerial=?",getPlayerSerial ( source ) ) 
     if ( type ( Results ) == "table" and #Results == 0 or not Results ) then 
        executeSQLQuery ( "INSERT INTO `Save Position System` ( PlayerSerial,PlayerX,PlayerY,PlayerZ ) VALUES(?,?,?,?)",getPlayerSerial ( source ),x,y,z ) 
    else 
        executeSQLQuery('UPDATE `Save Position System` SET PlayerX =?, PlayerY =?, PlayerZ =? WHERE PlayerSerial =?',x,y,z,getPlayerSerial ( source ) ) 
    end 
end 
) 

الاشياء و الوظائف الثانية معروفة .. بس بوضح لك الـ ( SQL ) :

اول شيء نجيب النتائج عشان قبل لانخزن نتحقق اذا فية شيء مخزن نسوي لة تحديث مانخزن من جديد ~ :

local Results = executeSQLQuery("SELECT * FROM `Save Position System` WHERE PlayerSerial=?",getPlayerSerial ( source ) ) 

و الـ

Results يعتبر جدول لانة جدول اصلا .. الحين جبنا نتائج نتحقق :

if ( type ( Results ) == "table" and #Results == 0 or not Results ) then 
  

اذا ماكان فية شيء مخزن او او او التيبل = 0 نسوي ادخال للبيانات على سريال الاعب بالترتيب من الـ

Column اللي مسوية !

executeSQLQuery ( "INSERT INTO `Save Position System` ( PlayerSerial,PlayerX,PlayerY,PlayerZ ) VALUES(?,?,?,?)",getPlayerSerial ( source ),x,y,z ) 

اذا اول مرة تسوية ولا اذا كان مخزن تسوي تحديث بس ~ طبعا واضحة الاشياء من قبل

PlayerSerial = بخزنة عالسريال

PlayerX = احداثي X

PlayerY = احداثي Y

PlayerZ = احداثي Z

و اسم التيبل حق القاعدة واضح ~

و الـ

VALUES ( ?,?,? )

تكون على حسب اللي انت تحتاجها اصلا .. امم الحين نفرض انة مخزن من قبل ! ومسوي ادخال للبيانات وحصلها بالقاعدة وش المفترض تخزن ثانية ؟ لآ ~ : نسوي تحديث للبيانات :

executeSQLQuery('UPDATE `Save Position System` SET PlayerX =?, PlayerY =?, PlayerZ =? WHERE PlayerSerial =?',x,y,z,getPlayerSerial ( source ) ) 

SET = ? Wiki

WHERE = ? Wiki

UPDATE = ? Wiki

انت تحدث على مين ؟ على سريال الاعب

WHERE PlayerSerial =? -- التحديث بيكون عالسريال الخاص بالاعب #

الحين حفظنآ يوم خرج الاعب بنحمل البيانات يوم يسجل دخولة الاعب :

addEventHandler('onPlayerLogin',root, 
    function (  ) 
        local Results = executeSQLQuery("SELECT * FROM `Save Position System` WHERE PlayerSerial=?",getPlayerSerial ( source ) ) 
        if ( type ( Results ) == "table" and #Results == 0 or not Results ) then return end 
            setTimer( setElementPosition,2000,1,source,Results[1]['PlayerX'],Results[1]['PlayerY'],Results[1]['PlayerZ'] ) 
    end 
) 

انت اللي عليك بس تبي تجيب بيانات من اللي مخزنة ؟ بيانات السريال ! صح ؟ زين سويناها :

local Results = executeSQLQuery("SELECT * FROM `Save Position System` WHERE PlayerSerial=?",getPlayerSerial ( source ) ) 

مع اسم التيبل حق القاعدة بـ التأكيد .. الحين نتحقق فية بيانات عندي ولالا ؟ :

if ( type ( Results ) == "table" and #Results == 0 or not Results ) then return end 

اذا مافية خلاص مايسوي شيء ويكنسل ..

اذا فية بيكمل وبيسوي لك setElementPosition :

setTimer( setElementPosition,2000,1,source,Results[1]['PlayerX'],Results[1]['PlayerY'],Results[1]['PlayerZ'] ) 

Results[1]['PlayerX'],Results[1]['PlayerY'],Results[1]['PlayerZ'] = ?

هذي من وين جبتها ؟ هذي الاشياء اللي انت سويتها

Column

فية طريقة ثانية استخرج فيها اطول شوي شوف :

for _,v in ipairs ( Results ) do 
       setElementPosition ( source,v.PlayerX,v.PlayerY,v.PlayerZ ) 
end 

و بكذآ سوينا نظام حفظ للاحداثيات عن طريق : SQL

أتمنى وصلتكـ المعلومة بكل وضوح وهذا السكربت بشكل كامل يطلع :

addEventHandler('onResourceStart',resourceRoot, 
    function (      ) 
        local CreateNewTable = executeSQLQuery ('CREATE TABLE IF NOT EXISTS  `Save Position System` ( PlayerSerial,PlayerX,PlayerY,PlayerZ ) ') 
            if ( CreateNewTable ) then 
                outputDebugString('Create [ Save Position System ] Table done .') 
        end 
    end 
) 
  
addEventHandler('onPlayerQuit',root, 
    function (  ) 
    local x,y,z = getElementPosition ( source ) 
    local Results = executeSQLQuery("SELECT * FROM `Save Position System` WHERE PlayerSerial=?",getPlayerSerial ( source ) ) 
     if ( type ( Results ) == "table" and #Results == 0 or not Results ) then 
        executeSQLQuery ( "INSERT INTO `Save Position System` ( PlayerSerial,PlayerX,PlayerY,PlayerZ ) VALUES(?,?,?,?)",getPlayerSerial ( source ),x,y,z ) 
    else 
        executeSQLQuery('UPDATE `Save Position System` SET PlayerX =?, PlayerY =?, PlayerZ =? WHERE PlayerSerial =?',x,y,z,getPlayerSerial ( source ) ) 
    end 
end 
) 
  
addEventHandler('onPlayerLogin',root, 
    function (  ) 
        local Results = executeSQLQuery("SELECT * FROM `Save Position System` WHERE PlayerSerial=?",getPlayerSerial ( source ) ) 
        if ( type ( Results ) == "table" and #Results == 0 or not Results ) then return end 
            setTimer( setElementPosition,2000,1,source,Results[1]['PlayerX'],Results[1]['PlayerY'],Results[1]['PlayerZ'] ) 
    end 
) 

بـ التوفيق .. اي شيء تفضل أسأل عنة ..

هذا من موضوع رديت علية عام 2013

تقريباً نفس اللي تبي تسوية اتمنى يفيدك .

[Anis]

طويل شوى

[s7BaT]

تقدر تستعمل الـ SQL

او

XML

لكن ال SQL

افضل بقاعدة بيانات بدون ملفات ..الخ لكن يبيلها واحد فاهم فيها اما واحد يبرمجها لك هذي اللي مارضنيتها

يقولك برستيج ماحبها منك منوب منوب

[Mr.CoR]

الرجاء تعديل عنوان موضوعك وتوضيحه

وتعلم كيف تكتب عنوان من هذا الموضوع

https://forum.multitheftauto.com/viewtopic.php?f=160&t=100292

الرجاء احترام القسم وعدم تشويه منظره !!!!!