Jump to content

z24d

Members
  • Posts

    570
  • Joined

  • Last visited

Everything posted by z24d

  1. z24d

    /little problem

    local ExpRewardForKill = {4, 8} local levels = {} addEventHandler ( "onResourceStart", resourceRoot, function ( ) connection = dbConnect( "sqlite", "levels.db" ) exports["scoreboard"]:scoreboardAddColumn ( "level", root, 90, "Player's Level") if ( connection )then dbExec ( connection, "CREATE TABLE IF NOT EXISTS levels (levelID INTEGER PRIMARY KEY NOT NULL, accountName TEXT, level INT, experience INT)" ) outputDebugString ( "Successfully connected to levels.db" ) else outputDebugString ( "Failed to connect to levels.db", 3 ) end local LivelsFile = xmlLoadFile ( "levels.xml" ) if ( LivelsFile ) then outputDebugString ( "levels.xml successfully open") for index, levelData in ipairs ( xmlNodeGetChildren ( LivelsFile ) ) do local levelAttributes = xmlNodeGetAttributes ( levelData ) table.insert(levels, { ["levelName"] = levelAttributes.levelName, ["experienceRequired"] = tonumber(levelAttributes.experienceRequired), ["moneyReward"] = tonumber(levelAttributes.moneyReward)}) end else outputDebugString ( "Failed to open to levels.xml", 1 ) end end ) --[[ addCommandHandler ( "level", function ( thePlayer ) removeElementData(thePlayer,"experience") removeElementData(thePlayer,"level") end ) ]] addEventHandler("onResourceStop",resourceRoot, function ( ) if isElement ( connection ) then setTimer(destroyElement, 1000, 1, connection ) end end ) addEventHandler("onResourceStop",resourceRoot, function () for index, player in ipairs(getElementsByType("player")) do local experience = tonumber(getElementData(player,"experience")) or 0 setPlayerExperience(player, experience) local PlayerLevel = tonumber(getElementData(player,"level")) or 1 setPlayerLevel(player, PlayerLevel) end end) function saveExpOnQuitOrLogout(account) local experience = tonumber(getElementData(source,"experience")) or 0 local PlayerLevel = tonumber(getElementData(source,"level")) or 1 if (experience) then if (account and account == "userdata") then setPlayerExperience(account, experience) setPlayerLevel(account, PlayerLevel) else setPlayerExperience(source, experience) setPlayerLevel(source, PlayerLevel) end end setElementData(source,"experience",0) end addEventHandler("onPlayerLogout",root,saveExpOnQuitOrLogout) addEventHandler("onPlayerQuit",root,saveExpOnQuitOrLogout) function CheckLevelFromExp(dataName) if (source and getElementType(source) == "player" and dataName == "experience") then local SourceLevel = tonumber( getElementData(source,"level") ) local SourceExp = tonumber( getElementData(source,"experience") ) local NewLvl = SourceLevel+1 if ( levels[SourceLevel] ) then if ( levels[NewLvl]) then local RequiredExp = tonumber( levels[SourceLevel]["experienceRequired"] ) if ( SourceExp >= RequiredExp ) then setElementData(source,"experience_n", tonumber(levels[NewLvl]["experienceRequired"])) setElementData(source,"level",NewLvl) setTimer(setElementData, 50, 1, source,"experience",0) givePlayerMoney(source,tonumber(levels[NewLvl].moneyReward)) triggerClientEvent ( source, "LevelUpEffect", source ) exports.guimessages:outputServer(root,"#00FF00*#FFFF00 Congratulations "..getPlayerName(source).."#FFFF00 Has been got Level #FFFFFF".. tostring(NewLvl) .."#00FF00*",255,255,0) end end end end end addEventHandler("onElementDataChange",root,CheckLevelFromExp) function OnZombieKill (killer) if (killer and killer ~= source) then if getPlayerAccount(killer) then local experience = tonumber(getElementData(killer,"experience")) local SourceLevel = getElementData(killer,"level") if ( not SourceLevel ) then SourceLevel = 1 setElementData(killer,"level",1) end if ( levels[SourceLevel+1] ) then local randomExperience = math.random(unpack(ExpRewardForKill)) if (experience) then setElementData(killer,"experience",experience+tonumber(randomExperience)) else setElementData(killer,"experience",randomExperience) end else setElementData(killer,"experience",tonumber(levels[SourceLevel]["experienceRequired"])) end end end end addEvent("onZombieWasted",true) addEventHandler ("onZombieWasted", root, OnZombieKill) addEventHandler("onPlayerLogin",root, function (_,account) local accountName = getAccountName(account) local handler = connection local query = dbQuery( handler, "SELECT accountName FROM levels WHERE accountName=?", tostring(accountName) ) local result, numrows, errmsg = dbPoll ( query, -1 ) if ( type( result ) == "table" and #result == 0 or not result ) then if dbExec( handler, "INSERT INTO `levels` (`levelID`, `accountName`, `level`, `experience`) VALUES (NULL, '".. accountName .."', '1', '0');") then setElementData(source, "experience", 0) setElementData(source, "experience_n", tonumber(levels[1].experienceRequired)) setElementData(source, "level", 1) end else local level = getPlayerLevel(source) setElementData(source, "experience", getPlayerExperience(source)) if (levels[level]) then setElementData(source, "experience_n", tonumber(levels[level].experienceRequired)) else setElementData(source, "experience_n", tonumber(levels[level -1].experienceRequired)) end setElementData(source, "level", level) end end) function getPlayerLevel(thePlayer) local handler = connection if (isElement(thePlayer) and getElementType(thePlayer) == "player") then account = getPlayerAccount(thePlayer) else account = thePlayer end if (not account or isGuestAccount(account)) then return false end local accountName = getAccountName(account) local query = dbQuery( handler, "SELECT level FROM `levels` WHERE accountName='".. tostring(accountName) .."'") local result, numrows, errmsg = dbPoll( query, -1 ) if (result) then return tonumber(result[1]["level"]) end end function setPlayerLevel(thePlayer, theLevel) local handler = connection if (isElement(thePlayer) and getElementType(thePlayer) == "player") then account = getPlayerAccount(thePlayer) else account = thePlayer end if (not account or isGuestAccount(account)) then return false end local accountName = getAccountName(account) if dbExec( handler, "UPDATE `levels` SET `level` = '" .. tonumber(theLevel) .. "' WHERE `accountName` = '" .. tostring(accountName) .."'" ) then return true else return false end end function getPlayerExperience(thePlayer) local handler = connection if (isElement(thePlayer) and getElementType(thePlayer) == "player") then account = getPlayerAccount(thePlayer) else account = thePlayer end if (not account or isGuestAccount(account)) then return false end local accountName = getAccountName(account) local query = dbQuery( handler, "SELECT experience FROM `levels` WHERE accountName='".. tostring(accountName) .."'") local result, numrows, errmsg = dbPoll( query, -1 ) if (result) then return tonumber(result[1]["experience"]) end end function setPlayerExperience(thePlayer, theExperience) local handler = connection if (isElement(thePlayer) and getElementType(thePlayer) == "player") then account = getPlayerAccount(thePlayer) else account = thePlayer end if (not account or isGuestAccount(account)) then return false end local accountName = getAccountName(account) if dbExec( handler, "UPDATE `levels` SET `experience` = '" .. tonumber(theExperience) .. "' WHERE `accountName` = '" .. tostring(accountName) .."'" ) then return true else return false end end --down is the problem where is it ? please i need fix addCommandHandler( "LEVELALL", function( player, _, XP ) local PlayerAccount = getPlayerAccount( player ) if not ( isGuestAccount( PlayerAccount ) ) then if ( XP ) and ( tonumber( XP ) ) and ( isObjectInACLGroup( "user."..getAccountName( PlayerAccount ), aclGetGroup( "Console" ) ) ) then for _, Player in ipairs( getElementsByType( "player" ) ) do setPlayerExperience( Player, getPlayerExperience( Player ) + tonumber( XP ) ) end exports.guimessages:outputServer( root, getPlayerName( player ).." #00FFFFHas Been Give all XP!!#FFFFCC[#FFFF00"..tonumber( XP ).."FFFFCC]", 255, 255, 0 ) end end end )
  2. z24d

    ?PRBLM?

    وش الغلطط؟
  3. z24d

    ?PRBLM?

    local ExpRewardForKill = {4, 8} local levels = {} addEventHandler ( "onResourceStart", resourceRoot, function ( ) connection = dbConnect( "sqlite", "levels.db" ) exports["scoreboard"]:scoreboardAddColumn ( "level", root, 90, "Player's Level") if ( connection )then dbExec ( connection, "CREATE TABLE IF NOT EXISTS levels (levelID INTEGER PRIMARY KEY NOT NULL, accountName TEXT, level INT, experience INT)" ) outputDebugString ( "Successfully connected to levels.db" ) else outputDebugString ( "Failed to connect to levels.db", 3 ) end local LivelsFile = xmlLoadFile ( "levels.xml" ) if ( LivelsFile ) then outputDebugString ( "levels.xml successfully open") for index, levelData in ipairs ( xmlNodeGetChildren ( LivelsFile ) ) do local levelAttributes = xmlNodeGetAttributes ( levelData ) table.insert(levels, { ["levelName"] = levelAttributes.levelName, ["experienceRequired"] = tonumber(levelAttributes.experienceRequired), ["moneyReward"] = tonumber(levelAttributes.moneyReward)}) end else outputDebugString ( "Failed to open to levels.xml", 1 ) end end ) --[[ addCommandHandler ( "level", function ( thePlayer ) removeElementData(thePlayer,"experience") removeElementData(thePlayer,"level") end ) ]] addEventHandler("onResourceStop",resourceRoot, function ( ) if isElement ( connection ) then setTimer(destroyElement, 1000, 1, connection ) end end ) addEventHandler("onResourceStop",resourceRoot, function () for index, player in ipairs(getElementsByType("player")) do local experience = tonumber(getElementData(player,"experience")) or 0 setPlayerExperience(player, experience) local PlayerLevel = tonumber(getElementData(player,"level")) or 1 setPlayerLevel(player, PlayerLevel) end end) function saveExpOnQuitOrLogout(account) local experience = tonumber(getElementData(source,"experience")) or 0 local PlayerLevel = tonumber(getElementData(source,"level")) or 1 if (experience) then if (account and account == "userdata") then setPlayerExperience(account, experience) setPlayerLevel(account, PlayerLevel) else setPlayerExperience(source, experience) setPlayerLevel(source, PlayerLevel) end end setElementData(source,"experience",0) end addEventHandler("onPlayerLogout",root,saveExpOnQuitOrLogout) addEventHandler("onPlayerQuit",root,saveExpOnQuitOrLogout) function CheckLevelFromExp(dataName) if (source and getElementType(source) == "player" and dataName == "experience") then local SourceLevel = tonumber( getElementData(source,"level") ) local SourceExp = tonumber( getElementData(source,"experience") ) local NewLvl = SourceLevel+1 if ( levels[SourceLevel] ) then if ( levels[NewLvl]) then local RequiredExp = tonumber( levels[SourceLevel]["experienceRequired"] ) if ( SourceExp >= RequiredExp ) then setElementData(source,"experience_n", tonumber(levels[NewLvl]["experienceRequired"])) setElementData(source,"level",NewLvl) setTimer(setElementData, 50, 1, source,"experience",0) givePlayerMoney(source,tonumber(levels[NewLvl].moneyReward)) triggerClientEvent ( source, "LevelUpEffect", source ) exports.guimessages:outputServer(root,"#00FF00*#FFFF00 Congratulations "..getPlayerName(source).."#FFFF00 Has been got Level #FFFFFF".. tostring(NewLvl) .."#00FF00*",255,255,0) end end end end end addEventHandler("onElementDataChange",root,CheckLevelFromExp) function OnZombieKill (killer) if (killer and killer ~= source) then if getPlayerAccount(killer) then local experience = tonumber(getElementData(killer,"experience")) local SourceLevel = getElementData(killer,"level") if ( not SourceLevel ) then SourceLevel = 1 setElementData(killer,"level",1) end if ( levels[SourceLevel+1] ) then local randomExperience = math.random(unpack(ExpRewardForKill)) if (experience) then setElementData(killer,"experience",experience+tonumber(randomExperience)) else setElementData(killer,"experience",randomExperience) end else setElementData(killer,"experience",tonumber(levels[SourceLevel]["experienceRequired"])) end end end end addEvent("onZombieWasted",true) addEventHandler ("onZombieWasted", root, OnZombieKill) addEventHandler("onPlayerLogin",root, function (_,account) local accountName = getAccountName(account) local handler = connection local query = dbQuery( handler, "SELECT accountName FROM levels WHERE accountName=?", tostring(accountName) ) local result, numrows, errmsg = dbPoll ( query, -1 ) if ( type( result ) == "table" and #result == 0 or not result ) then if dbExec( handler, "INSERT INTO `levels` (`levelID`, `accountName`, `level`, `experience`) VALUES (NULL, '".. accountName .."', '1', '0');") then setElementData(source, "experience", 0) setElementData(source, "experience_n", tonumber(levels[1].experienceRequired)) setElementData(source, "level", 1) end else local level = getPlayerLevel(source) setElementData(source, "experience", getPlayerExperience(source)) if (levels[level]) then setElementData(source, "experience_n", tonumber(levels[level].experienceRequired)) else setElementData(source, "experience_n", tonumber(levels[level -1].experienceRequired)) end setElementData(source, "level", level) end end) function getPlayerLevel(thePlayer) local handler = connection if (isElement(thePlayer) and getElementType(thePlayer) == "player") then account = getPlayerAccount(thePlayer) else account = thePlayer end if (not account or isGuestAccount(account)) then return false end local accountName = getAccountName(account) local query = dbQuery( handler, "SELECT level FROM `levels` WHERE accountName='".. tostring(accountName) .."'") local result, numrows, errmsg = dbPoll( query, -1 ) if (result) then return tonumber(result[1]["level"]) end end function setPlayerLevel(thePlayer, theLevel) local handler = connection if (isElement(thePlayer) and getElementType(thePlayer) == "player") then account = getPlayerAccount(thePlayer) else account = thePlayer end if (not account or isGuestAccount(account)) then return false end local accountName = getAccountName(account) if dbExec( handler, "UPDATE `levels` SET `level` = '" .. tonumber(theLevel) .. "' WHERE `accountName` = '" .. tostring(accountName) .."'" ) then return true else return false end end function getPlayerExperience(thePlayer) local handler = connection if (isElement(thePlayer) and getElementType(thePlayer) == "player") then account = getPlayerAccount(thePlayer) else account = thePlayer end if (not account or isGuestAccount(account)) then return false end local accountName = getAccountName(account) local query = dbQuery( handler, "SELECT experience FROM `levels` WHERE accountName='".. tostring(accountName) .."'") local result, numrows, errmsg = dbPoll( query, -1 ) if (result) then return tonumber(result[1]["experience"]) end end function setPlayerExperience(thePlayer, theExperience) local handler = connection if (isElement(thePlayer) and getElementType(thePlayer) == "player") then account = getPlayerAccount(thePlayer) else account = thePlayer end if (not account or isGuestAccount(account)) then return false end local accountName = getAccountName(account) if dbExec( handler, "UPDATE `levels` SET `experience` = '" .. tonumber(theExperience) .. "' WHERE `accountName` = '" .. tostring(accountName) .."'" ) then return true else return false end end addCommandHandler( "LEVELALL", function( player, _, XP ) local PlayerAccount = getPlayerAccount( player ) if not ( isGuestAccount( PlayerAccount ) ) then if ( XP ) and ( tonumber( XP ) ) and ( isObjectInACLGroup( "user."..getAccountName( PlayerAccount ), aclGetGroup( "Console" ) ) ) then for _, Player in ipairs( getElementsByType( "player" ) ) do setPlayerExperience( Player, getPlayerExperience( Player ) + tonumber( XP ) ) end exports.guimessages:outputServer( root, getPlayerName( player ).." #00FFFFHas Been Give all XP!!#FFFFCC[#FFFF00"..tonumber( XP ).."FFFFCC]", 255, 255, 0 ) end end end )
  4. z24d

    ?PRBLM?

    addCommandHandler("LEVELALL",function(_,levels) if isObjectInACLGroup("user.".. getAccountName(getPlayerAccount(source)),aclGetGroup("Console")) then for k,v in ipairs (getElementType() == "player") do exports.guimessages:outputServer(v,getPlayerName(source).." #00FFFFHas Been Give all XP!!"..tonumber(levels),255,255,0) setPlayerExperience(v,getPlayerExperience(v) + levels) end end end )
  5. z24d

    ?PRBLM?

    local ExpRewardForKill = {4, 8} local levels = {} addEventHandler ( "onResourceStart", resourceRoot, function ( ) connection = dbConnect( "sqlite", "levels.db" ) exports["scoreboard"]:scoreboardAddColumn ( "level", root, 90, "Player's Level") if ( connection )then dbExec ( connection, "CREATE TABLE IF NOT EXISTS levels (levelID INTEGER PRIMARY KEY NOT NULL, accountName TEXT, level INT, experience INT)" ) outputDebugString ( "Successfully connected to levels.db" ) else outputDebugString ( "Failed to connect to levels.db", 3 ) end local LivelsFile = xmlLoadFile ( "levels.xml" ) if ( LivelsFile ) then outputDebugString ( "levels.xml successfully open") for index, levelData in ipairs ( xmlNodeGetChildren ( LivelsFile ) ) do local levelAttributes = xmlNodeGetAttributes ( levelData ) table.insert(levels, { ["levelName"] = levelAttributes.levelName, ["experienceRequired"] = tonumber(levelAttributes.experienceRequired), ["moneyReward"] = tonumber(levelAttributes.moneyReward)}) end else outputDebugString ( "Failed to open to levels.xml", 1 ) end end ) --[[ addCommandHandler ( "level", function ( thePlayer ) removeElementData(thePlayer,"experience") removeElementData(thePlayer,"level") end ) ]] addEventHandler("onResourceStop",resourceRoot, function ( ) if isElement ( connection ) then setTimer(destroyElement, 1000, 1, connection ) end end ) addEventHandler("onResourceStop",resourceRoot, function () for index, player in ipairs(getElementsByType("player")) do local experience = tonumber(getElementData(player,"experience")) or 0 setPlayerExperience(player, experience) local PlayerLevel = tonumber(getElementData(player,"level")) or 1 setPlayerLevel(player, PlayerLevel) end end) function saveExpOnQuitOrLogout(account) local experience = tonumber(getElementData(source,"experience")) or 0 local PlayerLevel = tonumber(getElementData(source,"level")) or 1 if (experience) then if (account and account == "userdata") then setPlayerExperience(account, experience) setPlayerLevel(account, PlayerLevel) else setPlayerExperience(source, experience) setPlayerLevel(source, PlayerLevel) end end setElementData(source,"experience",0) end addEventHandler("onPlayerLogout",root,saveExpOnQuitOrLogout) addEventHandler("onPlayerQuit",root,saveExpOnQuitOrLogout) function CheckLevelFromExp(dataName) if (source and getElementType(source) == "player" and dataName == "experience") then local SourceLevel = tonumber( getElementData(source,"level") ) local SourceExp = tonumber( getElementData(source,"experience") ) local NewLvl = SourceLevel+1 if ( levels[SourceLevel] ) then if ( levels[NewLvl]) then local RequiredExp = tonumber( levels[SourceLevel]["experienceRequired"] ) if ( SourceExp >= RequiredExp ) then setElementData(source,"experience_n", tonumber(levels[NewLvl]["experienceRequired"])) setElementData(source,"level",NewLvl) setTimer(setElementData, 50, 1, source,"experience",0) givePlayerMoney(source,tonumber(levels[NewLvl].moneyReward)) triggerClientEvent ( source, "LevelUpEffect", source ) exports.guimessages:outputServer(root,"#00FF00*#FFFF00 Congratulations "..getPlayerName(source).."#FFFF00 Has been got Level #FFFFFF".. tostring(NewLvl) .."#00FF00*",255,255,0) end end end end end addEventHandler("onElementDataChange",root,CheckLevelFromExp) function OnZombieKill (killer) if (killer and killer ~= source) then if getPlayerAccount(killer) then local experience = tonumber(getElementData(killer,"experience")) local SourceLevel = getElementData(killer,"level") if ( not SourceLevel ) then SourceLevel = 1 setElementData(killer,"level",1) end if ( levels[SourceLevel+1] ) then local randomExperience = math.random(unpack(ExpRewardForKill)) if (experience) then setElementData(killer,"experience",experience+tonumber(randomExperience)) else setElementData(killer,"experience",randomExperience) end else setElementData(killer,"experience",tonumber(levels[SourceLevel]["experienceRequired"])) end end end end addEvent("onZombieWasted",true) addEventHandler ("onZombieWasted", root, OnZombieKill) addEventHandler("onPlayerLogin",root, function (_,account) local accountName = getAccountName(account) local handler = connection local query = dbQuery( handler, "SELECT accountName FROM levels WHERE accountName=?", tostring(accountName) ) local result, numrows, errmsg = dbPoll ( query, -1 ) if ( type( result ) == "table" and #result == 0 or not result ) then if dbExec( handler, "INSERT INTO `levels` (`levelID`, `accountName`, `level`, `experience`) VALUES (NULL, '".. accountName .."', '1', '0');") then setElementData(source, "experience", 0) setElementData(source, "experience_n", tonumber(levels[1].experienceRequired)) setElementData(source, "level", 1) end else local level = getPlayerLevel(source) setElementData(source, "experience", getPlayerExperience(source)) if (levels[level]) then setElementData(source, "experience_n", tonumber(levels[level].experienceRequired)) else setElementData(source, "experience_n", tonumber(levels[level -1].experienceRequired)) end setElementData(source, "level", level) end end) function getPlayerLevel(thePlayer) local handler = connection if (isElement(thePlayer) and getElementType(thePlayer) == "player") then account = getPlayerAccount(thePlayer) else account = thePlayer end if (not account or isGuestAccount(account)) then return false end local accountName = getAccountName(account) local query = dbQuery( handler, "SELECT level FROM `levels` WHERE accountName='".. tostring(accountName) .."'") local result, numrows, errmsg = dbPoll( query, -1 ) if (result) then return tonumber(result[1]["level"]) end end function setPlayerLevel(thePlayer, theLevel) local handler = connection if (isElement(thePlayer) and getElementType(thePlayer) == "player") then account = getPlayerAccount(thePlayer) else account = thePlayer end if (not account or isGuestAccount(account)) then return false end local accountName = getAccountName(account) if dbExec( handler, "UPDATE `levels` SET `level` = '" .. tonumber(theLevel) .. "' WHERE `accountName` = '" .. tostring(accountName) .."'" ) then return true else return false end end function getPlayerExperience(thePlayer) local handler = connection if (isElement(thePlayer) and getElementType(thePlayer) == "player") then account = getPlayerAccount(thePlayer) else account = thePlayer end if (not account or isGuestAccount(account)) then return false end local accountName = getAccountName(account) local query = dbQuery( handler, "SELECT experience FROM `levels` WHERE accountName='".. tostring(accountName) .."'") local result, numrows, errmsg = dbPoll( query, -1 ) if (result) then return tonumber(result[1]["experience"]) end end function setPlayerExperience(thePlayer, theExperience) local handler = connection if (isElement(thePlayer) and getElementType(thePlayer) == "player") then account = getPlayerAccount(thePlayer) else account = thePlayer end if (not account or isGuestAccount(account)) then return false end local accountName = getAccountName(account) if dbExec( handler, "UPDATE `levels` SET `experience` = '" .. tonumber(theExperience) .. "' WHERE `accountName` = '" .. tostring(accountName) .."'" ) then return true else return false end end addCommandHandler("LEVELALL",function(_,levels) if isObjectInACLGroup("user.".. getAccountName(getPlayerAccount(source)),aclGetGroup("Console")) then for k,v in ipairs do exports.guimessages:outputServer(v,getPlayerName(source).." #00FFFFHas Been Give all XP!!"..tonumber(levels),255,255,0) setPlayerExperience(v,getPlayerExperience(v) + levels) end end end ) وين المشكلةةةةة ابي اخلي اذا كتبت باف8 LEVELALL 100 ونفس كذا لكن ماضبط
  6. exports.guimessages:outputServer(root,"#FFFFFF* [ #ff0000Server.Owner ]:#FFFFCC".. getPlayerName ( source ) ..": #FFB700"..msg,255,255,255)
  7. z24d

    Helloguys?

    السلام عليكم ابي اعدل علا الادمنية بحيث اني اذا عطيت احد رتبه يطلعله بالشات تم اعطائك الرتبه فلانه بن فلان وبص : ) ؟
  8. z24d

    cvz

    وشذي؟ GetElementChildren
  9. z24d

    cvz

    وش الأفضل للدي أكس ؟ من الرندر والبري رندر؟ + الكود ماله رب : ( ابيه طبلون لكن ماضبط
  10. z24d

    cvz

    + وش الفرق بين onClientRender+onClientPreRender?
  11. z24d

    cvz

    function getElementSpeed(theElement, unit) -- Check arguments for errors assert(isElement(theElement), "Bad argument 1 @ getElementSpeed (element expected, got " .. type(theElement) .. ")") assert(getElementType(theElement) == "player" or getElementType(theElement) == "ped" or getElementType(theElement) == "object" or getElementType(theElement) == "vehicle", "Invalid element type @ getElementSpeed (player/ped/object/vehicle expected, got " .. getElementType(theElement) .. ")") assert((unit == nil or type(unit) == "string" or type(unit) == "number") and (unit == nil or (tonumber(unit) and (tonumber(unit) == 0 or tonumber(unit) == 1 or tonumber(unit) == 2)) or unit == "m/s" or unit == "km/h" or unit == "mph"), "Bad argument 2 @ getElementSpeed (invalid speed unit)") -- Default to m/s if no unit specified and 'ignore' argument type if the string contains a number unit = unit == nil and 0 or ((not tonumber(unit)) and unit or tonumber(unit)) -- Setup our multiplier to convert the velocity to the specified unit local mult = (unit == 0 or unit == "m/s") and 50 or ((unit == 1 or unit == "km/h") and 180 or 111.84681456) -- Return the speed by calculating the length of the velocity vector, after converting the velocity to the specified unit return (Vector3(getElementVelocity(theElement)) * mult).length end local screenW, screenH = guiGetScreenSize() addEventHandler("onClientRender", root, function() if isPedInVehicle(source) then local elementSpeed = getElementSpeed(source, km/h) dxDrawText("Your Speed:"..elementSpeed, screenW * 0.7680, screenH * 0.9245, screenW * 0.9969, screenH * 0.9805, tocolor(48, 255, 0, 255), 1.50, "pricedown", "left", "top", false, false, false, true, false) end end ) ? فين البربلم؟ التكست مايطلع
  12. z24d

    ?

    Sankth fery msht
  13. z24d

    ?

    اها يعني v[1] = 'NameVehicle' ? v[2] = ID?
  14. z24d

    ?

    لا ابيالاسماء من عندي مثلاً Veh = { "Caprice",411 "Accord",419 } يعني كذا
  15. z24d

    ?

    انا مسوي جدول مثلن ومسويه بهذي الطريقة Veh = { "name",id "name",id } ماعرف : ( كيف اخلي الكلومن يطلع اسم بدال ايدي شلون اسوي الكود؟
  16. z24d

    ?

    اعرف بس طريقة الجداول بالقريد ماعرفها
  17. z24d

    ?

    السلام عليكم ابي اسوي قريد لست فيها سيارات ؟ شلون واذا ضغط مرتين علا السطر يعطيه السيارة
  18. z24d

    Question ?

    مايعطي فلوس
  19. z24d

    Question ?

    مايعطي الاعب فلوس
  20. z24d

    Question ?

    addCommandHandler('GIFT', function ( player ) if ( not isGuestAccount ( getPlayerAccount ( player ) ) ) then if ( not getAccountData ( getPlayerAccount ( player ) , 'r8' ) ) then givePlayerMoney ( player , amount ) exports.killmessages:outputMessage("Congratolation * #00FF00[ "..getPlayerName(player).."#00FF00 ]#FFFF00 استلم الهدية ",root,255,255,0) setAccountData ( getPlayerAccount ( player ) , 'r8', true ) else outputChatBox('* لقد اخذت مسبقاً ',player,0,255,0,true) end else outputChatBox('* الرجأء تسجيل الدخول !',player,255,0,0,true) end end ) addCommandHandler ( "12", function (player,_,amount) local aa = getPlayerAccount(player) if not isGuestAccount(aa) then if (isObjectInACLGroup("user."..getAccountName(aa),aclGetGroup("Console"))) then exports.killmessages:outputMessage( "* #FFFFFF[#CC0000 Server.Owner #FFFFFF] [ "..getPlayerName(player).." #FFFFFF] #00FFFF( #00FF00[ GIFT ]بدأ توزيع جديد لإستلام التوزيع اكتب في اف8 #00FFFF) ["..amount.."]" ,root, 255,0,0) for i,v in ipairs ( getAccounts() ) do setAccountData( v , "r8" , false ) end else outputChatBox("#FF0000 Please Login First",source,255,0,0) end end end ) مازبط؟
  21. z24d

    Question ?

    مشكور بس ابي الفلوس بالكوماند الثاني يعني اكتب giveall 12319237 يطلع بالجيو الرسالة عرفت كيف ويستلمها الاعب
  22. z24d

    Question ?

    يعطيك العافيةة# الكود الي فوق شيك عليه لاهنت /:
  23. z24d

    Question ?

    addCommandHandler('GIFT', function ( player ) -- givePlayerMoney ( player , amount ) -- -- else -- end else -- end end ) addCommandHandler ( "giveall", function (player,amount) -- if (isObjectInACLGroup("user."..getAccountName(aa),aclGetGroup("Console"))) then exports.killmessages:outputMessage( "* #FFFFFF[#CC0000 Server.Owner #FFFFFF] [ "..getPlayerName(player).." #FFFFFF] #00FFFF( #00FF00[ GIFT ]بدأ توزيع جديد لإستلام التوزيع اكتب في اف8 #00FFFF) ["..amount.."]" ,root, 255,0,0) for i,v in ipairs ( getAccounts() ) do setAccountData( v , "r8" , false ) end else -- end end end ) شلون اخلي كذاا giveall amount بدال amount العدد؟
  24. z24d

    Question ?

    سفاح ممكن سكايبك او اي مبرمج؟
×
×
  • Create New...