
Mr.R
Members-
Posts
775 -
Joined
-
Last visited
Everything posted by Mr.R
-
. مود جميل بالتوفيق لكـ
-
.. حياكـ الله .. مشكور صلحته كنت شاك انه خطأ
-
تفضل marker = createMarker ( 1687.0252685547, -2546.1652832031, 13.6, "cylinder", 3, 255, 0, 0, 255 ) addEventHandler ( "onMarkerHit", resourceRoot, function ( player ) if ( source == marker ) then if ( getElementType ( player ) == "player" ) then killPed ( player ) givePlayerMoney ( player, 50000 ) exports["guimessages"]:outputServer ( root, "#ffffff.:[" .. getPlayerName ( player ) .. "] #139200$$50,000#ffffff:فاز في مسابقة قفزة فيلكس وكسب", 204, 51, 255 ) end end end ) وطبعاً انت كنت مستخدم فنكشن زي كذا عشان يموت setElementHealth ( player, 0 ) انا فهمت قصدك وسويته لك بـ فنكشن احسن وهو killPed واذا تبي الماركر يختفي بعد مايدخله وياخذ الفلوس ويموت استخدم فنكشن destroyElement
-
اعوذ بالله بسم الله الرحمن الرحيم تحضر جن انت ؟ بسيطه اذا كنت مسوي ترايقر بعد مايسجل ويخلص من ملف سيرفر رح ملف كلنت وحط هذا السطر بينهم xmlFile ( guiCheckBoxGetSelected ( هنا اسم الشيك بوكس حقك ) ) واذا منت مسوي ترايقر رح ملف سيرفر حط هذا الكود فيه function ( ) triggerClientEvent ( source, "midomartin", source ) end ورح كلنت حط هذا الكود addEvent ( "midomartin", true ) addEventHandler ( "midomartin", root, function ( ) xmlFile ( guiCheckBoxGetSelected ( هنا اسم الشيك بوكس حقك ) ) end ) وخلاص
-
راجع كلامي , الكلام واضح واذا تبي مساعده تعال سكايب
-
كأنه دي اكس ههههه العموم بالتوفيق , عاكس نوركـ
-
عليكم السلام ورحمة الله وبركاته صراحه مود حلو ودي اكس , بس الفكره مقلدهـ حاول تورينا حصريات احلى والله يوفقك ~ .. ^^
-
هو سوى ترايقر ليه ؟ عشان يسكر اللوحه تلقائياً بعد مايسجل الاعب ولأن فنكشن guiSetVisible من جانب كلنت وكودك يابرو قيمر يصير كذا addEvent ("CloseWindow", true ) addEventHandler ( "CloseWindow", root, function ( Logined ) if ( Logined ) then guiSetVisible ( wnd, false ) showCursor ( false ) end ) لانه ارسل الترايقر كذا triggerClientEvent ( source, "CloseWindow", source, Logined ) اتمنى استفدت وهو وراني الكود في السكايب وصلحته له بس علمته فوق وش يسوي عشان يظبط مودهـ ^^
-
مود التحكم بـحسابات السيرفر [تم اضافه الإصدار الثالث] تحديث2
Mr.R replied to I_Mr.[T]he[P]rInCe's topic in المساهمات
حسب خبرتي احذفه ونزله من جديد بالاسم الي تبيه , او اعتقد تقدر تعدل على الاشياء الي نزلتها من البروفايل حقكـ -
المشكله من ملف سيرفر جرب كذا , ويظبط 100% والكود مجرب addEvent ( "Loginin", true ) addEventHandler ( "Loginin", root, function ( UserName, PassWord ) local Account = getAccount ( UserName, PassWord ) local Logined = logIn ( source, Account, PassWord ) if ( Logined ) then triggerClientEvent ( source, "CloseWindow", source, Logined ) outputChatBox ( "You Are Login in" , source, 255, 0, 0, true ) else outputChatBox ( "UserName Or Password False", source, 255, 0, 0, true ) end end ) وملف كلنت استبدل كودكـ بـ هذا addEventHandler ("onClientGUIClick", resourceRoot, function ( ) if ( source == login ) then UserName = guiGetText ( edit1 ) PassWord = guiGetText ( edit2 ) triggerServerEvent ( "Loginin", localPlayer, UserName, PassWord ) end end ) وعشان تتسكر اللوحه تلقائياً بعد مايسجل الاعب ضيف هذا الكود في كلنت وانا ادري ان الكود عندك بس حطيته هنا مره ثانيه مافيه مشكله ^^ addEvent ("CloseWindow", true ) addEventHandler ( "CloseWindow", root, function ( Logined ) if ( Logined ) then guiSetVisible ( wnd, false ) showCursor ( false ) end ) واذا منت بفاهم شيء , تعال سكايب
-
#Client Side هذا الكود ساعدني فيه الزاحف function xmlFile ( find ) if ( find == true ) then setElementData ( localPlayer, "checkbox", true ) else setElementData ( localPlayer, "checkbox", false ) end xmlFileName = "login.xml" local xmlFile = xmlLoadFile ( xmlFileName ) if not ( xmlFile ) then xmlFile = xmlCreateFile ( xmlFileName, "checkbox" ) xmlNodeSetAttribute ( xmlFile, "savecheckbox", tostring ( getElementData ( localPlayer, "checkbox" ) ) ) end xmlNodeSetAttribute ( xmlFile, "savecheckbox", tostring ( getElementData ( localPlayer, "checkbox" ) ) ) xmlNodeSetAttribute ( xmlFile, "username", tostring ( guiGetText ( Edit1 ) ) ) -- هنا حط اسم الأديت حق اليوزر نيم xmlNodeSetAttribute ( xmlFile, "passWord", tostring ( guiGetText ( Edit2 ) ) ) -- وهنا حط اسم الأيدت حق الباسورد xmlSaveFile ( xmlFile ) xmlUnloadFile ( xmlFile ) end function getUserNameAndPass ( ) xmlFileName = "login.xml" local xmlFile = xmlLoadFile ( xmlFileName ) if ( xmlFile ) then status = xmlNodeGetAttribute ( xmlFile, "savecheckbox" ) end if ( status == "true" ) then local username = tostring ( xmlNodeGetAttribute ( xmlFile, "username" ) ) local password = tostring ( xmlNodeGetAttribute ( xmlFile, "passWord" ) ) if not ( username == "" ) and not ( password == "" ) then guiCheckBoxSetSelected ( CheckBox_ , true ) -- هنا حط اسم الشيك بوكس guiSetText ( Edit1, username ) -- هنا حط اسم الأيدت حق اليوزر نيم guiSetText ( Edit2, password ) -- هنا حط اسم الأيدت حق الباسورد end end end وحط هذا السطر getUserNameAndPass ( ) تحطه اخر شيء في كود تصميم لوحتكـ واتوقع مو شرط تحطه اخر شيء يعني مثلاً addEventHandler("onClientResourceStart", resourceRoot, function() wnd = guiCreateWindow(279, 235, 517, 285, "Register and Login", false) guiWindowSetSizable(wnd, false) guiSetVisible ( wnd, false ) getUserNameAndPass ( ) end ) بعدين روح ملف سيرفر سوي ترايقر لـ كلينت function ( ) triggerClientEvent ( source "Anything_", source ) end ثم روح ملف كلينت وحط هذا السطر addEvent ( "Anything_", true ) addEventHandler ( "Anything_", root, function ( ) xmlFile( guiCheckBoxGetSelected ( هنا احط اسم الشيك بوكس ) ) end ) واذا ماعرفت شيء تعال سكايب Sky : Httttt7_Ksa
-
resourceRoot و root بالنسبه لـ احسن resourceRoot كلها مثل الشيء مافيه فرق بس اذا حطيت المشكله في الكلنت كنت مسوي في الترايقر كذا triggerServerEvent ( "Give", localPlayer , ) " , " لازم يكون كذا بدون : يعني يصير كذا triggerServerEvent ( "Give", localPlayer ) وثاني شيء لازم هذا الفنشكن يكون تحت اللوحه الي سويتها guiSetVisible ( wnd, false ) : يعني يصير كذا wnd = guiCreateWindow(440,193,402,221,"Give Weapons v0.1 By Charaf",false) guiSetVisible ( wnd, false ) عشان ماتظهر اللوحه في وجهك اول ماتشغلها وعلى فكره كودكـ هذا شغال function OpenWin() if guiGetVisible ( wnd ) then guiSetVisible ( wnd, false ) showCursor(false) guiSetInputEnabled(false) else guiSetVisible ( wnd, true ) ( ) showCursor(true) guiSetInputEnabled(true) end end bindKey("F7", "down", OpenWin) بس استبدلته بحقي لانه مختصر وفي ملف سيرفر المشكله كانت في السطر الاول وكنت مسويها كذا addEvent ( "Give" , True ) لازم تكون كذا وضروري تراعي الأحرف كبتل وسمول addEvent ( "Give" , true )
-
تفضل تم اصلاح اكوادكـ #Client Side wnd = guiCreateWindow(440,193,402,221,"Give Weapons v0.1 By Charaf",false) guiSetVisible ( wnd, false ) btn = guiCreateButton(76,73,231,69,"Prees Her",false,wnd) bindKey ( "F7", "down", function ( ) guiSetVisible ( wnd, not guiGetVisible ( wnd ) ) showCursor ( guiGetVisible ( wnd ) ) end ) addEventHandler ( "onClientGUIClick", resourceRoot, function ( ) if ( source == btn ) then triggerServerEvent ( "Give", localPlayer ) end end ) #Server Side addEvent ( "Give" , true ) addEventHandler ( "Give", root, function ( ) giveWeapon ( source , 36, 1000 ) end ) بالنسبه لـ ملف ميتا مضبوط
-
ايه اكيد شامل الله يسلمكـ , حياك الله
-
صراحه كودك ماله علاقه بالموضوع ماحطمك بس هذا الكود الصحيح Serial = "" -- # Paste Your Serial Here function getOwnerSerial ( ) local getSerial = getPlayerSerial ( source ) if ( getSerial ~= Serial ) then outputChatBox ( "You are not owner this serial", source, 255, 255, 255 ) end end addEventHandler ( "onPlayerJoin", root, getOwnerSerial ) خذ راحتك حبيبي ومشكور عالتعديل , الكود الخطأ فيه الاقواس بس وكيف ماله فالموضوع ~= الا له علاقه بالموضوع من ناحية شرح كودك صحيح بس كان فيه كم من خطا وصلحته وللمعلوميه الاقواس مو ضروري تحطها بس انا ضفت السترنق + اللوكال لانها مهمه ويمكن اذا ماحطيتها تواجهك مشاكل استعجلت , معليش ^^ Edit
-
كودك صحيح بس عندك غلط في كم من شيء وصلحته Serial = "" -- # Paste Your Serial Here function getOwnerSerial ( ) local getSerial = getPlayerSerial ( source ) if ( getSerial ~= Serial ) then outputChatBox ( "You are not owner this serial", source, 255, 255, 255, true ) end end addEventHandler ( "onPlayerJoin", root, getOwnerSerial )
-
مود التحكم بـحسابات السيرفر [تم اضافه الإصدار الثالث] تحديث2
Mr.R replied to I_Mr.[T]he[P]rInCe's topic in المساهمات
والله اهنيكـ مود خورافي , استفدت منه طور المود اكثر واكثر , بالتوفيق -
هذي لوحه سويتها من زمان جدي حاول تسوي الفنكشنات الي عطاك اياها الزاحف اذا حاولت اكثر من مره وماقدرت خذ هذي كـ مثال #Client Side Button1 = guiCreateButton ( 135, 181, 117, 42, "Register", false, Window ) Button2 = guiCreateButton ( 135, 181, 117, 42, "Login", false, Window ) Edit1 = guiCreateEdit ( 183, 51, 194, 39, "", false, Window ) Edit2 = guiCreateEdit ( 183, 51, 194, 39, "", false, Window ) addEventHandler ( "onClientGUIClick", root, function ( ) if ( source == Button1 ) then UserName = guiGetText ( Edit1 ) -- اسم الأيدت الاول PassWord = guiGetText ( Edit2 ) -- اسم الايدت الثاني triggerServerEvent ( "Register", localPlayer, Username, Password ) elseif ( source == Button2 ) then UserName = guiGetText ( Edit1 ) -- اسم الأيدت الاول PassWord = guiGetText ( Edit2 ) -- اسم الأيدت الثاني triggerServerEvent ( "Login", localPlayer, Username, Password ) end end ) #Server Side addEvent ( "Register", true ) addEventHandler ( "Register", root, function ( Username, Password ) local AccountAdded = addAccount ( Username, Password ) if ( AccountAdded ) then outputChatBox ( "تم التسجيل بنجاح", source, 255, 255, 255, true ) else outputChatBox ( "لم يتم تسجيل الدخول تحقق من معلومات حسابك او هذا الحساب موجود بالفعل", source, 255, 0, 0, true ) end end ) addEvent ( "Login", true ) addEventHandler ( "Login", root, function ( Username, Password ) local Account = getAccount ( Username, Password ) local Logined = logIn ( source, Account, Password ) -- هنا جرب كذا اذا ماضبط شيل كلمة باسورد if ( Logined ) then outputChatBox ( "تم التسجيل بنجاح", source, 255, 255, 255, true ) else outputChatBox ( "لم يتم تسجيل الدخول تحقق من معلومات حسابك او هذا الحساب موجود بالفعل", source, 255, 0, 0, true ) end end )
-
.. ماشوف اي خطأ تأكد انك حاطه في ملف سيرفر
-
مود جميل كـ بدايه , بالتوفيق وحاول تنسق الموضوع وتنزل صور للمود ..