-
Posts
1,388 -
Joined
-
Last visited
-
Days Won
14
Everything posted by +Source|>
-
chatSpaming = {} if get("*chat/blockRepeatMessages") == "true" and chatSpaming[source] and chatSpaming[source] == text then outputChatBox( " [ Spam ]#ff0000 لا تكرر " , source,225,170,90, true) playSoundFrontEnd( source, 45 ) return else chatSpaming[source] = text end if isObjectInACLGroup("user." .. account, aclGetGroup("Admin")) then outputChatBox("ADMIN :" .. name .. ":"..color.." " .. text, root, 255, 255, 255, true) elseif isObjectInACLGroup("user." .. account, aclGetGroup("King.Time")) then outputChatBox("#ff0033✱【⊰ #339933King Of Time #ff0033⊱】✱#FFFFFF" .. name .. ":"..color.." " .. text, root, 255, 255, 255, true) elseif isObjectInACLGroup("user." .. account, aclGetGroup("Everyone")) then outputChatBox("#73dbff✱#ffffff【#ff96e7» #ffffffالــعــرب #ff96e7طــارات #7bdfff زائــر #ff96e7«#ffffff】#73dbff✱#ffffff" .. name .. ":"..color.." " .. text, root, 255, 255, 255, true) end end end addEventHandler("onPlayerChat", root, chatbox) addEventHandler("onPlayerQuit",root, function() if chatSpaming[source] then chatSpaming[source] = nil end end ) META <setting name="*chat/blockRepeatMessages"value="true"/>
-
سوي فك الميوت يكون بالسيرييال او بالرتب
-
جيب مود تاجاتك في الخاص واعدله لك
-
setTimer( function() -- local mod = ("mod") --اسم المود -- local resource = getResourceFromName ( mod ) -- startResource ( resource ) -- -- end,50,0) -- -------------------------------------------------------- setTimer( function() -- local mod = ("mod") --اسم المود -- local resource = getResourceFromName ( mod ) -- stopResource ( resource ) -- -- end,60000*10,0) -- -------------------------------------------------------- ----------------------- 2mod rkd ----------------------- setTimer( function() -- local mod = ("mod2") --اسم المود -- local resource = getResourceFromName ( mod ) -- startResource ( resource ) -- -- end,60000*10,0) -- -------------------------------------------------------- setTimer( function() -- local mod = ("mod2") --اسم المود -- local resource = getResourceFromName ( mod ) -- stopResource ( resource ) -- -- end,60000*20,0) -- -------------------------------------------------------- ----------------------- 3mod forza --------------------- setTimer( function() -- local mod = ("mod3") --اسم المود -- local resource = getResourceFromName ( mod ) -- startResource ( resource ) -- -- end,60000*20,0) -- -------------------------------------------------------- setTimer( function() -- local mod = ("mod3") --اسم المود -- local resource = getResourceFromName ( mod ) -- stopResource ( resource ) -- -- end,60000*20,0)
-
انا مسوي واحد من زمان لو تبيه
-
حطه بنفس المود حق تاجات وسوي if -- then return end
-
حط هذا في الميتا بدال القديمه <file src="MS.txd" download="false" /> <file src="MS.dff" download="false" /> وسوي ملف كلنت وحط فيه هالأكواد local downloadList = { { "MS.txd", MS }, { "MS.dff", MS }, } addEventHandler ( "onClientResourceStart", resourceRoot, function ( ) for _,v in ipairs ( downloadList ) do downloadFile ( tostring ( v [ 1 ] ) ) end end ) addEventHandler ( "onClientFileDownloadComplete", root, function ( fileName, success ) if ( source == resourceRoot ) then for _,v in ipairs ( downloadList ) do if ( success ) then if ( fileName == tostring ( v [ 1 ] ) ) then if ( string.find ( fileName, ".txd" ) ) then txd = engineLoadTXD ( tostring ( v [ 1 ] ) ) engineImportTXD ( txd, tonumber ( v [ 2 ] ) ) else dff = engineLoadDFF ( tostring ( v [ 1 ] ), tonumber ( v [ 2 ] ) ) engineReplaceModel ( dff, tonumber ( v [ 2 ] ) ) end end end end end end ) ملحوظه MS = أيدي السياره
-
addEventHandler("onPlayerLogin",root, function () setElementData(source,"Name",getPlayerName(source)) end )
-
setTimer( function() local mod = ("mod") --اسم المود local resource = getResourceFromName ( mod ) startResource ( resource ) end,60000*10,0)
-
setTimer( local mod = "" --اسم المود local resource = getResourceFromName ( mod ) startResource ( resource ) end, 60000*10, 0 )
-
60000 = دقيقه نضربها في 10 عشان يصيرو 10 دقايق
-
setTimer( --code end, 60000*10, 0 )
-
سوي مود لما يشتغل يحط تايمر والتايمر ذا كل 10 دقايق يقفل مهمة ويقتح الثانيه getResourceFromName startResource stopResource setTimer 'onResourceStart'
-
لا لا خلاص انا لقيت ترايقرين بنفس الأسم وظبط مشكورين كلكم
-
مافي بنفس الإسم المشكله عشان مسوي لوب الرساله تتكرر بعدد لاعبين السيرفر
-
addEventHandler("onClientGUIClick", root, function() if source == sBtn then triggerServerEvent( "giveDailySalary", localPlayer ) end end )
-
فيها مشكله الرساله تتكرر على عدد اللاعبين في سيرفر outputChatBox( "#dddddd ≈ [ Bank ]#ff0000 Please Try Again After 24 Hours", source, 0, 0, 0, true )
-
كذا TimeDaySet = {} function myEvents () if ( eventName == "onPlayerLogin" ) then local playerSerial = getPlayerSerial ( source ) local checkSQL = executeSQLQuery ( 'SELECT * FROM WaitDaySQLB4 WHERE SerialP=?' , playerSerial ) if ( #checkSQL ~= 0 ) then if ( isTimer ( TimeDaySet[source] ) ) then killTimer ( TimeDaySet[source] ) end TimeDaySet[source] = setTimer( function() end, checkSQL[1].Timer, 1 ) end elseif ( eventName == "onPlayerQuit" ) then local playerSerial = getPlayerSerial ( source ) local checkSQL = executeSQLQuery ( 'SELECT * FROM WaitDaySQLB4 WHERE SerialP=?' , playerSerial ) if ( isTimer ( TimeDaySet[source] ) ) then local myTimer = getTimerDetails ( TimeDaySet[source] ) if ( myTimer ) then if ( #checkSQL == 0 ) then executeSQLQuery( "INSERT INTO WaitDaySQLB4 ( Timer, SerialP ) VALUES( ? , ? )", myTimer, playerSerial ) else executeSQLQuery("UPDATE WaitDaySQLB4 SET Timer=? WHERE SerialP=?", myTimer, playerSerial ) end end end elseif ( eventName == "onResourceStop" ) then for k, v in ipairs ( getElementsByType ( "player" ) ) do local playerSerial = getPlayerSerial ( v ) local checkSQL = executeSQLQuery ( 'SELECT * FROM WaitDaySQLB4 WHERE SerialP=?' , playerSerial ) if ( isTimer ( TimeDaySet[source] ) ) then local myTimer = getTimerDetails ( TimeDaySet[source] ) if ( myTimer ) then if ( #checkSQL == 0 ) then executeSQLQuery( "INSERT INTO WaitDaySQLB4 ( Timer, SerialP ) VALUES( ? , ? )", myTimer, playerSerial ) else executeSQLQuery("UPDATE WaitDaySQLB4 SET Timer=? WHERE SerialP=?", myTimer, playerSerial ) end end end end elseif ( eventName == "onResourceStart" ) then for k, v in ipairs ( getElementsByType ( "player" ) ) do local playerSerial = getPlayerSerial ( v ) local checkSQL = executeSQLQuery ( 'SELECT * FROM WaitDaySQLB4 WHERE SerialP=?' , playerSerial ) if ( #checkSQL ~= 0 ) then if ( isTimer ( TimeDaySet[source] ) ) then killTimer ( TimeDaySet[source] ) end TimeDaySet[source] = setTimer( function() end, checkSQL[1].Timer, 1 ) end end end end addEventHandler("onPlayerLogin", root, myEvents) addEventHandler("onPlayerQuit", root, myEvents) addEventHandler("onResourceStop", root, myEvents) addEventHandler("onResourceStart", root, myEvents) بس اذا سويتها كذا تشتغل بس لما اسوي ريستارت ينعاد التايمر ويمديني اسحب راتب
-
كفو اشتغل بس لما اسوي ريستارت ما يشتغل يرجع ياخذ فلوس
-
ابيه لما ياخذ الفلوس يسوي تايمر 24 ساعه عشان يرجع ياخذها مره ثانيه بس ابي لو اللاعب طلع او المود ترستر ما يحذف التايمر addEvent("giveDailySalary", true) addEventHandler("giveDailySalary", root, function( ) if isTimer( TimeDaySet ) then outputChatBox( "#dddddd ≈ [ Bank ]#ff0000 Please Try Again After 24 Hours", source, 0, 0, 0, true ) return end outputChatBox( "#00ffff Salary Was Successfully Taken ✔", source, 0, 0, 0, true ) givePlayerMoney( source, 9000 ) local TimeDaySet = setTimer( function() end, 86400000, 1 ) local SerialP = getPlayerSerial( source ) local Timer = getTimerDetails( TimeDaySet ) setTimer ( function() local Timer = getTimerDetails( TimeDaySet ) local checkSQL = executeSQLQuery ( 'SELECT * FROM SQLTst WHERE SerialP=?' , SerialP ) if ( #checkSQL == 0 ) then executeSQLQuery( "INSERT INTO SQLTst ( Timer, SerialP ) VALUES( ? , ? )", Timer, SerialP ) else executeSQLQuery("UPDATE SQLTst SET Timer=? WHERE SerialP=?", Timer, SerialP ) end end, 50, 0 ) end )
-
انا مسوي ليبل ومسوي لو كتبت كلام في الإيديت بوكس يجي في الليبل ومسوي الكلام ينحفظ بالسكل بس المشكله انو الكلام يظهر للكل ابيه يضهر للشخص اللي كتب الكلام بس --server addEvent("addM", true) addEventHandler("addM", root, function( Medit ) local MSG = Medit executeSQLQuery( "INSERT INTO MSGSYS ( MSG ) VALUES( ? )", MSG ) triggerEvent ( 'Refresh' , source ) end ) addEvent ( 'Refresh' , true ) addEventHandler ( 'Refresh' , root , function () local aSQL2c = executeSQLQuery ( 'SELECT * FROM MSGSYS' ) if ( #aSQL2c ~= 0 ) then triggerClientEvent ( source, 'AddMsg' , source , aSQL2c ) end end ) --client addEvent ( 'AddMsg' , true ) addEventHandler ( 'AddMsg' , root , function( Table ) for i, v in ipairs( Table ) do guiSetText( LblMN, v.MSG ) end end )