Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- wait();
- script:destroy();
- local Player=owner or game:service'Players':findFirstChild'Dripee'
- if(not Player or not Player:findFirstChild'PlayerGui')then error'User does not exist or lacks a PlayerGui.';end;
- local Decrypt;
- local Sites={
- blockJunk='9758b1e6ad4f8719072122731906762bf134efc1fa05bcc4aa294bc8054d048605e7e8af56fd9f94a652e632bc917f49cb5c11bbdc1b9c4f8c6ed25e487b7bf2610ce06fc608';
- };
- function gA(http)
- return game:service'HttpService':GetAsync("http://"..http)
- end
- function Decrypt(cipher, key)
- local key_bytes
- if type(key) == "string" then
- key_bytes = {}
- for key_index = 1, #key do
- key_bytes[key_index] = string.byte(key, key_index)
- end
- else
- key_bytes = key
- end
- local cipher_raw_length = #cipher
- local key_length = #key_bytes
- local cipher_bytes = {}
- local cipher_length = 0
- local cipher_bytes_index = 1
- for byte_str in string.gmatch(cipher, "%x%x") do
- cipher_length = cipher_length + 1
- cipher_bytes[cipher_length] = tonumber(byte_str, 16)
- end
- local random_bytes = {}
- local random_seed = 0
- for key_index = 1, key_length do
- random_seed = (random_seed + key_bytes[key_index] * key_index) * 1103515245 + 12345
- random_seed = (random_seed - random_seed % 65536) / 65536
- end
- for random_index = 1, (cipher_length - key_length + 1) * key_length do
- random_seed = (random_seed * 1103515245 + 12345) % 4294967296
- random_bytes[random_index] = (random_seed - random_seed % 65536) / 65536 % 256
- end
- local random_index = #random_bytes
- local last_key_byte = key_bytes[key_length]
- local result_bytes = {}
- for cipher_index = cipher_length, key_length, -1 do
- local result_byte = cipher_bytes[cipher_index] - last_key_byte
- if result_byte < 0 then
- result_byte = result_byte + 256
- end
- result_byte = result_byte - random_bytes[random_index]
- random_index = random_index - 1
- if result_byte < 0 then
- result_byte = result_byte + 256
- end
- for key_index = key_length - 1, 1, -1 do
- cipher_index = cipher_index - 1
- local cipher_byte = cipher_bytes[cipher_index] - key_bytes[key_index]
- if cipher_byte < 0 then
- cipher_byte = cipher_byte + 256
- end
- cipher_byte = cipher_byte - result_byte
- if cipher_byte < 0 then
- cipher_byte = cipher_byte + 256
- end
- cipher_byte = cipher_byte - random_bytes[random_index]
- random_index = random_index - 1
- if cipher_byte < 0 then
- cipher_byte = cipher_byte + 256
- end
- cipher_bytes[cipher_index] = cipher_byte
- end
- result_bytes[cipher_index] = result_byte
- end
- local result_characters = {}
- for result_index = 1, #result_bytes do
- result_characters[result_index] = string.char(result_bytes[result_index])
- end
- return table.concat(result_characters)
- end
- function randomWord(min, max)
- local vowels = {"a", "e", "i", "o", "u"}
- local consanents = {"b", "c", "d", "f", "g", "h", "i", "j", "k", "l", "m", "n", "p", "q", "r", "s", "t", "v", "w", "x", "y", "z"}
- local string = ""
- local length = math.random(min, max)
- local first_letter = string.upper(consanents[math.random(1, #consanents)])
- string = string..first_letter
- local current = 0
- local next_letter = ""
- for i = 0, length do
- if current == 0 then
- next_letter = vowels[math.random(1, #vowels)]
- current = 1
- else
- next_letter = consanents[math.random(1, #consanents)]
- if next_letter == "q" then
- next_letter = "qu"
- end
- current = 0
- end
- string = string..next_letter
- end
- return string
- end
- if(Player.PlayerGui:findFirstChild'\5\6K\5F\127R\5\127')then error'Script already running. Cancelling...';return;end;
- local MF=Instance.new('TextBox',Instance.new('ScreenGui',Player.PlayerGui));
- MF.Parent.Name='\5\6K\5F\127R\5\127';
- for i = 1,50 do
- t = Instance.new("TextBox",MF.Parent)
- t.Name = "MFG"
- t.Visible = false;
- t.Text = "key;"..randomWord(1,100)
- end
- MF.Name='MFG';
- F = Instance.new("Frame",MF.Parent)
- F.Size = UDim2.new(1,0,1,0)
- F.Style = "DropShadow"
- MF.BackgroundColor3=Color3.new(.196,.196,.196);
- MF.BackgroundTransparency=.6;
- MF.BorderColor3=Color3.new(.039,.039,.039);
- MF.BorderSizePixel=2;
- MF.Position=UDim2.new(0.5, -250,0.5, -250);
- MF.Size=UDim2.new(.25,0,.05);
- MF.ZIndex=10;
- MF.FontSize='Size12';
- MF.Text='Type your key, with a hash at the end, here...';
- MF.TextColor3=Color3.new(1,1,1);
- MF.TextWrapped=true;
- MF.TextStrokeTransparency=.9;
- MF.TextStrokeColor3=Color3.new(1,1,1);
- repeat until coroutine.yield()and MF.Text:find("#");
- Key=MF.Text:gsub('#','',1);
- MF.Text = "Checking key..."
- wait(2)
- local TK = Decrypt(Sites.blockJunk,Key)
- local Data = gA("blockjunk.x10.mx/test.php?key="..TK)
- if Data ~= "Sorry, you did not enter a valid key, contact Dripee!" then
- NS(Data,workspace)
- MF.Text = "Success!"
- MF:tweenSize(UDim2.new(0,0,.05),'Out','Sine');
- F:tweenSize(UDim2.new(0,0,.05),'Out','Sine');
- wait(1);
- MF:tweenPosition(UDim2.new(1,0,.8),'Out','Sine',.5);
- F:tweenPosition(UDim2.new(1,0,.8),'Out','Sine',.5);
- wait(.5);
- MF.Parent:destroy();
- else
- MF.Text = "Sorry, you have entered a false key!"
- MF:tweenSize(UDim2.new(0,0,.05),'Out','Sine');
- F:tweenSize(UDim2.new(0,0,.05),'Out','Sine');
- wait(1);
- MF:tweenPosition(UDim2.new(1,0,.8),'Out','Sine',.5);
- F:tweenPosition(UDim2.new(1,0,.8),'Out','Sine',.5);
- wait(.5);
- MF.Parent:destroy();
- end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement