nxFairlywell

ممكن تسوي شرح os.execute os -- وتشرح معاني هذي الوظائف الي تبدأ ب

صحيح ^-^ شكرا تابل على التعديل .

يعني سويت ليبل guiCreateLabel وجربت تكتب كلمة سر خطأ ومانفع؟

setTeamFriendlyFire(createTeam("Grove", 0, 500, 0 ), false) setTeamFriendlyFire(createTeam("Vagos", 255, 200, 0 ), false) setTeamFriendlyFire(createTeam("Ballas", 128, 0, 128), false) setTeamFriendlyFire(createTeam("Mafia", 154,205,50 ), false) setTeamFriendlyFire(createTeam("Russians", 160,82,45), false) setTeamFriendlyFire(createTeam("Triads", 104,104,104), false) setTeamFriendlyFire(createTeam("Rifa", 250,128,114 ), false) setTeamFriendlyFire(createTeam("Street", 250,128,0 ), false) setTeamFriendlyFire(createTeam("Aztecas", 24, 198, 238), false) setTeamFriendlyFire(createTeam("Medic", 24, 255, 255 ), false) setTeamFriendlyFire(createTeam("Police", 0, 0, 255 ), false) createTeam("No Team", 255, 255, 255) addEvent("spawnMe", true) addEventHandler("spawnMe", root, function(skinID, sX, sY, sZ, sR, team) local team = getTeamFromName(team) spawnPlayer(source, sX, sY, sZ, sR, skinID, 0, 0, team) setCameraTarget(source) showChat(source, true) end) addEventHandler("onPlayerSpawn", root, function(_, _, _, _, team) local team = team and getTeamName(team) or "N/A" if team == "Police" then giveWeapon(source, 3, 1) takeWeapon(source, 41) elseif team == "Medic" then giveWeapon(source, 41, 9999) takeWeapon(source, 3) else takeWeapon(source, 3) takeWeapon(source, 41) end local account = getPlayerAccount(source) if account and not isGuestAccount(account) then local wData = getAccountData(account, "newPlayerData") if not wData then givePlayerMoney(source, 2500) giveWeapon(source, 23, 20) giveWeapon(source, 31, 50) setAccountData(account, "newPlayerData", true) end end end) addEvent("Login-Register", true) addEventHandler("Login-Register", root, function(action, userName, passWord) if (action == "Login") then local account = getAccount(userName, passWord) if account then logIn(source, account, passWord) triggerClientEvent(source, "onLoginSuccess", source) else exports.TopBarChat:sendClientMessage ("Wrong username or password!", source, 255, 255, 0) triggerClientEvent(source, "wrongPass", source) -- اذا الباس او الاسم خطأ نسوي ترايقر . end elseif (action == "Register") then local serial = getPlayerSerial(source) local TotalAcc = TotalAccounts(serial) or 0 if TotalAcc < 3 then if not getAccount(userName) then local accountAdded = addAccount(userName, passWord) if accountAdded then exports.TopBarChat:sendClientMessage("You have successfully registered!, you can now login with your username and password.", source, 0, 255, 50) setAccountData(accountAdded, "reg-Serial", serial) else exports.TopBarChat:sendClientMessage("Error creating account, please contact the admin.", source, 255, 0, 50) end else exports.TopBarChat:sendClientMessage("Account with this name already exists!", source, 255, 0, 0) end else exports.TopBarChat:sendClientMessage("You can register up to 3 accounts only!", source, 255, 0, 0) end end end) function TotalAccounts(serial) aCount = 0 for i, account in ipairs(getAccounts()) do local accSerial = getAccountData(account, "reg-Serial") if accSerial and accSerial == serial then aCount = aCount + 1 end end return aCount end -----------------------------------|Medic|----------------------------------- addEvent("healP", true ) addEventHandler("healP", root, function(healer) local Health = getElementHealth(source) if (Health < 99) then local hp = 2*Health if getPlayerMoney(source) >= hp then setElementHealth(source, Health+15) givePlayerMoney(healer, hp) takePlayerMoney(source, hp) exports.TopBarChat:sendClientMessage("You earned $"..hp, healer, 0, 255, 0) end end end) -----------------------------------|Medic|----------------------------------- استبدل كود السيرفر بالكود الي فوق وسوي ليبل على اللوحه بالمكان الي تبي وحط في الكلينت هذا الكود local wrongPassLabel = اسم الليبل -- ضروري تحط اسم الليبل الي سويته -- Label = guiCreateLabel(...) -- local wrongPassLabel = Label addEvent("wrongPass", true) addEventHandler("wrongPass", root, function() guiSetText("الكلام الي تبيه ينحط بالليبل", wrongPassLabel) end )

اطرح كود السيرفر !

وتبي تحط الكلام فيه؟ Label يعني انت مسوي

!!!! viewtopic.php?f=160&t=80611

سوي اللوحة ياخي وبعدين اطلب الاكواد :_

انا اتوصت لكمم دوبي ما ابي غير الشكر شباب انا ادري انه انت مكلمه

‏#عاجل_واس الديوان الملكي : غدا الاحد إجازة رسمية لكافة قطاعات الدولة وللطلبة والطالبات في جميع المراحل التعليمية بما فيها التعليم العالي. @spagov حساب وكالة الانباء السعوديه ( واس ) ء

الي يبي يغيب يغيب ويقول للمدير الملك توفى ماراح يقول شيء _________________ وزارة التربية والتعليم : تنفي رسمياً قرار شائعة تعليق الدراسة اليوم الأحد - صحيفة أبعاد الخبر الإلكترونية - http://www.neews.org/?p=47636#.VMLJOeMiTs4.twitter='(

لكل من وصله هذا الخطاب في الواتس اب او تويتر او بلاك بيري .. الخبر غير صحيح والمدرسه تبدأ يوم الاحد بعد بكره .

ماشاء الله تبارك الله ، شغل جامد ومتعوب عليه txd ملاحظه بسيطه : انتم مكثرين تي اكس دي يعني بيصير التحميل ثقيل للاعب اتمنى تخففون من المجسمات . بالتوفيق لكم . @

هذي طريقتي ^^ دائما اذا ابي اشغل صوت لكل اللاعبين اسوي كذا

سيرفر function startSound ( player ) if getElementData(player,"isRunning") == false then setElementData(player,"isRunning", true) triggerClientEvent( getRootElement( ), "startSound", getRootElement ( ) ) else setElementData(player,"isRunning", false) triggerClientEvent( getRootElement( ), "stopSound", getRootElement( ) ) end end addCommandHandler("sound", startSound) كلينت local sound = "مسار او رابط تشغيل الصوت المباشر" addEvent("startSound",true) addEvent("stopSound",true) function start ( ) isPlay = playSound( sound, true ) end addEventHandler("startSound", root, start) function stop ( ) stopSound( isPlay ); end addEventHandler("stopSound", root, stop)

ماني مبرمج بس عمري 17 سنه و اسبوع و 3 ايام ^-^

تأكد من اسم الملف اضن من الاسم انا مره سويت كذا Weapon.mp3.mp3 المفروض Weapon.mp3

بالتوفيق واتمنى النجاح لكم و تشوفون نتائج تعبكم . سيرفر رائع ، اهنيكم

سوي لوحة فيها زر و ايديت و لما يضغط الزر يتحقق اذا كاتب في الايديت رقم ياخذ منه 5 مليون او المبلغ الي تبيه وتجيب رقم عشاوئي من 1- 5 اذا الرقم نفسه يعطيه دبل فلوسه . لعبة الحظ والياناصيب ^_^'''

الزبده ، تبطي عظم انت وياه : ( ترا رجيتونا بسيرفركم ذا الي بتسوونه وبيكسر جراند العرب على فكره ترا جراند العرب صار له 6 سنوات شغال وتبون تكسرونه بشهر هههههههههه حاولت اعديها وعيت تعدي :[

اذا تبيه يوم يخش الكول شيب لازم يجلس 3 دقائق بالكول شيب عشان تجيه الفلوس ! جرب هذا ColShape = COL -- بإسم الكول شيب حقك COL استبدل Money = 1000 -- استبدل 1000 بالفلوس الي تبي تعطي اللاعب addEventHandler("onColShapeHit", root, function ( element ) if source == ColShape then if getElementType(element) == "player" then timer = setTimer( function ( ) if isElementWithinColShape ( element, ColShape ) then givePlayerMoney( element, Money ) else return killTimer( timer ) end return killTimer( timer ) end, 1000*60*3, 1 ) end end end ) واذا تبيه كل 3 دقائق يجيب اللاعبين الي بالماركر ويعطيهم فلوس جرب هذا ColShape = COL -- بإسم الكول شيب حقك COL استبدل Money = 1000 -- استبدل 1000 بالفلوس الي تبي تعطي اللاعب setTimer( function( ) for _, players in ipairs ( getElementsByType("player") ) do if isElementWithinColShape ( players, ColShape ) then givePlayerMoney( players, Money ) end end end, 1000*60*3, 0 ) كلها الاكواد سيرفر *

اسئلهم حبيبي مايصلح نعتدي على حقوقهم لو خليته بدون ذكر اسماء كان افضل .

واضحه يعني تبي تدبل الرصاص رصاص = رصاص + رصاص ☺ يعني المتغير رصاص يساوي رصاص + رصاص دبل

انا مع كلام زاحف يعني لو تفتح سيرفر ريس بيجون لاعبين كثير وانت راح تبدع في هذا الشيء

أكيد فيه طريقة .. *فقط للإصدار 1.4 *تقدر تضيف مواتر إلى الجدول عشان تصير لها حماية * لازم تكون الملفات في المود إلي فيه الكود نفسه *فقط لملفات txd - dff نفترض إن الملفات الي ماتبي أحد يزرفه يحمل إسم 433.txd - 433.dff تروح الميتا وتسوي كذا: "443.dff" download="false" /> "443.txd" download="false" /> بعدها تروح داخل الملف, وتستبدل أكواد الإستبدال بـ filePath = { { "443.txd", 443 }; { "443.dff", 443 }; -- { "filePath", ID }; }; modelID = { }; function checkTransfer ( ) if isTransferBoxActive ( ) == true then setTimer ( checkTransfer, 1000, 1 ); else for i, v in ipairs ( filePath ) do local file, ID = v [ 1 ], v [ 2 ]; if not modelID [ file ] then downloadFile ( file ); modelID [ file ] = ID; end end end end addEventHandler ( "onClientResourceStart", resourceRoot, checkTransfer ); addEventHandler ( "onClientFileDownloadComplete", resourceRoot, function ( file, success ) if success then local ID = modelID [ file ]; if ID then if string.find ( file, ".txd" ) then txd = engineLoadTXD ( file ); engineImportTXD ( txd, ID ); end if string.find ( file, ".dff" ) then dff = engineLoadDFF ( file, ID ); engineReplaceModel ( dff, ID ); end modelID [ file ] = nil; local resourceName = getResourceName ( getThisResource ( ) ); local file_ = fileCreate ( ":" .. resourceName .. "/" .. file ); if file_ then fileWrite ( file_, "This Private File .." ); fileClose ( file_ ); end end end end );