TopGEOYT Posted September 7, 2018 Share Posted September 7, 2018 Help me . I need to get this script with decrypted version. I don't have pc so I can't decrypt it bcs unluac need pc for decrypt binary script pls decrypt this.lua Link to comment Share on other sites More sharing options...
0 Tis_ Posted September 7, 2018 Share Posted September 7, 2018 2 hours ago, TopGEOYT said: Giúp tôi . Tôi cần lấy tập lệnh này với phiên bản đã được giải mã. Tôi không có máy tính vì vậy tôi không thể giải mã nó bcs unluac cần máy tính để giải mã kịch bản nhị phân xin giải mã this.lua That's my phone pls decrypt this_dec.๖ۣۜTis Link to comment Share on other sites More sharing options...
0 TopGEOYT Posted September 8, 2018 Author Share Posted September 8, 2018 7 hours ago, Tis_ said: That's my phone pls decrypt this_dec.๖ۣۜTis Thanks for try. But I need just clearly decryption Link to comment Share on other sites More sharing options...
0 Tis_ Posted September 8, 2018 Share Posted September 8, 2018 2 hours ago, TopGEOYT said: Thanks for try. But I need just clearly decryption Why do you just love to copy and do not want to edit it yourself? 1 Link to comment Share on other sites More sharing options...
0 TopGEOYT Posted September 8, 2018 Author Share Posted September 8, 2018 57 minutes ago, Tis_ said: Why do you just love to copy and do not want to edit it yourself? I just only want to teach high scripting -1 Link to comment Share on other sites More sharing options...
0 lucbyme Posted September 30, 2018 Share Posted September 30, 2018 if gg.isVisible(true) then gg.setVisible(false) end gg.clearResults() kele0 = 0 Qjctx = 1 function main() HDmenu = gg.choice({ "Encrypt Script", "Decompile Script", "Exit" }, Lasttl, "Script Manager v1.0 Made By Chikri") if HDmenu == 1 then boi(Chikri) end if HDmenu == 2 then decompile(Chikri) end if HDmenu == 3 then exit(Chikri) end Qjctx = -1 end function boi(_ARG_0_) do info = gg.prompt({ "Select Script To Encrypt:" }, { (gg.getFile()) }, {"file"}) if info == nil then end function Ecrypt(_ARG_0_) do return _ARG_0_:gsub(".", function(_ARG_0_) do return string.format("%02X", (string.byte(_ARG_0_) + 13 + _UPVALUE1_[1]) % 256) end end):gsub(" ", "+") end end assert((io.open(info[1], "r"))) io.open(info[1], "r"):close() gg.alert("The encrypted script is saved to the file:\n" .. info[1] .. ".chikrienc.ua") c = Ecrypt((io.open(info[1], "r"):read("*a"))) d = "--Encryptor Made By Chikri\nprint('Script Encryptor Made By Chikri')\nfunction encodes(key,code)\n return (code:gsub('..', function (h) return string.char((tonumber(h,16)+256-13 - key + 999999*256)%256) end))\nend\nlocal v_value=gg.prompt({'Enter password'},{[1]=0},{[1]='number'})\ngg.toast('Loading\226\128\166\226\128\166')\npcall(encodes(v_value[1],'technano'))\nlocal data = encodes(v_value[1],'technano')\nlocal enc = load(data)\npcall(enc)\n" d = string.gsub(d, "technano", c) io.open(info[1] .. ".chikrienc.ua", "w"):write(d) io.open(info[1] .. ".chikrienc.ua", "w"):close() function decompile(_ARG_0_) do multi = gg.choice({ "Decrypt Without Knowing The Password", "Decrypt with The Password", "Get Functions Actions (Snoop)" }, nil, "GG Decompiler Tool by Chikri And DJ") ishook = false if multi == 1 then gg.toast("Yay") end if multi == 2 then gg.toast("Yay") end if multi == 3 then gg.toast("Yay") ishook = true end script_file = gg.prompt({ "Locate Script:" }, { gg.getFile():match("(.*/).*") .. "vip/test.lua" }, {"file"}) code = "" function new_load(_ARG_0_) do if string.match(_ARG_0_, "gg.choice") then code = _ARG_0_ end end end ggvar = {} ggreg = {} for _FORV_7_, _FORV_8_ in pairs(gg) do if string.match(_FORV_7_, "REGION") then ggreg[_FORV_8_] = "gg." .. _FORV_7_ end if string.match(_FORV_7_, "_") and not string.match(_FORV_7_, "REGION") then ggvar[_FORV_8_] = "gg." .. _FORV_7_ end end function new_result(_ARG_0_) do print(string.format("var = gg.getResults(%s)", _ARG_0_)) res = {} for _FORV_4_ = _ARG_0_, 1, -1 do res[_FORV_4_] = {} end return _FOR_ end end function new_edit(...) ok = "" a = 1 for _FORV_4_, _FORV_5_ in pairs({ ... }) do hey = tostring(_FORV_5_) if a == 1 then ok = ok .. "\"" .. hey .. "\"" .. "," elseif a ~= #{ ... } and ggvar[_FORV_5_] and _FORV_5_ ~= 0 then ok = ok .. ggvar[_FORV_5_] .. "," elseif a == #{ ... } and ggvar[_FORV_5_] and _FORV_5_ ~= 0 then ok = ok .. ggvar[_FORV_5_] elseif a == #{ ... } then ok = ok .. hey else ok = ok .. hey .. "," end a = a + 1 end print(string.format("gg.editAll(%s)", ok)) return true end function new_search(...) ok = "" a = 1 for _FORV_4_, _FORV_5_ in pairs({ ... }) do hey = tostring(_FORV_5_) if a == 1 then ok = ok .. "\"" .. hey .. "\"" .. "," elseif a ~= #{ ... } and ggvar[_FORV_5_] and _FORV_5_ ~= 0 then ok = ok .. ggvar[_FORV_5_] .. "," elseif a == #{ ... } and ggvar[_FORV_5_] and _FORV_5_ ~= 0 then ok = ok .. ggvar[_FORV_5_] elseif a == #{ ... } then ok = ok .. hey else ok = ok .. hey .. "," end a = a + 1 end print(string.format("gg.searchNumber(%s)", ok)) return true end function new_clear() print("gg.clearResults()") return true end function new_getrange() print("var = gg.getRanges()") return true end function new_setrange(_ARG_0_) do if ggreg[_ARG_0_] then print("-- normal range") print(string.format("gg.setRanges(%s)", ggreg[_ARG_0_])) elseif type(_ARG_0_) == "boolean" then print("-- restore via var") print("gg.setRanges(var)") else print("-- bxor auto calculated") print(string.format("gg.setRanges(%d)", _ARG_0_)) end return false end end function new_add(_ARG_0_) do t = "" for _FORV_4_, _FORV_5_ in pairs(_ARG_0_) do if _FORV_5_.address then t = t .. "var[" .. _FORV_4_ .. "].address = " .. _FORV_5_.address .. "\n" end if _FORV_5_.value then t = t .. "var[" .. _FORV_4_ .. "].value = " .. _FORV_5_.value .. "\n" end if _FORV_5_.freeze ~= nil then t = t .. "var[" .. _FORV_4_ .. "].freeze = " .. tostring(_FORV_5_.freeze) .. "\n" end if _FORV_5_.freezeType then t = t .. "var[" .. _FORV_4_ .. "].freezeType = " .. ggvar[_FORV_5_.freezeType] .. "\n" end end print(t) print("gg.addListItems(var)") return true end end function nprint(_ARG_0_, _ARG_1_) do if _ARG_1_ then return false end end end print = (function(_ARG_0_, _ARG_1_) do {}.replace = {_ARG_1_} {}.origin = _ARG_0_ setmetatable({}, { __call = function(_ARG_0_, ...) do if { _UPVALUE0_(_UPVALUE1_, ...) } ~= nil and #{ _UPVALUE0_(_UPVALUE1_, ...) } > 0 then return _UPVALUE2_.table.unpack({ _UPVALUE0_(_UPVALUE1_, ...) }) end return _UPVALUE1_.origin(...) end end }) return {} end end)(print, nprint) if ishook then gg.searchNumber = (function(_ARG_0_, _ARG_1_) do {}.replace = {_ARG_1_} {}.origin = _ARG_0_ setmetatable({}, { __call = function(_ARG_0_, ...) do if { _UPVALUE0_(_UPVALUE1_, ...) } ~= nil and #{ _UPVALUE0_(_UPVALUE1_, ...) } > 0 then return _UPVALUE2_.table.unpack({ _UPVALUE0_(_UPVALUE1_, ...) }) end return _UPVALUE1_.origin(...) end end }) return {} end end)(gg.searchNumber, new_search) gg.getResults = (function(_ARG_0_, _ARG_1_) do {}.replace = {_ARG_1_} {}.origin = _ARG_0_ setmetatable({}, { __call = function(_ARG_0_, ...) do if { _UPVALUE0_(_UPVALUE1_, ...) } ~= nil and #{ _UPVALUE0_(_UPVALUE1_, ...) } > 0 then return _UPVALUE2_.table.unpack({ _UPVALUE0_(_UPVALUE1_, ...) }) end return _UPVALUE1_.origin(...) end end }) return {} end end)(gg.getResults, new_result) gg.editAll = (function(_ARG_0_, _ARG_1_) do {}.replace = {_ARG_1_} {}.origin = _ARG_0_ setmetatable({}, { __call = function(_ARG_0_, ...) do if { _UPVALUE0_(_UPVALUE1_, ...) } ~= nil and #{ _UPVALUE0_(_UPVALUE1_, ...) } > 0 then return _UPVALUE2_.table.unpack({ _UPVALUE0_(_UPVALUE1_, ...) }) end return _UPVALUE1_.origin(...) end end }) return {} end end)(gg.editAll, new_edit) gg.clearResults = (function(_ARG_0_, _ARG_1_) do {}.replace = {_ARG_1_} {}.origin = _ARG_0_ setmetatable({}, { __call = function(_ARG_0_, ...) do if { _UPVALUE0_(_UPVALUE1_, ...) } ~= nil and #{ _UPVALUE0_(_UPVALUE1_, ...) } > 0 then return _UPVALUE2_.table.unpack({ _UPVALUE0_(_UPVALUE1_, ...) }) end return _UPVALUE1_.origin(...) end end }) return {} end end)(gg.clearResults, new_clear) gg.setRanges = (function(_ARG_0_, _ARG_1_) do {}.replace = {_ARG_1_} {}.origin = _ARG_0_ setmetatable({}, { __call = function(_ARG_0_, ...) do if { _UPVALUE0_(_UPVALUE1_, ...) } ~= nil and #{ _UPVALUE0_(_UPVALUE1_, ...) } > 0 then return _UPVALUE2_.table.unpack({ _UPVALUE0_(_UPVALUE1_, ...) }) end return _UPVALUE1_.origin(...) end end }) return {} end end)(gg.setRanges, new_setrange) gg.getRanges = (function(_ARG_0_, _ARG_1_) do {}.replace = {_ARG_1_} {}.origin = _ARG_0_ setmetatable({}, { __call = function(_ARG_0_, ...) do if { _UPVALUE0_(_UPVALUE1_, ...) } ~= nil and #{ _UPVALUE0_(_UPVALUE1_, ...) } > 0 then return _UPVALUE2_.table.unpack({ _UPVALUE0_(_UPVALUE1_, ...) }) end return _UPVALUE1_.origin(...) end end }) return {} end end)(gg.getRanges, new_getrange) gg.addListItems = (function(_ARG_0_, _ARG_1_) do {}.replace = {_ARG_1_} {}.origin = _ARG_0_ setmetatable({}, { __call = function(_ARG_0_, ...) do if { _UPVALUE0_(_UPVALUE1_, ...) } ~= nil and #{ _UPVALUE0_(_UPVALUE1_, ...) } > 0 then return _UPVALUE2_.table.unpack({ _UPVALUE0_(_UPVALUE1_, ...) }) end return _UPVALUE1_.origin(...) end end }) return {} end end)(gg.addListItems, new_add) else load = (function(_ARG_0_, _ARG_1_) do {}.replace = {_ARG_1_} {}.origin = _ARG_0_ setmetatable({}, { __call = function(_ARG_0_, ...) do if { _UPVALUE0_(_UPVALUE1_, ...) } ~= nil and #{ _UPVALUE0_(_UPVALUE1_, ...) } > 0 then return _UPVALUE2_.table.unpack({ _UPVALUE0_(_UPVALUE1_, ...) }) end return _UPVALUE1_.origin(...) end end }) return {} end end)(load, new_load) end if loadfile(script_file[1]) then loadfile(script_file[1])() else print("cant open") end if ishook == false then if code ~= "" or code ~= nil then print(code) else gg.alert("sorry fail try other options") function exit(_ARG_0_) do gg.alert("GameGuardian Script Tool Made By Chikri") os.exit() end end end end end end end end while true do if gg.isVisible(true) then Qjctx = 1 gg.setVisible(false) end if Qjctx == 1 then main() end end Link to comment Share on other sites More sharing options...
0 Denver200 Posted October 1, 2018 Share Posted October 1, 2018 On 9/8/2018 at 4:44 AM, Tis_ said: That's my phone pls decrypt this_dec.๖ۣۜTis Can you decipher this script? YIC new script v1.29 (1).lua Link to comment Share on other sites More sharing options...
0 Tis_ Posted October 1, 2018 Share Posted October 1, 2018 https://t.me/tisnquyen/259 Link to comment Share on other sites More sharing options...
0 Denver200 Posted October 1, 2018 Share Posted October 1, 2018 55 minutes ago, Tis_ said: https://t.me/tisnquyen/259 But these files, there seems to be a profile entry system. 11.lua Link to comment Share on other sites More sharing options...
0 zahi Posted October 16, 2018 Share Posted October 16, 2018 On 10/1/2018 at 4:47 PM, Tis_ said: https://t.me/tisnquyen/259 u can decrypt this file? Simple_Hack_V.3.1 (1).lua Link to comment Share on other sites More sharing options...
0 Affann Posted July 27, 2019 Share Posted July 27, 2019 On 10/16/2018 at 4:58 PM, zahi said: u can decrypt this file? Simple_Hack_V.3.1 (1).lua Outdated script so here it is [Dec].lua Link to comment Share on other sites More sharing options...
Question
TopGEOYT
Help me . I need to get this script with decrypted version.
I don't have pc so I can't decrypt it bcs unluac need pc for decrypt binary script
pls decrypt this.lua
Link to comment
Share on other sites
10 answers to this question
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now