View difference between Paste ID: Um7jNcJh and QJXWtq0k
SHOW: | | - or go back to the newest paste.
1
if game:GetService("CoreGui"):FindFirstChild("ow menu | Premium Panel v0.0.1") then
2
    require(game:GetService("ReplicatedStorage").Framework.Modules.Client["5 | Message"]).New("Another menu is found. \n Please execute again.")
3
        for i = 0,5 do
4
            game:GetService("CoreGui")["ow menu | Premium Panel v0.0.1"]:Destroy()
5
        end
6
elseif not game:GetService("CoreGui"):FindFirstChild("ow menu | Premium Panel v0.0.1") then
7
    print("Starting.. All seems fine.")
8
end
9
--------------------------
10
require(game:GetService("ReplicatedStorage").Framework.Modules.Client["5 | Message"]).New("Press OK to start ow menu.")
11
12
if game.PlaceId == 6284583030 then
13
    local start = tick()
14
    repeat task.wait() until game:isLoaded()
15
    repeat task.wait() until game:GetService("Players")
16
    repeat task.wait() until game:GetService("Players").LocalPlayer
17
    repeat task.wait() until game:GetService("Players").LocalPlayer.Character:FindFirstChild("HumanoidRootPart")
18
    repeat task.wait() until game:GetService("Players").LocalPlayer.PlayerGui.Main.Enabled
19
    repeat task.wait() until game:GetService("Workspace"):FindFirstChild('__MAP')
20
end
21
22
23
-- init
24
local library = loadstring(game:HttpGet("https://raw.githubusercontent.com/inceldom/skid/main/guish.lua"))()
25
local venyx = library.new("ow menu | Premium Panel v0.0.1", 5013109572)
26
27
-- themes
28
local themes = {
29
Background = Color3.fromRGB(23, 0, 1),
30
Glow = Color3.fromRGB(255, 95, 95),
31
Accent = Color3.fromRGB(23, 0, 1),
32
LightContrast = Color3.fromRGB(44, 13, 19),
33
DarkContrast = Color3.fromRGB(23, 0, 1),  
34
TextColor = Color3.fromRGB(255, 105, 138)
35
}
36
37
38
local GC = getconnections or get_signal_cons
39
if GC then
40
    for i,v in pairs(GC(game.Players.LocalPlayer.Idled)) do
41
        if v["Disable"] then
42
            v["Disable"](v)
43
        elseif v["Disconnect"] then
44
            v["Disconnect"](v)
45
        end
46
    end
47
else
48
    print("Unlucky.")
49
    local vu = game:GetService("VirtualUser")
50
    game:GetService("Players").LocalPlayer.Idled:connect(function()
51
        vu:Button2Down(Vector2.new(0,0),workspace.CurrentCamera.CFrame)
52
        wait(1)
53
        vu:Button2Up(Vector2.new(0,0),workspace.CurrentCamera.CFrame)
54
    end)
55
end
56
57
58
59
-------------------------------------------------------------------------------------------------
60
61
--locales
62
63
local GameLibrary = require(game:GetService("ReplicatedStorage"):WaitForChild("Framework"):WaitForChild("Library"))
64
local Network = GameLibrary.Network
65
local Run_Service = game:GetService("RunService")
66
local rs = Run_Service.RenderStepped
67
local CurrencyOrder = {"Halloween Candy", "Tech Coins", "Fantasy Coins", "Coins", "Diamonds",}
68
69
local IMightKillMyselfCauseOfThis = {
70
        --Misc
71
        ['VIP'] = {'VIP'};
72
        --Spawn
73
        ['Town'] = {'Town', 'Town FRONT'};
74
        ['Forest'] = {'Forest', 'Forest FRONT'};
75
        ['Beach'] = {'Beach', 'Beach FRONT'};
76
        ['Mine'] = {'Mine', 'Mine FRONT'};
77
        ['Winter'] = {'Winter', 'Winter FRONT'};
78
        ['Glacier'] = {'Glacier', 'Glacier Lake'};
79
        ['Desert'] = {'Desert', 'Desert FRONT'};
80
        ['Volcano'] = {'Volcano', 'Volcano FRONT'};
81
        -- Fantasy init
82
        ['Enchanted Forest'] = {'Enchanted Forest', 'Enchanted Forest FRONT'};
83
        ['Ancient'] = {'Ancient'};
84
        ['Samurai'] = {'Samurai', 'Samurai FRONT'};
85
        ['Candy'] = {'Candy'};
86
        ['Haunted'] = {'Haunted', 'Haunted FRONT'};
87
        ['Hell'] = {'Hell'};
88
        ['Heaven'] = {'Heaven'};
89
        -- Tech
90
        ['Ice Tech'] = {'Ice Tech'};
91
        ['Tech City'] = {'Tech City'; 'Tech City FRONT'};
92
        ['Dark Tech'] = {'Dark Tech'; 'Dark Tech FRONT'};
93
        ['Steampunk'] = {'Steampunk'; 'Steampunk FRONT'};
94
		['Alien Lab'] = {"Alien Forest"; "Alien Lab FRONT"};
95
		['Alien Forest'] = {"Alien Forest"; "Alien Forest FRONT"};
96
    }
97
98
    local AreaListLoc = { --These match the IMightKillMyselfCuaseOfThis table
99
        'All'; 'VIP';
100-
        'Ice Tech'; 'Tech City'; 'Dark Tech'; 'Steampunk';
100+
101
        'Enchanted Forest'; 'Ancient'; 'Samurai'; 'Candy'; 'Haunted'; 'Hell'; 'Heaven';
102
        'Ice Tech'; 'Tech City'; 'Dark Tech'; 'Steampunk'; 'Alien Lab'; 'Alien Forest';
103
    }
104
    
105
    
106
    
107
    local Chests = {
108
        'All';
109
        -- Spawn
110
        "Magma Chest",
111
        -- Fantasy
112-
        "Giant Tech Chest"; "Giant Steampunk Chest";
112+
113
        -- Tech
114
        "Giant Tech Chest"; "Giant Steampunk Chest"; "Giant Alien Chest";
115
    }
116
    
117
    
118
119
local function SecondsToClock(seconds) 
120
        local days = math.floor(seconds / 86400)
121
        seconds = seconds - days * 86400
122
        local hours = math.floor(seconds / 3600 )
123
        seconds = seconds - hours * 3600
124
        local minutes = math.floor(seconds / 60) 
125
        seconds = seconds - minutes * 60
126
127
        return string.format("%d d, %d h, %d m, %d s.",days,hours,minutes,seconds)
128
      end
129
130
131
132
--5012544693
133
-------------------------------------------------------------------------------------------------
134
-- credits page
135
local page = venyx:addPage("Developers", 5832745520)
136
local Credits1 = page:addSection("Main Developer:")
137
138
Credits1:addButton("ow#3295", function(dsclink)
139
    if dsclink then
140
        venyx:Notify("Discord ID Copied", "You can paste it.")
141
    end
142
    setclipboard('ow#3295')
143
end)
144
145
----------------------------------
146
147
local Credits2 = page:addSection("Discord:")
148
149
Credits2:addButton("Copy Discord Link", function(dsclink)
150
    if dsclink then
151
        venyx:Notify("Discord Link Copied", "You can paste it.")
152
    end
153
    setclipboard('https://discord.gg/p4jjhBq6vS')
154
end)
155
156
157
158
-------------------------------------------------------------------------------------------------
159
-- page1
160
161
162
local page = venyx:addPage("Auto farm", 1379498635)
163
local section1 = page:addSection("Auto farm.")
164
local section2 = page:addSection("Automated stuff.")
165
-------------------------------------------------------------------------------------------------
166
-- Misc page
167
local page = venyx:addPage("Miscellaneous", 37219625)
168
local misc1 = page:addSection("Miscellaneous.")
169
--local misc2 = page:addSection("Open menus.")
170
171
-------------------------------------------------------------------------------------------------
172
173
-- Egg page
174
local page = venyx:addPage("Eggs", 5094819983)
175
local eggs1 = page:addSection("Automated egg opener")
176
-------------------------------------------------------------------------------------------------
177
178
-- Pets page
179
local page = venyx:addPage("Pets", 329532393)
180
local pets1 = page:addSection("Automated fuse.")
181
local pets2 = page:addSection("Automated golden or rainbow.")
182
--local pets3 = page:addSection("Automated enchant | Temporarily disabled.")
183
local pets4 = page:addSection("Automated dark matter.")
184
185
-------------------------------------------------------------------------------------------------
186
187
-- Troll page
188
--local page = venyx:addPage("Troll", 329532393)
189
--local troll1 = page:addSection("Troll")
190
191
-------------------------------------------------------------------------------------------------
192
-- Settings page
193
local page = venyx:addPage("Settings", 5107159171)
194
local Settings1 = page:addSection("Settings.")
195
local Settings2 = page:addSection("Theme.")
196
Settings1:addKeybind("Toggle keybind.", Enum.KeyCode.RightShift, function(menu)
197
venyx:toggle()
198
end, function(menu)
199
end)
200
201
------------
202
203
204
205
206
------------
207
208
Settings1:addButton("Destroy Menu", function(destroygui)
209
    game:GetService("CoreGui")["ow menu | Premium Panel v0.0.1"]:Destroy()
210
    print("Old menu destroyed.")
211
end)
212
-------------------------------------------------------------------------------------------------
213
214
local MethodList = {'Normal', 'Chest', 'Multi Target', 'Lowest Value (Multi)', 'Highest Value', '[TESTING] Highest Value', 'Nearest'}
215
216
section1:addDropdown("Method", MethodList, function(methodfunc)
217
    if methodfunc then
218
        _G.methodfunc = methodfunc
219
    end
220
    print("Selected method: ", methodfunc)
221
end)
222
223
--------------------------------
224
225
226
local ItemToFarmList = {'All', 'Magma Chest', 'Enchanted Chest', 'Hell Chest', 'Haunted Chest', 'Angel Chest', 'Grand Heaven Chest', 'Giant Tech Chest', 'Giant Steampunk Chest'}
227
228
section1:addDropdown("Item to farm", ItemToFarmList, function(itemtofarmfunc)
229
    if itemtofarmfunc then
230
        _G.itemtofarmfunc = itemtofarmfunc
231
    end
232
    print("Selected item: ", itemtofarmfunc)
233
end)
234
235
--------------------------------
236
237
--local WorldList = {"Spawn", "Fantasy", "Tech"}
238
239
--section1:addDropdown("Select World", WorldList, function(worldfunc)
240
--    if worldfunc then
241
--        _G.worldfunc = worldfunc
242
--    end
243
--    print("World: ", worldfunc)
244
--end)
245
--------------------------------
246
247
248
--local Coins = {} 
249
--for i,v in pairs(game.ReplicatedStorage.Game.Coins:GetChildren()) do 
250
--    for i2,v2 in pairs(v:GetChildren()) do 
251
--        table.insert(Coins, v2.Name)
252
--    end 
253
--end 
254
--table.foreach(Coins, print)
255
256
257
258
section1:addDropdown("Select location", AreaListLoc, function(mapafunc)
259
    if mapafunc then
260
        _G.mapafunc = mapafunc
261
    end
262
    print("Selected area: ", mapafunc)
263
end)
264
265
-------------------------------------------------------------------------------------------------
266
267
local AreaWorldTable = {}
268
for _, v in pairs(game:GetService("ReplicatedStorage").Game.Coins:GetChildren()) do
269
    for _, b in pairs(v:GetChildren()) do
270
        table.insert(AreaWorldTable, b.Name)
271
    end
272
    table.insert(AreaWorldTable, v.Name)
273
end
274
275
-------------------------
276
277
function AllChests()
278
    local returntable = {}
279
    local ListCoins = game.workspace['__THINGS']['__REMOTES']["get coins"]:InvokeServer({})[1]
280
    for i,v in pairs(ListCoins) do
281
        local shit = v
282
        shit["index"] = i
283
        for aa,bb in pairs(AreaWorldTable) do
284
            if string.find(v.n, bb) then
285
                local thing = string.gsub(v.n, bb.." ", "")
286
                if table.find(Chests, thing) then
287
                    shit.n = thing
288
                    table.insert(returntable, shit)
289
                end
290
            end
291
        end
292
    end
293
    return returntable
294
end
295
296
297
-------------------------------
298
299
workspace.__THINGS.__REMOTES.MAIN:FireServer("b", "buy egg")
300
workspace.__THINGS.__REMOTES.MAIN:FireServer("b", "join coin")
301
workspace.__THINGS.__REMOTES.MAIN:FireServer("a", "farm coin")
302
workspace.__THINGS.__REMOTES.MAIN:FireServer("a", "claim orbs")
303
workspace.__THINGS.__REMOTES.MAIN:FireServer("a", "change pet target")
304
workspace.__THINGS.__REMOTES.MAIN:FireServer("b", "get trade")
305
workspace.__THINGS.__REMOTES.MAIN:FireServer("b", "add trade pet")
306
workspace.__THINGS.__REMOTES.MAIN:FireServer("b", "remove trade pet")
307
workspace.__THINGS.__REMOTES.MAIN:FireServer("b", "convert to dark matter")
308
workspace.__THINGS.__REMOTES.MAIN:FireServer("b", "redeem dark matter pet")
309
workspace.__THINGS.__REMOTES.MAIN:FireServer("b", "redeem rank rewards")
310
workspace.__THINGS.__REMOTES.MAIN:FireServer("b", "redeem vip rewards")
311
workspace.__THINGS.__REMOTES.MAIN:FireServer("a", "toggle setting")
312
workspace.__THINGS.__REMOTES.MAIN:FireServer("a", "activate boost")
313
workspace.__THINGS.__REMOTES.MAIN:FireServer("b", "use golden machine")
314
workspace.__THINGS.__REMOTES.MAIN:FireServer("b", "use rainbow machine")
315
-------------------------------
316
317
function FarmCoin(CoinID, PetID)
318
    game.workspace['__THINGS']['__REMOTES']["join coin"]:InvokeServer({[1] = CoinID, [2] = {[1] = PetID}})
319
    game.workspace['__THINGS']['__REMOTES']["farm coin"]:FireServer({[1] = CoinID, [2] = PetID})
320
end
321
322
-------------------------------
323
324
--function GetMyPets()
325
--   local returntable = {}
326
--   for i,v in pairs(GameLibrary.Save.Get().Pets) do
327
--       if v.e then 
328
--           table.insert(returntable, v.uid)
329
--       end
330
--   end
331
--   return returntable
332
--end
333
334
local Library = require(game:GetService("ReplicatedStorage").Framework.Library)
335
local IDToName = {}
336
local NameToID = {}
337
for i,v in pairs(Library.Directory.Pets ) do
338
    IDToName[i] = v.name
339
    NameToID[v.name] = i
340
end
341
342
function GetMyPets()
343
       local returntable = {}
344
       for i,v in pairs(GameLibrary.Save.Get().Pets) do
345
           if v.e then 
346
               table.insert(returntable, v.uid)
347
           end
348
       end
349
       return returntable
350
    end
351
352
function GetPets()
353
        local MyPets = {}
354
        for i,v in pairs(GameLibrary.Save.Get().Pets) do
355
            --if (not _G.AllowMythicals) or (_G.AllowMythicals and (PettoRarity[v.id] ~= 'Mythical' and PettoRarity[v.id] ~= 'Exclusive' and not string.find(IDToName[v.id]:lower(), "maskot"))) then
356
                local ThingyThingyTempTypeThing = (v.g and 'Gold') or (v.r and 'Rainbow') or (v.dm and 'Dark Matter') or 'Normal'
357
                local TempString = ThingyThingyTempTypeThing .. IDToName[v.id]
358
                if MyPets[TempString] then
359
                    table.insert(MyPets[TempString], v.uid)
360
                else
361
                    MyPets[TempString] = {}
362
                    table.insert(MyPets[TempString], v.uid)
363
                end
364
            --end
365
        end
366
        return MyPets
367
    end
368
369
--function GetPets()
370
--        local MyPets = {}
371
--        for i,v in pairs(GameLibrary.Save.Get().Pets) do
372
--            --if (not _G.AllowMythicals) or (_G.AllowMythicals and (not PettoRarity[v.id] ~= 'Mythical' and PettoRarity[v.id] ~= 'Exclusive')) then
373
--                local ThingyThingyTempTypeThing = (v.g and 'Gold') or (v.r and 'Rainbow') or (v.dm and 'Dark Matter') or 'Normal'
374
--                local TempString = ThingyThingyTempTypeThing .. IDToName[v.id]
375
--                if MyPets[TempString] then
376
--                    table.insert(MyPets[TempString], v.uid)
377
--                else
378
--                    MyPets[TempString] = {}
379
--                    table.insert(MyPets[TempString], v.uid)
380
--                end
381
--            end
382
--        --end
383
--        return MyPets
384
--    end
385
386
--------------------------
387
388
--function GetCoins(area)
389
--    local returntable = {}
390
--    local ListCoins = game.workspace['__THINGS']['__REMOTES']["get coins"]:InvokeServer({})[1]
391
--    for i,v in pairs(ListCoins) do
392
--        if _G.mapafunc == 'All' or table.find(IMightKillMyselfCauseOfThis[_G.mapafunc], v.a) then
393
--            local shit = v
394
--            shit["index"] = i
395
--            table.insert(returntable, shit)
396
--         end
397
--    end
398
--    return returntable
399
--end
400
401
function GetCoins(area, exclude)
402
    exclude = exclude or {}
403
    local Areas = (IMightKillMyselfCauseOfThis)
404
    local returntable = {}
405
    local ListCoins = game.workspace['__THINGS']['__REMOTES']["get coins"]:InvokeServer({})[1]
406
    for i,v in pairs(ListCoins) do
407
        if _G.mapafunc == 'All' or table.find(Areas[_G.mapafunc], v.a) and not table.find(exclude ,v.n) then
408
            local shit = v
409
            shit["index"] = i
410
            table.insert(returntable, shit)
411
         end
412
    end
413
    return returntable
414
end
415
--------------------------
416
417
--function GetCoinTable(area)
418
--    local CoinTable = GetCoins(area)
419
--    function getKeysSortedByValue(tbl, sortFunction)
420
--        local keys = {}
421
--        for key in pairs(tbl) do
422
--            table.insert(keys, key)
423
--        end
424
--        table.sort(
425
--            keys,
426
--            function(a, b)
427
--                return sortFunction(tbl[a].h, tbl[b].h)
428
--            end
429
--        )
430
--        return keys
431
--    end
432
--    local sortedKeys = getKeysSortedByValue(CoinTable, function(a, b) return a > b end)
433
--    local newCoinTable = {}
434
--
435
--    for i,v in pairs(sortedKeys) do
436
--        table.insert(newCoinTable, CoinTable[v])
437
--    end
438
--    
439
--    return newCoinTable
440
--end
441
442
function GetCoinTable(area, Type, exclude)
443
    exclude = exclude or {}
444
    local CoinTable = GetCoins(area, exclude)
445
    local function getKeysSortedByValue(tbl, sortFunction)
446
        local keys = {}
447
        for key in pairs(tbl) do
448
            table.insert(keys, key)
449
        end
450
        table.sort(
451
            keys,
452
            function(a, b)
453
                return sortFunction(tbl[a].h, tbl[b].h)
454
            end
455
        )
456
        return keys
457
    end
458
    local sortedKeys
459
    if Type == 'Highest' then
460
        sortedKeys = getKeysSortedByValue(CoinTable, function(a, b) return a > b end)
461
    elseif Type == 'Lowest' then
462
        sortedKeys = getKeysSortedByValue(CoinTable, function(a, b) return a < b end)
463
    end
464
    local newCoinTable = {}
465
466
    for i,v in pairs(sortedKeys) do
467
        table.insert(newCoinTable, CoinTable[v])
468
    end
469
470
    return newCoinTable
471
end
472
473
-------------------------
474
475
if _G.MyConnection then _G.MyConnection:Disconnect() end
476
    _G.MyConnection = game.Workspace.__THINGS.Orbs.ChildAdded:Connect(function(Orb)
477
        game.Workspace.__THINGS.__REMOTES["claim orbs"]:FireServer({{Orb.Name}})
478
    end)
479
480
section1:addToggle("Enable automated farm", false, function(farmingtogglefunc)
481
if farmingtogglefunc == true then
482
    _G.FarmingToggle = true
483
elseif farmingtogglefunc == false or destroygui then
484
    _G.FarmingToggle = false
485
end
486
    
487
        local CurrentFarmingPets = {}--skidded from https://v3rmillion.net/showthread.php?tid=1137512
488
        while _G.FarmingToggle do
489
            local pethingy = GetMyPets()
490
            local cointhiny = nil
491
492
        --local CurrentFarmingPets = {}
493
        --while rs:wait() and _G.FarmingToggle == false do
494
        --    local pethingy = GetPets()
495
496
        --if _G.methodfunc == 'Normal' then
497
        --    local cointhiny = GetCoins(_G.mapafunc)
498
        --    for i = 1, #cointhiny do
499
        --        if _G.FarmingToggle and game:GetService("Workspace")["__THINGS"].Coins:FindFirstChild(cointhiny[i].index) then
500
        --            for _, bb in pairs(pethingy) do
501
        --                if _G.FarmingToggle and game:GetService("Workspace")["__THINGS"].Coins:FindFirstChild(cointhiny[i].index) then
502
        --                    spawn(function()
503
        --                        FarmCoin(cointhiny[i].index, bb)
504
        --                    end)
505
        --                end
506
        --            end
507
        --            repeat rs:wait() until not game:GetService("Workspace")["__THINGS"].Coins:FindFirstChild(cointhiny[i].index)
508
        --        end
509
        --    end
510
511
            if _G.methodfunc == 'Normal' then
512
                local cointhiny = GetCoins(_G.mapafunc)
513
                for i = 1, #cointhiny do
514
                    if _G.FarmingToggle and game:GetService("Workspace")["__THINGS"].Coins:FindFirstChild(cointhiny[i].index) then
515
                        for _, bb in pairs(pethingy) do
516
                            coroutine.wrap(function()
517
                                FarmCoin(cointhiny[i].index, bb)
518
                            end)()
519
                        end
520
                        repeat task.wait(0.001) until not game:GetService("Workspace")["__THINGS"].Coins:FindFirstChild(cointhiny[i].index) or not _G.FarmingToggle or _G.methodfunc ~= 'Normal'
521
                    end
522
                end
523
524
        --    elseif _G.methodfunc == 'Chest' then
525
        --        for i,v in pairs(AllChests()) do
526
        --            if (v.n == _G.itemtofarmfunc) or (_G.itemtofarmfunc == 'All') then
527
        --                local starttick = tick()
528
        --                for a, b in pairs(pethingy) do
529
        --                    pcall(function() FarmCoin(v.index, b) end)
530
        --                end
531
        --                repeat task.wait(0.001) until not game:GetService("Workspace")["__THINGS"].Coins:FindFirstChild(v.index) or #game:GetService("Workspace")["__THINGS"].Coins[v.index].Pets:GetChildren() == 0
532
        --                --warn(v.n .. " has been broken in", tick()-starttick)
533
        --            end
534
        --        end
535
536
            elseif _G.methodfunc == 'Chest' then
537
                for i,v in pairs(AllChests()) do
538
                    if (v.n == _G.itemtofarmfunc) or (_G.itemtofarmfunc == 'All') then
539
                        local starttick = tick()
540
                        for a, b in pairs(pethingy) do
541
                            coroutine.wrap(function()
542
                                FarmCoin(v.index, b)
543
                            end)()
544
                        end
545
                        repeat task.wait(0.001) until not game:GetService("Workspace")["__THINGS"].Coins:FindFirstChild(v.index) or #game:GetService("Workspace")["__THINGS"].Coins[v.index].Pets:GetChildren() == 0 or not _G.FarmingToggle or _G.methodfunc ~= 'Chest'
546
                        --warn(v.n .. " has been broken in", tick()-starttick)
547
                    end
548
                end
549
550
            --elseif _G.methodfunc == 'Multi Target' then
551
        --    local cointhiny = GetCoins(_G.mapafunc)
552
        --    for i = 1, #cointhiny do
553
        --        if i%#pethingy == #pethingy-1 then wait() end
554
        --        if not CurrentFarmingPets[pethingy[i%#pethingy+1]] or CurrentFarmingPets[pethingy[i%#pethingy+1]] == nil then
555
        --            spawn(function()
556
        --                CurrentFarmingPets[pethingy[i%#pethingy+1]] = 'Farming'
557
        --                FarmCoin(cointhiny[i].index, pethingy[i%#pethingy+1])
558
        --                repeat rs:wait() until not game:GetService("Workspace")["__THINGS"].Coins:FindFirstChild(cointhiny[i].index) or #game:GetService("Workspace")["__THINGS"].Coins:FindFirstChild(cointhiny[i].index).Pets:GetChildren() == 0
559
        --                CurrentFarmingPets[pethingy[i%#pethingy+1]] = nil
560
        --            end)
561
        --        end
562
        --    end
563
564
            elseif _G.methodfunc == 'Multi Target' then
565
                local cointhiny = GetCoins(_G.mapafunc)
566
                for i = 1, #cointhiny do
567
                    if not CurrentFarmingPets[pethingy[i%#pethingy+1]] or CurrentFarmingPets[pethingy[i%#pethingy+1]] == nil then
568
                        coroutine.wrap(function()
569
                            CurrentFarmingPets[pethingy[i%#pethingy+1]] = 'Farming'
570
                            FarmCoin(cointhiny[i].index, pethingy[i%#pethingy+1])
571
                            repeat task.wait(0.001) until not game:GetService("Workspace")["__THINGS"].Coins:FindFirstChild(cointhiny[i].index) or #game:GetService("Workspace")["__THINGS"].Coins:FindFirstChild(cointhiny[i].index).Pets:GetChildren() == 0 or not _G.FarmingToggle or _G.methodfunc ~= 'Multi Target'
572
                            CurrentFarmingPets[pethingy[i%#pethingy+1]] = nil
573
                        end)()
574
                    end
575
                end
576
577
            elseif _G.methodfunc == 'Lowest Value (Multi)' then
578
                local cointhiny = GetCoinTable(_G.mapafunc, "Lowest")
579
                for i = 1, (#cointhiny >= #pethingy and #pethingy or #cointhiny) do
580
                    if not CurrentFarmingPets[pethingy[i%#pethingy+1]] or CurrentFarmingPets[pethingy[i%#pethingy+1]] == nil then
581
                        coroutine.wrap(function()
582
                            CurrentFarmingPets[pethingy[i%#pethingy+1]] = 'Farming'
583
                            FarmCoin(cointhiny[i].index, pethingy[i%#pethingy+1])
584
                            repeat task.wait(0.0001) until not game:GetService("Workspace")["__THINGS"].Coins:FindFirstChild(cointhiny[i].index) or #game:GetService("Workspace")["__THINGS"].Coins:FindFirstChild(cointhiny[i].index).Pets:GetChildren() == 0 or not _G.FarmingToggle or _G.methodfunc ~= 'Lowest Value (Multi)'
585
                            CurrentFarmingPets[pethingy[i%#pethingy+1]] = nil
586
                        end)()
587
                    end
588
                end
589
590
            --elseif _G.methodfunc == 'Highest Value' then
591
        --    local cointhiny = GetCoinTable(_G.mapafunc)
592
        --    for a,b in pairs(pethingy) do
593
        --        spawn(function() FarmCoin(cointhiny[1].index, b) end)
594
        --    end
595
        --    repeat rs:wait() until not game:GetService("Workspace")["__THINGS"].Coins:FindFirstChild(cointhiny[1].index) or #game:GetService("Workspace")["__THINGS"].Coins[cointhiny[1].index].Pets:GetChildren() == 0
596
597
            elseif _G.methodfunc == 'Highest Value' then
598
                local cointhiny = GetCoinTable(_G.mapafunc, "Highest")
599
                if #cointhiny >= 1 then
600
                    for a,b in pairs(pethingy) do
601
                        coroutine.wrap(function()
602
                            FarmCoin(cointhiny[1].index, b) 
603
                        end)()
604
                    end
605
                    repeat task.wait(0.001) until not game:GetService("Workspace")["__THINGS"].Coins:FindFirstChild(cointhiny[1].index) or #game:GetService("Workspace")["__THINGS"].Coins[cointhiny[1].index].Pets:GetChildren() == 0 or not _G.FarmingToggle or _G.methodfunc ~= 'Highest Value'
606
                else
607
                    task.wait()
608
                end
609
610
            elseif _G.methodfunc == '[TESTING] Highest Value' then
611
                local cointhiny = GetCoinTable(_G.mapafunc, "Highest")
612
                if #cointhiny >= 3 then
613
                    local CurrentFarmingPets = {}
614
                    for a = 1, 3 do
615
                        coroutine.wrap(function()
616
                            if CurrentFarmingPets[a] == nil then
617
                                for petnum = a, #pethingy, 3 do
618
                                    coroutine.wrap(function()
619
                                        if not CurrentFarmingPets[a] then CurrentFarmingPets[a] = {} end
620
                                        if CurrentFarmingPets[a] ~= nil and game:GetService("Workspace")["__THINGS"].Coins:FindFirstChild(cointhiny[a].index) and not table.find(CurrentFarmingPets[a], pethingy[petnum]) then
621
                                            table.insert(CurrentFarmingPets[a], pethingy[petnum])
622
                                            FarmCoin(cointhiny[a].index, pethingy[petnum]) 
623
                                        end
624
                                    end)()
625
                                end
626
                                repeat task.wait(0.001) until not game:GetService("Workspace")["__THINGS"].Coins:FindFirstChild(cointhiny[a].index) or #game:GetService("Workspace")["__THINGS"].Coins[cointhiny[a].index].Pets:GetChildren() == 0  or not _G.FarmingToggle or _G.methodfunc ~= '[TESTING] Highest Value'
627
                                CurrentFarmingPets[a] = nil
628
                            end
629
                        end)()
630
                    end
631
                else
632
                    task.wait()
633
                end
634
            
635
            --elseif _G.methodfunc == 'Nearest' then
636
        --    local NearestOne = nil
637
        --    local NearestDistance = math.huge
638
        --    for i,v in pairs(game:GetService("Workspace")["__THINGS"].Coins:GetChildren()) do
639
        --        if (v.POS.Position - game.Players.LocalPlayer.Character.HumanoidRootPart.Position).Magnitude < NearestDistance then
640
        --            NearestOne = v
641
        --            NearestDistance = (v.POS.Position - game.Players.LocalPlayer.Character.HumanoidRootPart.Position).Magnitude
642
        --        end
643
        --    end
644
        --    for a,b in pairs(pethingy) do
645
        --        spawn(function() FarmCoin(NearestOne.Name, b) end)
646
        --    end
647
            
648
            elseif _G.methodfunc == 'Nearest' then
649
                local cointable = game:GetService("Workspace")["__THINGS"].Coins:GetChildren()
650
                table.sort(cointable, function(i, v)
651
                    return (game.Players.LocalPlayer.Character.HumanoidRootPart.Position - i.POS.Position).magnitude < (game.Players.LocalPlayer.Character.HumanoidRootPart.Position - v.POS.Position).magnitude
652
                end)
653
                local NearestOne = cointable[1]
654
                if NearestOne ~= nil then
655
                    for a,b in pairs(pethingy) do
656
                        coroutine.wrap(function()
657
                            if NearestOne ~= nil then
658
                                FarmCoin(NearestOne.Name, b)
659
                            end
660
                        end)()
661
                    end
662
                    repeat task.wait(0.001) until not game:GetService("Workspace")["__THINGS"].Coins:FindFirstChild(NearestOne.Name) or #game:GetService("Workspace")["__THINGS"].Coins[NearestOne.Name].Pets:GetChildren() == 0
663
                else
664
                    task.wait()
665
                end
666
            end
667
        end
668
    end)
669
670
671
-------------------------------------------------------------------------------------------------
672
-- Farming Addons
673
--
674
--section1:addToggle("Auto Collect Orbs", false, function(autocollecting)
675
--
676
--if autocollecting == true then
677
--    _G.CollectOrbs = true
678
--elseif autocollecting == false or destroygui then
679
--    _G.CollectOrbs = false
680
--    end
681
--
682
--function CollectOrbs()
683
--   local ohTable1 = {[1] = {}}
684
--   for i,v in pairs(game.workspace['__THINGS'].Orbs:GetChildren()) do
685
--       ohTable1[1][i] = v.Name
686
--        end
687
--   game.workspace['__THINGS']['__REMOTES']["claim orbs"]:FireServer(ohTable1)
688
--    end
689
--
690
--while wait() and _G.CollectOrbs do
691
--      pcall(function() CollectOrbs() end)
692
--end
693
--end)
694
695
---------------
696
697
section2:addToggle("Auto use triple damage", false, function(autotripledamage)
698
699
if autotripledamage == true then
700
    _G.TripleDamage1 = true
701
elseif autotripledamage == false or destroygui then
702
    _G.TripleDamage1 = false
703
    end
704
705
706
while wait(5) do
707
  if _G.TripleDamage1 then 
708
    if not game:GetService("Players").LocalPlayer.PlayerGui.Main.Boosts:FindFirstChild("Triple Damage") then
709
        workspace.__THINGS.__REMOTES["activate boost"]:FireServer({[1] = "Triple Damage"})
710
    print("Triple damage boost checked")
711
    end
712
  end
713
end
714
end)
715
---------------
716
717
section2:addToggle("Auto use triple coins", false, function(autotriplecoins)
718
719
if autotriplecoins == true then
720
    _G.TripleCoins1 = true
721
elseif autotriplecoins == false or destroygui then
722
    _G.TripleCoins1 = false
723
    end
724
725
while wait(5) do
726
    if _G.TripleCoins1 then
727
        if not game:GetService("Players").LocalPlayer.PlayerGui.Main.Boosts:FindFirstChild("Triple Coins") then
728
            workspace.__THINGS.__REMOTES["activate boost"]:FireServer({[1] = "Triple Coins"})
729
        print("Triple coin boost checked")
730
    end
731
  end
732
end
733
end)
734
735
----------
736
737
738
739
------------------
740
-- Misc
741
742
743
744
--misc1:addButton("Better Search", function(bettersearchmessage)
745
 --   require(game:GetService("ReplicatedStorage").Framework.Modules.Client["5 | Message"]).New("Better Search Loaded \nNow you can use type: \n- Pet Name \n- Pet Nickname \n- Pet Rarity (Exclusive, Mythical, Legendary, Epic, Rare, Basic) \n- Pet Type (Dark Natter, Rainbow, Gold and Normal \n- Enchants like Royalty etc")
746
 ---   print("Pet Counter Loaded")
747
 --   loadstring(game:HttpGet('https://pastebinp.com/raw/JUEtgq95'))()
748
--end)
749
750
------------------
751
752
--misc1:addButton("Pet Counter", function(petcountermessage)
753
   -- print("Pet Counter Loaded")
754
   -- loadstring(game:HttpGet("https://raw.githubusercontent.com/owedits/fartsfx/main/pcounfart.lua", true))()
755
  --  if petcountermessage then
756
  --      venyx:Notify("Pet Counter Started", "Click F9 to check counted pets")
757
  --  end
758
--end)
759
760
-------------------------------------------------------------------------------------------------
761
--page2
762
763
local pathToScript = game.Players.LocalPlayer.PlayerScripts.Scripts.Game['Open Eggs']
764
local oldFunc = getsenv(pathToScript).OpenEgg
765
----
766
local Eggs = {} 
767
for i,v in pairs(game.ReplicatedStorage.Game.Eggs:GetChildren()) do 
768
    for i2,v2 in pairs(v:GetChildren()) do 
769
        table.insert(Eggs, v2.Name)
770
    end 
771
end
772
773
eggs1:addDropdown("Select egg", Eggs, function(eggor)
774
    if eggor then
775
        _G.Egg = eggor
776
    end
777
    --print("Text: ", eggor)
778
    --print("_G.Egg: ", _G.Egg)
779
end)
780
781
----
782
eggs1:addToggle("Remove egg opening animation", false, function(delanimation)
783
    if delanimation == true then 
784
        getsenv(pathToScript).OpenEgg = function() return end 
785
    else
786
        getsenv(pathToScript).OpenEgg = oldFunc
787
    end 
788
end)
789
790
-------------------------------------------------------------------------------------------------
791
792
eggs1:addToggle("Use triple eggs | Only if you have the pass", false, function(triplegamepass)
793
794
if triplegamepass == true then
795
    _G.TripleEgg = true
796
elseif triplegamepass == false or destroygui then
797
    _G.TripleEgg = false
798
    end
799
end)
800
801
_G.TripleEgg = false
802
803
-------------------------------------------------------------------------------------------------
804
805
806
----------------------------
807
808
eggs1:addToggle("Enable automated egg opener.", false, function(dropegg)
809
shared.toggle3drop = dropegg
810
end)
811
local openeegg = eggor
812
game:GetService("RunService").RenderStepped:connect(function()
813
if shared.toggle3drop then
814
    --print("Egg: ", _G.Egg)
815
    --print("Triple Egg GamePasse: ", _G.TripleEgg)
816
    local ohTable1 = {
817
    	[1] = _G.Egg,
818
    	[2] = _G.TripleEgg
819
    }
820
    workspace.__THINGS.__REMOTES["buy egg"]:InvokeServer(ohTable1)
821
    wait(0.5)
822
    end
823
end)
824
825
826
-------------------------------------------------------------------------------------------------
827
--Pets
828
829
830
local GameLibrary = require(game:GetService("ReplicatedStorage"):WaitForChild("Framework"):WaitForChild("Library"))
831
local IDToName = {}
832
local NameToID = {}
833
local PettoRarity = {}
834
local RarityTable = {}
835
local PetNamesTable = {}
836
local PetNamesTable = {}
837
838
for i,v in pairs(GameLibrary.Directory.Pets) do
839
    IDToName[i] = v.name
840
    NameToID[v.name] = i
841
    PettoRarity[i] = v.rarity
842
    if not table.find(RarityTable, v.rarity) then
843
        table.insert(RarityTable, v.rarity)
844
    end
845
    table.insert(PetNamesTable, v.name)
846
end
847
848
849
--fuse
850
--local PetsList = {'Vampire Bat', 'Werewolf'}
851
pets1:addDropdown("Select pet", PetNamesTable, function(petfunc)
852
    if petfunc then
853
        _G.SelectedPet = petfunc
854
        _G.FuseList = {
855
            {
856
                [_G.SelectedPet] = _G.PetCount or 3;
857
            };
858
        }
859
    end
860
    print("Selected pet: ",  _G.SelectedPet)
861
end)
862
------------------------------------------
863
local TypeList = {'Normal', 'Gold', 'Rainbow'}
864
pets1:addDropdown("Select pet type", TypeList, function(typefunc)
865
if typefunc then
866
    _G.Type = typefunc
867
end
868
print("Selected type: ", _G.Type)
869
end)
870
------------------------------------------
871
pets1:addSlider("Select pet amount", 3, 3, 12, function(countfusefunc)
872
if countfusefunc then
873
    _G.PetCount = countfusefunc
874
    _G.FuseList = {
875
        {
876
            [_G.SelectedPet] = _G.PetCount or 3;
877
        };
878
    }end
879
--print("Selected Count: ", _G.PetCount)
880
end)
881
------------------------------------------
882
pets1:addToggle("Enable automated fuse", false, function(autofusefunc)
883
if autofusefunc == true then
884
    _G.Enabled = true
885
    print("_G.Enabled: ", _G.Enabled)
886
    print("Selected count: ", _G.PetCount)
887
    print("Selected type: ", _G.Type)
888
    print("Selected pet: ", _G.SelectedPet)
889
    loadstring(game:HttpGet('https://raw.githubusercontent.com/inceldom/skid/main/fuzefart.lua'))() -- runs script as I use while wait and _G.enabled so loop ends when _G.enabled is false
890
elseif autofusefunc == false then
891
    _G.Enabled = false
892
    print("_G.Enabled: ", _G.Enabled)
893
end
894
--Set globals so script doesn't error--
895
_G.Enabled = false
896
_G.Type = "Rainbow"
897
_G.FuseList = {{}}
898
end)
899
---------------------------------------
900
--auto gold/rainbow
901
902
pets2:addSlider("Select pet amount", 0, 1, 6, function(countcombinefunc)
903
    if countcombinefunc then
904
        _G.CountCombineFunc1 = countcombinefunc
905
    end
906
    --print("Selected Combine Count: ", _G.CountCombineFunc1)
907
end)
908
909
------------------------------------------
910
911
pets2:addToggle("Auto golden", false, function(togglegoldfunc)
912
    
913
if togglegoldfunc == true then
914
    _G.ToggleGold = true
915
elseif togglegoldfunc == false then
916
    _G.ToggleGold = false
917
end
918
end)
919
920
921
pets2:addToggle("Auto rainbow", false, function(toggleraibowfunc)
922
    
923
if toggleraibowfunc == true then
924
    _G.ToggleRainbow = true
925
elseif toggleraibowfunc == false then
926
    _G.ToggleRainbow = false
927
end
928
end)
929
930
---------------------------------------
931
932
--pets2:addToggle("Allow Mythical", false, function(allowmythicalfunc)
933
    
934
--_G.AllowMythicals = false
935
936
--if allowmythicalfunc == true then
937
--    _G.AllowMythicals = true
938
--elseif allowmythicalfunc == false then
939
--    _G.AllowMythicals = false
940
--end
941
--end)
942
943
---------------------------------------
944
945
pets2:addToggle("Enable automated golden or rainbow", false, function(autocombinefunc)
946
    
947
if autocombinefunc == true then
948
    _G.AutoCom = true
949
elseif autocombinefunc == false then
950
    _G.AutoCom = false
951
end
952
953
while wait() and _G.AutoCom do
954
    for i, v in pairs(GetPets()) do
955
        if #v >= _G.CountCombineFunc1 and _G.AutoCom then
956
            if string.find(i, "Normal") and _G.AutoCom and _G.ToggleGold then
957
                local Args = {}
958
                for eeeee = 1, _G.CountCombineFunc1 do
959
                    Args[#Args+1] = v[#Args+1]
960
                end
961
                Library.Network.Invoke("use golden machine", Args)
962
963
            elseif string.find(i, "Gold") and _G.AutoCom and _G.ToggleRainbow then
964
                local Args = {}
965
                for eeeee = 1, _G.CountCombineFunc1 do
966
                    Args[#Args+1] = v[#Args+1]
967
                end
968
                Library.Network.Invoke("use rainbow machine", Args)
969
            end
970
        end
971
    end
972
end
973
974
--spawn(function()
975
--    while wait() and _G.AutoCom do
976
--        if not _G.ToggleGold and not _G.ToggleRainbow then 
977
--            repeat wait(1) until _G.ToggleGold or _G.ToggleRainbow
978
--        end
979
--        if tonumber(_G.CountCombineFunc1) == nil then
980
--            repeat wait() until tonumber(_G.CountCombineFunc1) ~= nil
981
--        end
982
--        for i, v in pairs(GetPets()) do
983
--            if #v >= _G.CountCombineFunc1 and (_G.ToggleGold or _G.ToggleRainbow) then
984
--                if string.find(i, "Normal") and _G.ToggleGold then
985
--                    local Args = {}
986
--                    for eeeee = 1, _G.CountCombineFunc1 do
987
--                        Args[#Args+1] = v[#Args+1]
988
--                    end
989
--                    GameLibrary.Network.Invoke("use golden machine", Args)
990
--                elseif string.find(i, "Gold") and _G.ToggleRainbow then
991
--                    local Args = {}
992
--                    for eeeee = 1, _G.CountCombineFunc1 do
993
--                        Args[#Args+1] = v[#Args+1]
994
--                    end
995
--                    GameLibrary.Network.Invoke("use rainbow machine", Args)
996
--                end
997
--            end
998
--        end
999
--    end
1000
--end)
1001
end)
1002
1003
---------------------------------------------------
1004
--enchanting
1005
1006
--local EnchantsList = {
1007
--    'Magnet',
1008
--    'Royalty',
1009
--    'Glittering',
1010
--    'Tech Coins',
1011
--    'Fantasy Coins',
1012
--    'Coins',
1013
--    'Teamwork',
1014
--    'Diamonds',
1015
--    'Strength',
1016
--    'Chests',
1017
--    'Presents',
1018
--    'Agility',
1019
--    'Charm'
1020
--}
1021
--
1022
--pets3:addDropdown("Select Enchant", EnchantsList, function(selectenchantfunc)
1023
--    if selectenchantfunc then
1024
--        _G.SelEnchant1 = selectenchantfunc
1025
--    end
1026
--    print("Selected Enchant: ", _G.SelEnchant1)
1027
--end)
1028
--
1029
---------------------------
1030
--
1031
--local EnchantLevel = {1, 2, 3, 4, 5}
1032
--pets3:addDropdown("Select Level", EnchantLevel, function(selectnumlevel)
1033
--    if selectnumlevel then
1034
--        _G.SelLevel1 = selectnumlevel
1035
--    end
1036
--    print("Selected Level: ", _G.SelLevel1)
1037
--end)
1038
--
1039
---------------------------
1040
--
1041
--pets3:addButton("Start Enchant Equiped", function()
1042
--
1043
--_G.SelEnchant1 = 'Tech Coins'
1044
--_G.SelLevel1 = 5
1045
--_G.EMERGENCYSTOP = false
1046
--
1047
--local Wanted = {
1048
--[_G.SelEnchant1] = _G.SelLevel1 or 1;
1049
--}
1050
--
1051
--local PettoRarity = {}
1052
--local a = require(game:GetService("ReplicatedStorage").Framework.Modules["1 | Directory"].Pets["Grab All Pets"])
1053
--for i, v in pairs(a) do
1054
--PettoRarity[i] = v.rarity
1055
--end
1056
--
1057
--function GetPetTable(PetUID)
1058
--local Library = require(game:GetService("ReplicatedStorage").Framework.Library)
1059
--for i, v in pairs(Library.Save.Get().Pets) do
1060
--    if v.uid == PetUID then
1061
--        return v
1062
--    end
1063
--end
1064
--end
1065
--workspace.__THINGS.__REMOTES.MAIN:FireServer("b", "enchant pet")
1066
--wait(0.5)
1067
--local Library = require(game:GetService("ReplicatedStorage").Framework.Library)
1068
--for i, v in pairs(Library.Save.Get().Pets) do
1069
--if v.e and PettoRarity[v.id] ~= 'Mythical' and not _G.EMERGENCYSTOP then
1070
--    local haspower = false
1071
--    repeat wait()
1072
--        if GetPetTable(v.uid).powers then
1073
--            for a, b in pairs(GetPetTable(v.uid).powers) do
1074
--                warn(b[1], b[2])
1075
--                print(Wanted[b[1]])
1076
--                if Wanted[b[1]] ~= nil and not haspower and not _G.EMERGENCYSTOP then
1077
--                    if Wanted[b[1]] <= b[2] then
1078
--                        haspower = true
1079
--                        warn("Pet", v.uid, "has", b[1], b[2])
1080
--                    end
1081
--                end
1082
--            end
1083
--            if not haspower and not _G.EMERGENCYSTOP then
1084
--                print("Yea we kinda need new enchantments on", v.uid)
1085
--
1086
--                workspace.__THINGS.__REMOTES["enchant pet"]:InvokeServer({[1] = v.uid})
1087
--                wait(0.1)
1088
--            end
1089
--        else
1090
--            warn("taking", v.uid,'\'s enchanting virginity lol')
1091
--            workspace.__THINGS.__REMOTES["enchant pet"]:InvokeServer({[1] = v.uid})
1092
--            wait(0.1)
1093
--        end
1094
--    until haspower == true or Library.Save.Get().Diamonds < 10000 or _G.EMERGENCYSTOP
1095
--end
1096
--end
1097
--
1098
----loadstring(game:HttpGet('https://raw.githubusercontent.com/owedits/fartsfx/main/enchfart.lua'))()
1099
--end)
1100
-------------------------
1101
1102
--pets3:addButton("FORCE STOP ENCHANT", function(emergstop)
1103
--    if emergstop then
1104
--        _G.EMERGENCYSTOP = true
1105
--    end
1106
--    print("Emergency Enchant Stop")
1107
--end)
1108
1109
1110
1111
1112
-------------------------------------------------------------------------------------------------
1113
--Dark Matter
1114
1115
pets4:addButton("Remaining Time Check", function()
1116
        local PetList = {}
1117
        for i,v in pairs(GameLibrary.Directory.Pets) do
1118
        PetList[i] = v.name
1119
        end
1120
1121
        local returnstring = ""
1122
        for i,v in pairs(GameLibrary.Save.Get().DarkMatterQueue) do
1123
            local timeleft = 'Ready.'
1124
            if math.floor(v.readyTime - os.time()) > 0 then
1125
                timeleft = SecondsToClock(math.floor(v.readyTime - os.time()))
1126
            end
1127
            local stringthing = PetList[v.petId] .." going to be ready in: ".. timeleft
1128
            returnstring = returnstring .. stringthing .. "\n"
1129
        end
1130
        require(game:GetService("ReplicatedStorage").Framework.Modules.Client["5 | Message"]).New(returnstring)
1131
end)
1132
1133
1134
-------------------------------
1135
1136
pets4:addDropdown("Select pet to dark matter", PetNamesTable, function(value)
1137
    
1138
if value then
1139
    _G.NameOfPet = value
1140
end
1141
print("dark matter enabled", value)
1142
end)
1143
1144
-------------------------------
1145
1146
pets4:addSlider("Select amount of pets to dark matter", 0, 1, 6, function(countdarkmatterfunc)
1147
    if countdarkmatterfunc then
1148
        _G.CountDarkMatterFunc1 = countdarkmatterfunc
1149
    end
1150
    --print("Selected Dark Matter Count: ", _G.CountDarkMatterFunc1)
1151
end)
1152
1153
1154
-------------------------------
1155
1156
pets4:addToggle("Enable auto-making dark matter pets", false, function(automakedarkmatters)
1157
    
1158
if automakedarkmatters == true then
1159
    _G.AutoMakeDarkMatter = true
1160
elseif automakedarkmatters == false then
1161
    _G.AutoMakeDarkMatter = false
1162
end
1163
    
1164
1165
    while task.wait() and _G.AutoMakeDarkMatter do
1166
        local Save = GameLibrary.Save.Get()
1167
        local Slots = Save.DarkMatterSlots
1168
        local Queued = 0
1169
        for a, b in pairs(Save.DarkMatterQueue) do
1170
            Queued = Queued + 1 
1171
        end
1172
        local Slots = Slots - Queued
1173
        for count = 1, Slots do
1174
            if Slots - count >= 0 then
1175
                local PetList = {}
1176
                for i,v in pairs(GameLibrary.Save.Get().Pets) do
1177
                    if #PetList < _G.CountDarkMatterFunc1 and v.r and IDToName[v.id] == _G.NameOfPet then
1178
                        table.insert(PetList, v.uid)
1179
                    end
1180
                end
1181
                if #PetList >= _G.CountDarkMatterFunc1 then
1182
                    local tablething = {[1] = {}}
1183
                    for eeek = 1, _G.CountDarkMatterFunc1 do
1184
                        tablething[1][eeek] = PetList[eeek]
1185
                    end
1186
                    workspace.__THINGS.__REMOTES["convert to dark matter"]:InvokeServer(tablething)
1187
                end
1188
            end 
1189
        end
1190
        task.wait(15)
1191
    end
1192
end)
1193
1194
-------------------------------
1195
pets4:addToggle("Enable auto-claiming dark matter pets", false, function(autoclaimdark)
1196
1197
if autoclaimdark == true then
1198
    _G.AutoClaimDarkMatter = true
1199
elseif autoclaimdark == false then
1200
    _G.AutoClaimDarkMatter = false
1201
end
1202
    
1203
spawn(function()
1204
    while task.wait() and _G.AutoClaimDarkMatter do
1205
        for i,v in pairs(GameLibrary.Save.Get().DarkMatterQueue) do
1206
            if math.floor(v.readyTime - os.time()) < 0 then
1207
                workspace.__THINGS.__REMOTES["redeem dark matter pet"]:InvokeServer({[1] = i})
1208
            end
1209
            end
1210
        task.wait(15)
1211
    end
1212
end)
1213
end)
1214
1215
1216
-------------------------------------------------------------------------------------------------
1217
--page3
1218
1219
1220
section2:addToggle("Auto collect rewards [Both VIP and Rank.]", false, function(autorewards)
1221
1222
if autorewards == true then
1223
    _G.AutoRewards1 = true
1224
elseif autorewards == false then
1225
    _G.AutoRewards1 = false
1226
end
1227
1228
while task.wait() and _G.AutoRewards1 do
1229
	workspace.__THINGS.__REMOTES["redeem vip rewards"]:InvokeServer({})
1230
	workspace.__THINGS.__REMOTES["redeem rank rewards"]:InvokeServer({})			
1231
end
1232
1233
		
1234
--shared.toggle3rewards = rewards
1235
--game:GetService("RunService").RenderStepped:connect(function()
1236
--if shared.toggle3rewards then
1237
--    workspace.__THINGS.__REMOTES["redeem vip rewards"]:InvokeServer({})
1238
--    workspace.__THINGS.__REMOTES["redeem rank rewards"]:InvokeServer({})
1239
--end
1240
1241
1242
--if shared.toggle3rewards == true then
1243
    --if game:GetService("Workspace")["__MAP"].Interactive["Rank Rewards"].Pad.BillboardGui.Timer.Text == "Redeem!" and game:GetService("Workspace")["__MAP"].Interactive["Rank Rewards"].Pad.BillboardGui.Timer.Text == "Redeem!"  then
1244
    --local Library = require(game:GetService("ReplicatedStorage").Framework.Library)
1245
    --Library.Network.Invoke("redeem rank rewards", {})
1246
    --end
1247
    --end
1248
end)
1249
1250
section2:addButton("Stats Tracker", function()
1251
    loadstring(game:HttpGet('https://raw.githubusercontent.com/inceldom/skid/main/trak.lua'))()
1252
    print("Stats tracked activated")
1253
end)
1254
-------------------------------------------------------------------------------------------------
1255
1256
1257
misc1:addToggle("Give gamepasses [Some are visual.]", false, function(gamepasses)
1258
shared.toggle3gamepasses = gamepasses
1259
game:GetService("RunService").RenderStepped:connect(function()
1260
if shared.toggle3gamepasses then
1261
    local main = debug.getupvalues(require(game.ReplicatedStorage:WaitForChild("Framework"):WaitForChild("Library")).Save.Get)[2][game.Players.LocalPlayer].save.Gamepasses
1262
		table.insert(main,18674296)
1263
		table.insert(main,18674298)
1264
		table.insert(main,18674321)
1265
		table.insert(main,21176989)
1266
		table.insert(main,21583760)
1267
		table.insert(main,21641016)
1268
		table.insert(main,22596039)
1269
		table.insert(main,18674307)
1270
    end
1271
end)
1272
end)
1273
-------------------------------------------------------------------------------------------------
1274
1275
1276
1277
-------------------------------------------------------------------------------------------------
1278
1279
misc1:addButton("Anti afk", function()
1280
print("Anti Afk Loaded")
1281
local GC = getconnections or get_signal_cons
1282
if GC then
1283
    for i,v in pairs(GC(game.Players.LocalPlayer.Idled)) do
1284
        if v["Disable"] then
1285
            v["Disable"](v)
1286
        elseif v["Disconnect"] then
1287
            v["Disconnect"](v)
1288
        end
1289
    end
1290
else
1291
    print("Unlucky.")
1292
    local vu = game:GetService("VirtualUser")
1293
    game:GetService("Players").LocalPlayer.Idled:connect(function()
1294
        vu:Button2Down(Vector2.new(0,0),workspace.CurrentCamera.CFrame)
1295
        wait(1)
1296
        vu:Button2Up(Vector2.new(0,0),workspace.CurrentCamera.CFrame)
1297
    end)
1298
end
1299
1300
local VirtualUser=game:service'VirtualUser'
1301
game:service'Players'.LocalPlayer.Idled:connect(function()
1302
VirtualUser:CaptureController()
1303
VirtualUser:ClickButton2(Vector2.new())
1304
end)
1305
end)
1306
-------------------------------------------------------------------------------------------------
1307
1308
local function ByeLAG()
1309
        game:GetService("Players").LocalPlayer.PlayerScripts.Scripts.GUIs["Coin Rewards HUD"].Disabled = true
1310
        local a = game:GetService("Workspace")["__DEBRIS"]
1311
        local b = a:Clone()
1312
        b.Parent = a.Parent
1313
        a:Destroy()
1314
        for _,v in pairs(b:GetChildren()) do
1315
            if v.Name == 'RewardBillboard' then
1316
                v:Destroy()
1317
            end
1318
        end
1319
        if game:GetService("Players").LocalPlayer.PlayerGui.Settings.Frame.Container.ShowOtherPets.Toggle.Label.Text == "Yes" then 
1320
            workspace.__THINGS.__REMOTES["toggle setting"]:FireServer({[1] = "ShowOtherPets"})
1321
        end
1322
    end
1323
1324
--misc1:addButton("Lag Reduction", function(AutoAntiLag)
1325
   -- if AutoAntiLag then
1326
    --    ByeLAG()
1327
   -- end
1328
  --  print("Lag Reduction Loaded")
1329
--end)
1330
1331
-------------------------------------------------------------------------------------------------
1332
1333
misc1:addButton("Lag reducer [Good for AFKing.]", function()
1334
    loadstring(game:HttpGet('https://raw.githubusercontent.com/inceldom/skid/main/fps.lua'))()
1335
    print("Lag reducer activated")
1336
end)
1337
1338
-------------------------------------------------------------------------------------------------
1339
--Remote Things
1340
--misc2:addButton("Pet Collection", function()
1341
  --  game:GetService("Players").LocalPlayer.PlayerGui.Collection.Enabled = not game:GetService("Players").LocalPlayer.PlayerGui.Collection.Enabled
1342
--end)
1343
1344
--	misc2:addButton("Fuse Pets", function()
1345
--		game:GetService("Players").LocalPlayer.PlayerGui.FusePets.Enabled = not game:GetService("Players").LocalPlayer.PlayerGui.FusePets.Enabled
1346
--	end)
1347
1348
--	misc2:addButton("Gold Machine", function()
1349
--		game:GetService("Players").LocalPlayer.PlayerGui.Golden.Enabled = not game:GetService("Players").LocalPlayer.PlayerGui.Golden.Enabled
1350
--	end)
1351
1352
--	misc2:addButton("Rainbow Machine", function()
1353
	--	game:GetService("Players").LocalPlayer.PlayerGui.Rainbow.Enabled = not game:GetService("Players").LocalPlayer.PlayerGui.Rainbow.Enabled
1354
--	end)
1355
1356
--	misc2:addButton("Dark Matter Machine", function()
1357
--		game:GetService("Players").LocalPlayer.PlayerGui.DarkMatter.Enabled = not game:GetService("Players").LocalPlayer.PlayerGui.DarkMatter.Enabled
1358
--	end)
1359
1360
--	misc2:addButton("Merchant", function()
1361
--		game:GetService("Players").LocalPlayer.PlayerGui.Merchant.Enabled = not game:GetService("Players").LocalPlayer.PlayerGui.Merchant.Enabled
1362
--	end)
1363
1364
--	misc2:addButton("Enchant", function()
1365
--		game:GetService("Players").LocalPlayer.PlayerGui.EnchantPets.Enabled = not game:GetService("Players").LocalPlayer.PlayerGui.EnchantPets.Enabled
1366
--	end)
1367
1368
--	misc2:addButton("Spooky Upgrades", function()
1369
	--	game:GetService("Players").LocalPlayer.PlayerGui.SpookyUpgrades.Enabled = not game:GetService("Players").LocalPlayer.PlayerGui.SpookyUpgrades.Enabled
1370
	--end)
1371
1372
-------------------------------------------------------------------------------------------------
1373
--Troll Page
1374
1375
--	troll1:addButton("Visual Dupe Gems", function()
1376
--	function comma_value(amount)
1377
--	  local formatted = amount
1378
--	  while true do  
1379
--		formatted, k = string.gsub(formatted, "^(-?%d+)(%d%d%d)", '%1,%2')
1380
--		if (k == 0) then
1381
--		  break
1382
--		end
1383
--	  end
1384
--	  return formatted
1385
--	end
1386
--
1387
--	local diamonds = game.Players.LocalPlayer.PlayerGui.Main.Right.Diamonds.Amount
1388
--	local old = diamonds.Text
1389
--	local oldNumber = string.gsub(old, ",", "")
1390
--	local newNumber = oldNumber * 2
1391
--	local new = comma_value(newNumber)
1392
--	local newString = tostring(new)
1393
--	diamonds.Text = newString
1394
--	end)
1395
1396
1397
-------------------------------------------------------------------------------------------------
1398
for theme, color in pairs(themes) do -- all in one theme changer, i know, im cool
1399
Settings2:addColorPicker(theme, color, function(color3)
1400
venyx:setTheme(theme, color3)
1401
end)
1402
end
1403
-------------------------------------------------------------------------------------------------
1404
1405
1406
-- load
1407
venyx:SelectPage(venyx.pages[1], true)