@Matt
Try this one, using it on my characters and it works just great! (it was included in one of ozzix scripts so i guess the credits goes to him)
init start
-- local SCRIPT_VERSION = '1.0.1'
-- screenshot options
local saveOriginal = false -- save full original, unaltered screenshot
local createWorldVersion = true -- create a version of the screenshot that only shows the world area
local createFullVersion = false -- create a version of the screenshot that shows the whole client
local focusClient = true -- focus client before taking the screenshot
local drawHuds = true -- if desktop composition is enabled (Windows Vista, 7 or 8), draw HUDs on SS
local relocateHuds = true -- draws the huds at a custom location on the screenshot (need desktop composition enabled)
local compressionQuality = 100 -- file compression rate, values ranging from 1 to 100
-- hud locations, relative to world window. negative coordinates will be right / bottom aligned
local relocateLocations = {
{ name = "GeneralInfo", x = 4, y = -20 },
{ name = "MonitorMyStats", x = 0, y = 0 },
{ name = "MonitorMyHunting", x = - 242, y = 0 },
}
-- alteration options
local showEquipment = true -- show your character equipment on world screenshot
local hidePersonalInfo = false -- hide personal info on screenshot (character name)
local hideHudInfo = false -- hide personal info on HUD (must be supported by HUD)
-- technical settings
local hideMethod = "both" -- "shuffle" = shuffle pixels, "blur" = blur region, "both" = both (strongest)
local textSearchTolerance = 30 -- how many % of the text for hiding we want to can be obstructed (by other text on top)
-- internal setup (don't change below)
-- note: textures/child_huds get rendered in the order
-- they were created and not selected, needs fixing
local glowTexture = createtexture()
local clientTexture = createtexture()
local shotTexture = createtexture()
local glowRendered = false
local takeScreenshot = false
local fileName = 'smartss'
local function renderglow()
local rectSize = 34
local glowSize = 4
local fullSize = glowSize + rectSize + glowSize
-- leave space for glow on edges
selecthud(glowTexture)
setfixedsize(fullSize, fullSize)
-- fill with transparent color
setbordercolor(-1)
setfillstyle("color", -1)
drawrect(0, 0, fullSize, fullSize)
-- black rect in center
setfillstyle("color", 0x80000000)
drawrect(glowSize, glowSize, rectSize-1, rectSize-1)
-- apply glow around rect
drawgloweffect(0x000000, glowSize)
--hudsnapshot("glow", 100)
end
local function copyequip()
local slotLocations = {37, 2, 0, 16, 74, 16, 37, 39, 74, 53, 0, 53, 37, 76, 37, 113, 0, 90, 74, 90}
local equipx, equipy = getwindowpos("equip")
if equipx ~= nil then
local destx = $worldwin.width - 123 - 16
local desty = $worldwin.height - 155 - 16
for i=1,10 do
local slotx = 10 + slotLocations[i*2-1]
local sloty = 4 + slotLocations[i*2]
-- copy equip slot
setcompositionmode(CompositionMode_Automatic)
drawtexture(clientTexture, destx+slotx, desty+sloty, 100, equipx - $clientwin.x + slotx, equipy - $clientwin.y + sloty, 34, 34)
end
end
end
local function hideregion(r)
if hideMethod == "shuffle" or hideMethod == "both" then
drawshufflepixelseffect(r.left, r.top, r.width, r.height)
end
if hideMethod == "blur" or hideMethod == "both" then
drawblureffect(r.left, r.top, r.width, r.height, 8, 2)
end
end
local function takeshot()
if hudready(clientTexture) and hudready(shotTexture) and hudready(glowTexture) then
local worldx = $worldwin.x - $clientwin.x
local worldy = $worldwin.y - $clientwin.y
local worldw = $worldwin.width
local worldh = $worldwin.height
if saveOriginal then
hudsnapshot(fileName .. ".original", compressionQuality)
end
-- hide information
if hidePersonalInfo then
-- hide name in chat text in world window ($name says:)
hideclienttext($name, worldx, worldy, worldw, worldh, true, hideMethod, 8, 2, textSearchTolerance)
if createFullVersion then
-- hide name in chat window
hideclienttext($name, 0, worldy + worldh + 62, -194, -22, false, hideMethod, 8, 2)
-- hide private channel names
foreach channel c do
if c.outid > 6 then
hideclienttext(c.name, 0, worldy + worldh + 44, -194, 16, true, hideMethod, 8, 2)
end
end
end
-- hide name above char, in case the other way failed (text/other names on top?)
local r = getnamearea($self, worldw, worldh)
if r then
-- map to client coordinates, and expand
r.left = r.left + worldx
r.top = r.top + worldy + 1
r.width = r.width + 1
r.height = r.height + 2
-- hide the region
hideregion(r)
end
end
if drawHuds and not $windowsxp then
-- draw huds transparently
setcompositionmode(CompositionMode_SourceOver)
local i = 0
while isscript("display", i) do
local listname = scriptlistname("display", i)
local x = nil
local y = nil
if relocateHuds then
for _, h in ipairs(relocateLocations) do
if h.name == listname then
if h.x < 0 then x = worldx + worldw + h.x else x = worldx + h.x end
if h.y < 0 then y = worldy + worldh + h.y else y = worldy + h.y end
end
end
end
grabhud(listname, x, y)
i = i + 1
end
-- restore changed defaults
setcompositionmode(CompositionMode_Automatic)
end
-- draw windbot logo
setcompositionmode(CompositionMode_SourceOver)
Screenshot takers are still pissing me off.. can't get them to take pics with the eq and all on advancements. Got sstaker enabled and all, idk what it is.
@glowingstick thanks, tried it one 1 char didn't work. I have other scripts with working ss takers just gotta take them from there
Do you have both the SSTaker HUD and another persistant with smartscreenshot()?
06-17-2015, 04:38 PM
RoxZin xD
You got too used to the screenshot taker my scripts have :rolleyes:
06-17-2015, 08:10 PM
Matt
Quote:
Originally Posted by RoxZin xD
You got too used to the screenshot taker my scripts have :rolleyes:
pretty much!! LOL
anyways 160rp and 150ms got deleted too... So if anyone wants to buy 320ed and 180ms msg me LOL
06-18-2015, 12:39 AM
loiki
How many chars have you lost already?
06-18-2015, 12:57 AM
Matt
Quote:
Originally Posted by loiki
How many chars have you lost already?
let's just say iv'e lost more in the past month than I ever did in the past 2 years :cool:
06-18-2015, 02:39 AM
lipexh
i guess you should be included in guiness book, often i see some reply you saying lost some character :( i dont know how you keep doing it, i've lost few facc and im sad (true charlover lol)