Jump to content

w7sH

Members
  • Posts

    432
  • Joined

  • Last visited

Everything posted by w7sH

  1. w7sH

    طلب كود

    الكود كان عندي لكن ضاع.. مافيه شي أسمه ماتقدر :]
  2. w7sH

    طلب كود

    انا عندي أزرار كثير أبي كود يخفيهم بمود واحد ..
  3. w7sH

    طلب كود

    جربت الكود ما أشتغل معي
  4. w7sH

    طلب كود

    مافهمتني انت انا ابي كود اذا دخل عالم غير عالم 0 يخفي له جميع الازرار وانا احددها مثل اف 1 واف2 مايقدر يستعملها وهو في غيرعالم 0
  5. السلام عليكم ابي كود يخفي لي أزرار معينه ممكن 10 أزرار اذا دخلت عالم غير عالم 0
  6. اللي عطيتني ماهو شغال حق السبام نفس الاول .. وتقدر تجربه بنفسك
  7. w7sH

    طلب كود

    الزر أحطه وين بالضبط؟؟ aButton حطيته مكان ولا ضبط؟
  8. السلام عليكم ابي كود اذا ضغطت على زر يفتح لي قائمة الـ report يعني كود يكون مربوط بالزر واذا ضغطه اللاعب يكتب له الكلمة حقت اف8 report
  9. جزاك الله خير بس أنا ابي الطريقة على مود التاقات لان الاغلبية يكررون
  10. بيض الله وجهك .. بس تقدر تحطي لي فيه أنتظار فالشات عشان مايقدر يكرر أنتظار 6 ثواني
  11. جربت كذا كود ماضبط معي اذا معك شي عطني وانا احاول ولا تنسى السبام والإنتظار بالش
  12. السلام عليكم ورحمة الله وبركاتة كيف حالكم اليوم أبي منكم طلب ومساعدة في كود التاقات حقي لاهنتم عندي مود التاقات اذا كان واحد يحمل أو ماسجل مايظهر له تاق ما أدري وش المشكله + أبي اذا كان واحد يحمل يظهر له تاق خاص به واذا كان محمل ومخلص يظهر له تاق حق رتبت Everyone والمشكله الثانية ابي أضيف له منع التكرار يعني يكون فيه سبام اذا احد رسل يقول له أنتظر 5 ثواني عشان يرسل رسالة ثانيه بس رتبت الكونسل ما أبي عليها أنتظار وباقي الرتب يكون فيها أنتظار أبي مساعدكم لاهنتم هذا كود كلنكت. function chatbox( text, type) if type == 2 then return end local acc = getPlayerAccount(source) if ChatDisabled then if not isGuestAccount ( acc ) then if not isObjectInACLGroup("user." .. getAccountName(acc), aclGetGroup("Console")) then outputChatBox ( "No.", source, 255, 150, 0, true ) cancelEvent ( ) return end else outputChatBox ( "No.", source, 255, 150, 0, true ) cancelEvent() return end end if isGuestAccount ( acc ) then return end local customTag = getAccountData ( acc, "customTag" ) if customTag then cancelEvent() local r, g, b = getPlayerNametagColor(source) outputChatBox(customTag.." " .. getPlayerName ( source ) .. ":#ffFFff " .. text, getRootElement(), r, g, b, true ) outputServerLog("CHAT: "..customTag.." " .. getPlayerName ( source ) .. ": " .. text) elseif isObjectInACLGroup("user." .. getAccountName(acc), aclGetGroup("Console")) then cancelEvent() local r, g, b = getPlayerNametagColor(source) outputChatBox((getElementData(source,"teamColor") or "#ff0000").."* #FF0000[ Console#FF0000 ] " .. getPlayerName ( source ) .. ":#cccccc " .. text, getRootElement(), r, g, b, true ) outputServerLog("CHAT: [ Console ] " .. getPlayerName ( source ) .. ": " .. text) elseif isObjectInACLGroup("user." .. getAccountName(acc), aclGetGroup("Big.Admin")) then cancelEvent() local r, g, b = getPlayerNametagColor(source) outputChatBox((getElementData(source,"teamColor") or "#CC0000").."*#CC0000 [ Big.Admin ] " .. getPlayerName ( source ) .. ":#FFCC00 " .. text, getRootElement(), r, g, b, true ) outputServerLog("CHAT: [ Big.Admin ] " .. getPlayerName ( source ) .. ": " .. text) elseif isObjectInACLGroup("user." .. getAccountName(acc), aclGetGroup("Everyone")) then cancelEvent() local r, g, b = getPlayerNametagColor(source) outputChatBox((getElementData(source,"teamColor") or "#cccccc").."*#cccccc [ #ffffff" .. getPlayerName ( source ) .. " #cccccc]:#FFFFFF " .. text, getRootElement(), r, g, b, true ) outputServerLog("CHAT: [ Everyone ] " .. getPlayerName ( source ) .. ": " .. text) end end )
  13. لو تحط فيه محرك بحث راح يصير افضل سكربت
  14. كذا طفى مود التاجات
  15. السلام عليكم عندي كود شات تيم شبكته مع مود التاجات حقي وضبط تمام لكن فيه مشكله وحيده اذا مثلا تكلمت في تيم معين من خلال الشات الكل يشوف حتى اللي م عنده تيم يشوف الكلام ابيه انا بس اعضاء التيم اللي يشوفون كلامي وهذا الكود حقي ------------- Teams chat addEventHandler("onResourceStart",getResourceRootElement(getThisResource()), function () for index, player in pairs(getElementsByType("player")) do bindKey(player,"y","down","chatbox","Teamsay") end end) addCommandHandler("Teamsay",function (plr,cmd,msg) local playerTeam = getPlayerTeam(plr) if (playerTeam) then local r, g, b = getTeamColor (playerTeam) outputChatBox('(TEAM)#FFFFFF '..colorHex(r, g, b)..''..getPlayerName(plr):gsub("#%x%x%x%x%x%x", "") ..': #FFFFFF'.. msg,root, r, g, b, true) end end)
  16. مود جميل وفي قمة الروعهة " إقتراح : لو تضيف لغتين - عربي - إنجليزي يكون أفضل وينتشر أكثر ويستفيدون الأجانب والعرب .
  17. Fps اذا لاق ينزل الـ يعني المود يحمل Timer كثير حاول تقلل وإذا لاق عدم سرعة السيرفر يعني تأخر فالشات وكذا فـ من السيرفر المساحة صغيرة
  18. guiSetAlpha ( Wnd , 0.10 ) SetWindAlpha = function ( Wind ) if ( guiGetVisible ( Wind ) == false ) then guiSetVisible ( Wind , true ) Timer = setTimer ( function ( ) local _Alpha = guiGetAlpha ( Wind ) local AlphaNew = _Alpha + 0.10 guiSetAlpha ( Wind , AlphaNew ) if AlphaNew >= 0.80 and ( isTimer ( Timer ) ) then killTimer ( Timer ) showCursor ( true ) guiSetInputEnabled ( true ) end end,300,0 ) end if ( guiGetVisible ( Wind ) ) and guiGetAlpha ( Wind ) >= 0.80 then Timer = setTimer ( function ( ) local _Alpha = guiGetAlpha ( Wind ) local AlphaNew = _Alpha - 0.10 guiSetAlpha ( Wind , AlphaNew ) if AlphaNew <= 0.10 and ( isTimer ( Timer ) ) then killTimer ( Timer ) showCursor ( false ) guiSetInputEnabled ( false ) guiSetVisible ( Wind , false ) end end,300,0 ) end end الكود تمام بس فيه مشاكل بسيطة 1- عدم إغلاق اللوحة بعد الضغط مرة آخرى 2- الفتح بشكل سريع المفترض يكون بشكل بطيء قليلاً 3- اللوحة إذ كانت شفافة أفضل دون Alpha 1.0 - بحيث تفتح بشكل بطيء
  19. does not work ................
  20. السلام عليكم ورحمة الله وبركاتةة انا معي الوظيفة هذي اذا سكرت اللوحة تتسكر بشكل بطيء انا ابيه اذا فتحت اللوحة تفتح بشكل بطيء bindKey ( "الزر", "down", function ( ) if ( guiGetVisible ( Wnd ) == true ) then if ( isTimer ( TheFadeTimer ) ) then return end showCursor ( false ) guiSetInputEnabled ( false ) guiSetAlpha ( Wnd, 1 ) TheFadeTimer = setTimer ( function ( ) Alpha = guiGetAlpha ( Wnd ) guiSetAlpha ( Wnd, Alpha - 0.05 ) end, 50, 20) setTimer ( guiSetVisible, 1000, 1, Wnd, false ) else guiSetVisible ( Wnd, true ) guiSetAlpha ( Wnd, 1 ) showCursor ( true ) guiSetInputEnabled ( true ) end end )
  21. السلام عليكم ابي كود م يتيح لي اكتب في الايدت الا حروف معينة يعني 6 حروف اكثر شي ء وثاني شي ابي كود لازم تكتب 4 احرف عشان تستخدم الآمر في الادت
  22. السلام عليكمم الموضوع عن إفتتاح منتدى شباب القصيم المنتدى عام - محتاجين مشرفين ومراقبين واللي يشد حيلهه إدارهه خلصنا من المنتدى اليوم والمنتدى قيد التطوير ولم ينتهي بعد * والقادم أفضل نتشرف بالزوار والجميع رابط المنتدى http://qassim.tecpt.com/vb
  23. السسلامم عليكمم ورحمة الله وبركاتهة بفتح هذا الموضوع لـ عرض مودات شباب القصيم المتواضعةة وناخذ فيكم فرة ع السيرفر بصور اللي اقدر عليهه وبعض المودات أن شاء الله تعجبكم نبدء بسم الله هذي بعض الصور جبتها عشوائية وليس هذا كل مافي السيرفر " مقتطفات " [1]- [2]- [4]- [5]- [Derby]- [6]- [7]- [8]- [9]- [10]- [11]- [12]- [13]- .............................................................. ويوجد هناك 31 سيارة *هجولة* والبعض منها بفلشر واقعي والداخلي واقعي وهذي بعض الصور والباقي خش وإكتشفها بنفسك وهذا منتدى خاص للسيرفر وللعام يتواجد به جميع المتديات qassim.tecpt.com/vb وهناك مقاطع هجولة من إحدى المصورين بالسيرفر [1]- وفيه مقاطع والله ضيعتها ----------------------------------------- صاحب السيرفر w7sH الأسم سيرفر شباب القصيم الأيبي mtasa://164.132.25.16:22001 ونستقبلكم في أي وقت ونبي أرائكم وإقتراحتكم في الكومنت والسيرفر في بدايتهة والقادم أفضل -- Default شكر خاص للـ
  24. خلاص سويتها - , نعتذر ع الإزعاج #
×
×
  • Create New...