Jump to content

Timic

Members
  • Posts

    169
  • Joined

  • Last visited

Everything posted by Timic

  1. Where can I get these data files?
  2. It is an ERROR: "Load failed. Please ensure that the data files have been installed correctly"
  3. Man, this is AWESOME Where I download it ?
  4. Try this addEvent("onMapStarting") function recover(playerSource) if (isGuestAccount(getPlayerAccount(playerSource)) == false) then accountname = getAccountName (getPlayerAccount(playerSource)) if isObjectInACLGroup ( "user." .. accountname, aclGetGroup ( "Admin" ) ) then executeSQLDropTable("DMPoints") outputChatBox("Successfully Recovered. Please restart the resource. /restart points") end end end addCommandHandler("recover",recover) function createTables() executeSQLCreateTable("DMPoints","serial STRING,points INT") outputChatBox("Points System by -[xXx]-Pr0RaC3R version 0.1 started!", getRootElement(), 255,140,0) outputChatBox("Points database is successfully loaded.", getRootElement(), 255,140,0) end addEventHandler("onResourceStart", getResourceRootElement(getThisResource()), createTables) function ClientReady(g_player) local serial = getPlayerSerial(g_player) local playername = getPlayerName(g_player) CheckPlayer = executeSQLSelect ( "DMPoints", "serial", "serial = '" .. serial .. "'" ) outputChatBox("Now we have retrieved the rows from a table.") if ( type( CheckPlayer ) == "table" and #CheckPlayer == 0 ) or not CheckPlayer then executeSQLInsert ( "DMPoints", "'"..serial.."','0'" ) outputChatBox("Rows are now really inserted.") end end addEvent("onClientReady",true) addEventHandler("onClientReady",getRootElement(),ClientReady) function stats(psource,cname,tplayer) if not getPlayerFromName(tplayer) then tplayer = psource else tplayer = getPlayerFromName(tplayer) end local serial = getPlayerSerial(tplayer) local Points = executeSQLSelect ( "DMPoints", "points","serial = '" .. serial .. "'") outputChatBox("Let's retrieve rows again. <!-- s:) --><img src=\"{SMILIES_PATH}/icon_smile.gif\" alt=\"\" title=\"Smile\" /><!-- s:) -->") outputChatBox(getPlayerName(tplayer).. "has:" ..Points.. "points.", getRootElement(), 255,140,0) end addCommandHandler("stats",stats) addCommandHandler("st",stats) function addPoints1(thePlayer, mapInfo, mapOptions, gameOptions) info = mapInfo.modename if mapInfo.modename == "Destruction derby" then local playername = getPlayerName(thePlayer) local serial = getPlayerSerial(thePlayer) local Points = executeSQLSelect ( "DMPoints", "points","serial = '" .. serial .. "'") outputChatBox("*Wins: "..playername.." took 10 Points for winning the match!",getRootElement(),255,255,0) Points = tonumber(Points[1]["points"]) + 10 setElementData(thePlayer ,"points", Points) setElementData(thePlayer ,"data.playername",playername,true) executeSQLUpdate ( "DMPoints", "points = '"..Points.."'","serial = '" .. serial .. "'") outputChatBox("Let's update our database. <!-- s:P --><img src=\"{SMILIES_PATH}/icon_razz.gif\" alt=\"\" title=\"Razz\" /><!-- s:P -->") end end function hunterPointsBonus(pickupID, pickupType, vehicleModel) if info == "Destruction derby" then if pickupType == "vehiclechange" then if vehicleModel == 425 then local serial = getPlayerSerial(source) local Points = executeSQLSelect ( "DMPoints", "points","serial = '" .. serial .. "'") outputChatBox("Now we are retrieving the rows from database again.") Points = tonumber(Points[1]["points"]) + 5 outputChatBox("*Hunter: "..getPlayerName(source).." gets a 5 points hunter bonus!",source,25,125,225) setElementData(source ,"points", Points) executeSQLUpdate ( "DMPoints", "points = '"..Points.."'","serial = '" .. serial .. "'") outputChatBox("Again some updating. <33") end end end end addEventHandler("onPlayerPickUpRacePickup",getRootElement(),hunterPointsBonus) function RespawnTime(mapInfo,mapOptions) mapinfo = mapInfo.modename respawntime = mapOptions.respawntime end addEventHandler("onMapStarting",getRootElement(),RespawnTime) addEventHandler("onResourceStart", getResourceRootElement(getThisResource()), function() exports.scoreboard:addScoreboardColumn("Points") end) addEventHandler ( "onPlayerJoin", getRootElement(), function() local serial = getPlayerSerial(source) local Points = executeSQLSelect ( "DMPoints", "points","serial = '" .. serial .. "'") setElementData(source, "points", tonumber(Points[1]["points"])) end) addEventHandler("onMapStarting", getRootElement() , addPoints1)
  5. Timic

    Drft Resource

    Is this whole code? Because i can't see onClientRender...
  6. Timic

    Save To Mysql

    saveElementData to save elementData's
  7. I will write you only for textib.lua: dxText = {} dxText_mt = { __index = dxText } local idAssign,idPrefix = 0,"c" local g_screenX,g_screenY = guiGetScreenSize() local visibleText = {} ------ defaults = { fX = 0.5, fY = 0.5, bRelativePosition = true, strText = "", bVerticalAlign = "center", bHorizontalAlign = "center", tColor = {0,255,0,255}, --Write your color here! (now is green) fScale = 1, strFont = "default", strType = "normal", tAttributes = {}, bPostGUI = false, bClip = false, bWordWrap = true, bVisible = true, tBoundingBox = false, --If a bounding box is not set, it will not be used. bRelativeBoundingBox = true, } local validFonts = { default = true, ["default-bold"] = true, clear = true, arial = true, pricedown = true, bankgothic = true, diploma = true, beckett = true, } local validTypes = { normal = true, shadow = true, border = true, stroke = true, --Clone of border } local validAlignTypes = { center = true, left = true, right = true, } function dxText:create( text, x, y, relative, strFont, fScale, horzA ) assert(not self.fX, "attempt to call method 'create' (a nil value)") if ( type(text) ~= "string" ) or ( not tonumber(x) ) or ( not tonumber(y) ) then outputDebugString ( "dxText:create - Bad argument", 0, 112, 112, 112 ) return false end local new = {} setmetatable( new, dxText_mt ) --Add default settings for i,v in pairs(defaults) do new[i] = v end idAssign = idAssign + 1 new.id = idPrefix..idAssign new.strText = text or new.strText new.fX = x or new.fX new.fY = y or new.fY if type(relative) == "boolean" then new.bRelativePosition = relative end new:scale( fScale or new.fScale ) new:font( strFont or new.strFont ) new:align( horzA or new.bHorizontalAlign ) visibleText[new] = true return new end function dxText:text(text) if type(text) ~= "string" then return self.strText end self.strText = text return true end function dxText:position(x,y,relative) if not tonumber(x) then return self.fX, self.fY end self.fX = x self.fY = y if type(relative) == "boolean" then self.bRelativePosition = relative else self.bRelativePosition = true end return true end function dxText:color(r,g,b,a) if not tonumber(r) then return unpack(self.tColor) end g = g or self.tColor[2] b = b or self.tColor[3] a = a or self.tColor[4] self.tColor = { r,g,b,a } return true end function dxText:scale(scale) if not tonumber(scale) then return self.fScale end self.fScale = scale return true end function dxText:visible(bool) if type(bool) ~= "boolean" then return self.bVisible end if self.bVisible == bool then return end self.bVisible = bool if bool then visibleText[self] = true else visibleText[self] = nil end return true end function dxText:destroy() self.bDestroyed = true setmetatable( self, self ) return true end function dxText:font(font) if not validFonts[font] then return self.strFont end self.strFont = font return true end function dxText:postGUI(bool) if type(bool) ~= "boolean" then return self.bPostGUI end self.bPostGUI = bool return true end function dxText:clip(bool) if type(bool) ~= "boolean" then return self.bClip end self.bClip = bool return true end function dxText:wordWrap(bool) if type(bool) ~= "boolean" then return self.bWordWrap end self.bWordWrap = bool return true end function dxText:type(type,...) if not validTypes[type] then return self.strType, unpack(self.tAttributes) end self.strType = type self.tAttributes = {...} return true end function dxText:align(horzA, vertA) if not validAlignTypes[horzA] then return self.bHorizontalAlign, self.bVerticalAlign end vertA = vertA or self.bVerticalAlign self.bHorizontalAlign, self.bVerticalAlign = horzA, vertA return true end function dxText:boundingBox(left,top,right,bottom,relative) if left == nil then if self.tBoundingBox then return unpack(boundingBox) else return false end elseif tonumber(left) and tonumber(right) and tonumber(top) and tonumber(bottom) then self.tBoundingBox = {left,top,right,bottom} if type(relative) == "boolean" then self.bRelativeBoundingBox = relative else self.bRelativeBoundingBox = true end else self.tBoundingBox = false end return true end addEventHandler ( "onClientRender", getRootElement(), function() for self,_ in pairs(visibleText) do while true do if self.bDestroyed then visibleText[self] = nil break end if self.tColor[4] < 1 then break end local l,t,r,b --If we arent using a bounding box if not self.tBoundingBox then --Decide if we use relative or absolute local p_screenX,p_screenY = 1,1 if self.bRelativePosition then p_screenX,p_screenY = g_screenX,g_screenY end local fX,fY = (self.fX)*p_screenX,(self.fY)*p_screenY if self.bHorizontalAlign == "left" then l = fX r = fX + g_screenX elseif self.bHorizontalAlign == "right" then l = fX - g_screenX r = fX else l = fX - g_screenX r = fX + g_screenX end if self.bVerticalAlign == "top" then t = fY b = fY + g_screenY elseif self.bVerticalAlign == "bottom" then t = fY - g_screenY b = fY else t = fY - g_screenY b = fY + g_screenY end elseif type(self.tBoundingBox) == "table" then local b_screenX,b_screenY = 1,1 if self.bRelativeBoundingBox then b_screenX,b_screenY = g_screenX,g_screenY end l,t,r,b = self.tBoundingBox[1],self.tBoundingBox[2],self.tBoundingBox[3],self.tBoundingBox[4] l = l*b_screenX t = t*b_screenY r = r*b_screenX b = b*b_screenY end local type,att1,att2,att3,att4,att5 = self:type() if type == "border" or type == "stroke" then att2 = att2 or 0 att3 = att3 or 0 att4 = att4 or 0 att5 = att5 or self.tColor[4] outlinesize = att1 or 2 if outlinesize > 0 then for offsetX=-outlinesize,outlinesize,outlinesize do for offsetY=-outlinesize,outlinesize,outlinesize do if not (offsetX == 0 and offsetY == 0) then dxDrawText(self.strText, l + offsetX, t + offsetY, r + offsetX, b + offsetY, tocolor(att2, att3, att4, att5), self.fScale, self.strFont, self.bHorizontalAlign, self.bVerticalAlign, self.bClip, self.bWordWrap, self.bPostGUI ) end end
  8. Go on browse list then search for your server.
  9. Timic

    WTF?!

    Fixed! Lock Topic
  10. Timic

    WTF?!

    This is for race gamemode, but when i login as an admin I see random color (It is for car)
  11. Just edit your 'race_client.lua' and 'textlib.lua'.
  12. Timic

    WTF?!

    Hi, I have problem -.- WHY THIS COULDNT WORK?! EDIT: It is fixed! Please lock topic
  13. client-only: https://wiki.multitheftauto.com/wiki/TriggerServerEvent server-only: https://wiki.multitheftauto.com/wiki/TriggerClientEvent
  14. Timic

    Achievement

    Did you try debugging?
  15. There are 'MySQL' functions https://wiki.multitheftauto.com/wiki/Mysql
  16. Just delete the line 325 and replace it with if self.startshow then
  17. Isn't hunter times working only on DM maps?
  18. Timic

    Hydra Movie

    Wow, n1 XzibiT You are awesome. wiie
×
×
  • Create New...