Jump to content

iPrestege

Members
  • Posts

    10,056
  • Joined

  • Last visited

  • Days Won

    27

Everything posted by iPrestege

  1. OK Let him try please don't double post's .
  2. Not sure if you can disable it from acl but you can disable it using lua.
  3. --GENERAL local mainwindow = guiCreateWindow (0.25, 0.25, 0.50, 0.50, "Userpanel", true) guiSetVisible ( mainwindow,false ) local tabPanel = guiCreateTabPanel (0.00, 0.10, 1.00, 1.00, true, mainwindow) local info = guiCreateTab("Informations", tabPanel) local shop = guiCreateTab("Maps shop", tabPanel) local credits = guiCreateTab ("Credits", tabPanel) guiWindowSetMovable (mainwindow, false) guiWindowSetSizable (mainwindow, false) showCursor (true ) --INFO guiCreateLabel (0.05, 0.05, 0.90, 0.90, "My nickname: ".. tostring (getPlayerName (localPlayer)), true, info) guiCreateLabel (0.05, 0.25, 0.90, 0.90, "My ping: ".. tostring (getPlayerPing (localPlayer)), true, info) guiCreateLabel (0.05, 0.45, 0.90, 0.90, "My money: $".. tostring (getPlayerMoney (localPlayer)), true, info) guiCreateLabel (0.05, 0.65, 0.90, 0.90, "My team: ".. tostring (getPlayerTeam (localPlayer)), true, info) guiCreateLabel (0.05, 0.85, 0.90, 0.90, "My serial: ".. tostring (getPlayerSerial (localPlayer)), true, info) --SHOP, unfinished! guiCreateLabel (0.03, 0.03, 0.90, 0.90, "Which map would you like to play?", true, shop) guiCreateLabel (0.60, 0.07, 0.90, 0.90, "A map's price is:", true, shop) money = guiCreateLabel (0.80, 0.15, 0.90, 0.90, "5000$", true, shop) guiLabelSetColor ( money, 0, 140, 255) memo = guiCreateMemo (0.03, 0.10, 0.50, 0.85, "", true, shop) guiMemoSetReadOnly (memo, true) bindKey ( 'F1','down', function ( ) guiSetVisible ( mainwindow,not guiGetVisible ( mainwindow ) ) showCursor ( guiGetVisible ( mainwindow ) ) end ) It's a client side also use debug script if it's not working. P.S : Time to learn .
  4. No it's not right . Here's an example : local aTable = { [aMarker] = true, } addCommandHandler ('aMarkerColor', function ( ) for v in pairs ( aTable ) do setMarkerColor ( v,255,0,0,255 ) end end )
  5. -- # Server Side ~ addEventHandler('onResourceStart',resourceRoot, function ( ) for _,v in ipairs ( getElementsByType ( 'player' ) ) do bindKey ( v,'l','down',aLockHandler ) end end ) addEventHandler('onPlayerJoin',root, function ( ) bindKey ( source,'l','down',aLockHandler ) end ) function aLockHandler ( player ) if isElement ( player ) then if getPlayerOccupiedVehicle ( player ) then if not isVehicleLocked ( getPlayerOccupiedVehicle ( player ) ) then setVehicleLocked ( getPlayerOccupiedVehicle ( player ),true ) outputChatBox ( 'Vehicle Locked',player,0,255,0 ) else setVehicleLocked ( getPlayerOccupiedVehicle ( player ),false ) outputChatBox ( 'Vehicle UnLocked',player,255,0,0 ) end else outputChatBox ( 'You Must Be With a Vehicle',player,255,0,0 ) end end end
  6. function aUnLockHandler ( ) if isVehicleLocked ( source ) then setVehicleLocked ( source,false ) end end addEventHandler('onVehicleExit',root,aUnLockHandler) شل هالجزء وجرب
  7. لانة يوم ينزل اي لاعب من السيارة بدون مآينزل مع الباب بـ حدث ستارت ينفتح القفل
  8. الاكواد خطأ الكود سيرفر و الـ : bindKey : bindKey ( player thePlayer, string key, string keyState, function handlerFunction, [ var arguments, ... ] ) فـ الكود يصير كذآ : -- # Server Side ~ addEventHandler('onResourceStart',resourceRoot, function ( ) for _,v in ipairs ( getElementsByType ( 'player' ) ) do bindKey ( v,'l','down',aLockHandler ) end end ) addEventHandler('onPlayerJoin',root, function ( ) bindKey ( source,'l','down',aLockHandler ) end ) function aLockHandler ( player ) if isElement ( player ) then if getPlayerOccupiedVehicle ( player ) then if not isVehicleLocked ( getPlayerOccupiedVehicle ( player ) ) then setVehicleLocked ( getPlayerOccupiedVehicle ( player ),true ) outputChatBox ( 'Vehicle Locked',player,0,255,0 ) else setVehicleLocked ( getPlayerOccupiedVehicle ( player ),false ) outputChatBox ( 'Vehicle UnLocked',player,255,0,0 ) end else outputChatBox ( 'You Must Be With a Vehicle',player,255,0,0 ) end end end function aUnLockHandler ( ) if isVehicleLocked ( source ) then setVehicleLocked ( source,false ) end end addEventHandler('onVehicleExit',root,aUnLockHandler) .. عموما لم يتم التجربة المفترض يشتغل بـ اذن الله ..
  9. What you mean by script start you mean the window or what. Please use lua \ lua .
  10. I remember I saw one in the community.Deleted now reported by some one. I want to test the game mode how i can?
  11. addEventHandler('onResourceStart', getResourceRootElement(getThisResource()), function( ) PrestegeDB = dbConnect( "sqlite", ":aResource/PrestegeDB.db" ) for k, v in pairs( getElementsByType( "player" ) ) do local Name = getPlayerName(v) local Serial = getPlayerSerial(v) local result = dbQuery( PrestegeDB, "SELECT * FROM Seriallist WHERE serial=?", Serial) local result_ = dbPoll( result, -1 ) if ( type ( result_ ) == "table" and #result_ == 0 ) or not result_ then outputChatBox(' INSERT ', root, 255, 0, 0) dbExec( PrestegeDB, 'INSERT INTO Seriallist(serial, Name) VALUES( ?, ? )', Serial, Name) else outputChatBox(' UPDATE ', root, 255, 0, 0) dbExec( PrestegeDB, 'UPDATE Seriallist SET Name =? WHERE serial =?', Name, Serial) end end end ) addEventHandler('onResourceStop', getResourceRootElement(getThisResource()), function( ) destroyElement(PrestegeDB) end )
  12. مافهمت ووين احط احداثيات الوحه ! x,y,width,height
  13. الحمد لله تواصلنآ مع الدعم و هالكلام ي هيمو قبل كم شهر الخوادم صار عليها حماية اللي مآهو مصدق يتواصل مع الاستضافة نفسها ( = ذذ طيب كويس بس الدعم ع الخوادم يعني الي يشوف معلومات الروم اف تي بي وكذا عرب؟ + مافيه روم على الاستضافه زواره فوق 100؟ اذا فيه عطنا هو نشوف مافية دعم عربي غيري و الوصول للازم اذن من اداري اكبر .. يعني مآيمديك تدخل الملفات بس يمديك تسوي ريسيت للروم ..الخ يمديك تسوي استعادة للباس يعني فية طريقة للوصول بس مرآقبة من قبل نآس آكبر منك .. آذآ فية ان شاء الله آطرحة
  14. dbConnect -- يتصل dbExec -- ادخل - تحديث dbQuery -- استخراج نتائج dbPoll -- استخراج مع اللي قبله فوق اجباري dbFree -- او هذا مع dbQuery
  15. مثال تسوي نظام حفظ الاحداثيات بـ 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 ) بـ التوفيق .. اي شيء تفضل أسأل عنة ..
×
×
  • Create New...