KrYn0MoRe

BIBLE BOT

May 11th, 2021 (edited)
837
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. -- bible bot by Toast
  2.  
  3. local timerbb = 30;
  4. local ads_toggle = true;
  5. local greet_toggle = true;
  6.  
  7. math.randomseed(tick())
  8.  
  9. local HttpService = game:GetService("HttpService")
  10. local Players = game:GetService("Players")
  11.  
  12. local maingui = Instance.new("ScreenGui")
  13. local main = Instance.new("ImageLabel")
  14. local label = Instance.new("TextLabel")
  15. local timer = Instance.new("TextBox")
  16. local timeLabel = Instance.new("TextLabel")
  17. local ads = Instance.new("TextLabel")
  18. local ads_on = Instance.new("TextButton")
  19. local ads_off = Instance.new("TextButton")
  20. local mid = Instance.new("Frame")
  21. local greet = Instance.new("TextLabel")
  22. local greet_on = Instance.new("TextButton")
  23. local greet_off = Instance.new("TextButton")
  24.  
  25. for i,v in pairs(game:GetService("CoreGui"):GetChildren()) do
  26.     if v.Name == "Da Bible Bot" then
  27.         v:Destroy()
  28.     end
  29. end
  30.  
  31. maingui.Name = "Da Bible Bot"
  32. maingui.Parent = game:GetService("CoreGui")
  33.  
  34. main.Name = "main"
  35. main.Parent = maingui
  36. main.AnchorPoint = Vector2.new(0.5, 0.5)
  37. main.BackgroundColor3 = Color3.fromRGB(15, 15, 15)
  38. main.BackgroundTransparency = 1.000
  39. main.Position = UDim2.new(0.49999997, 0, 0.5, 0)
  40. main.Size = UDim2.new(0, 500, 0, 300)
  41. main.Image = "rbxassetid://3570695787"
  42. main.ImageColor3 = Color3.fromRGB(15, 15, 15)
  43. main.ScaleType = Enum.ScaleType.Slice
  44. main.SliceCenter = Rect.new(100, 100, 100, 100)
  45. main.SliceScale = 0.250
  46. main.Active = true
  47.  
  48. label.Name = "label"
  49. label.Parent = main
  50. label.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  51. label.BackgroundTransparency = 1.000
  52. label.BorderSizePixel = 0
  53. label.Position = UDim2.new(0.300000012, 0, 0, 0)
  54. label.Size = UDim2.new(0, 200, 0, 25)
  55. label.Font = Enum.Font.SourceSansLight
  56. label.Text = "BibleBot Synapse-Conv"
  57. label.TextColor3 = Color3.fromRGB(255, 255, 255)
  58. label.TextScaled = true
  59. label.TextSize = 14.000
  60. label.TextWrapped = true
  61.  
  62. timer.Name = "timer"
  63. timer.Parent = main
  64. timer.BackgroundColor3 = Color3.fromRGB(30, 30, 30)
  65. timer.BorderSizePixel = 0
  66. timer.Position = UDim2.new(0.0799999982, 0, 0.13333334, 0)
  67. timer.Size = UDim2.new(0, 60, 0, 30)
  68. timer.Font = Enum.Font.SourceSansLight
  69. timer.Text = "30"
  70. timer.TextColor3 = Color3.fromRGB(255, 255, 255)
  71. timer.TextScaled = true
  72. timer.TextSize = 14.000
  73. timer.TextWrapped = true
  74. timer.ClearTextOnFocus = true
  75.  
  76. timer.Changed:Connect(function()
  77.     if timer.Text ~= '' and tonumber(timer.Text) then
  78.         timerbb = tonumber(timer.Text)
  79.     end
  80. end)
  81.  
  82. timeLabel.Name = "timeLabel"
  83. timeLabel.Parent = timer
  84. timeLabel.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  85. timeLabel.BackgroundTransparency = 1.000
  86. timeLabel.BorderSizePixel = 0
  87. timeLabel.Position = UDim2.new(1.41666663, 0, 0, 0)
  88. timeLabel.Size = UDim2.new(0, 375, 0, 30)
  89. timeLabel.Font = Enum.Font.SourceSansLight
  90. timeLabel.Text = "Delay between each AD."
  91. timeLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
  92. timeLabel.TextScaled = true
  93. timeLabel.TextSize = 14.000
  94. timeLabel.TextWrapped = true
  95. timeLabel.TextXAlignment = Enum.TextXAlignment.Left
  96.  
  97. ads.Name = "ads"
  98. ads.Parent = main
  99. ads.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  100. ads.BackgroundTransparency = 1.000
  101. ads.BorderSizePixel = 0
  102. ads.Position = UDim2.new(0.150000021, 0, 0.333333343, 0)
  103. ads.Size = UDim2.new(0, 100, 0, 30)
  104. ads.Font = Enum.Font.SourceSansLight
  105. ads.Text = "Ads (default on)"
  106. ads.TextColor3 = Color3.fromRGB(255, 255, 255)
  107. ads.TextScaled = true
  108. ads.TextSize = 14.000
  109. ads.TextWrapped = true
  110.  
  111. ads_on.Name = "ads_on"
  112. ads_on.Parent = ads
  113. ads_on.BackgroundColor3 = Color3.fromRGB(30, 30, 30)
  114. ads_on.BorderSizePixel = 0
  115. ads_on.Position = UDim2.new(-0.5, 0, 1.16666663, 0)
  116. ads_on.Size = UDim2.new(0, 75, 0, 30)
  117. ads_on.Font = Enum.Font.SourceSansLight
  118. ads_on.Text = "On"
  119. ads_on.TextColor3 = Color3.fromRGB(255, 255, 255)
  120. ads_on.TextScaled = true
  121. ads_on.TextSize = 14.000
  122. ads_on.TextWrapped = true
  123. ads_on.MouseButton1Click:Connect(function()
  124.     ads_toggle = true
  125. end)
  126.  
  127. ads_off.Name = "ads_off"
  128. ads_off.Parent = ads
  129. ads_off.BackgroundColor3 = Color3.fromRGB(30, 30, 30)
  130. ads_off.BorderSizePixel = 0
  131. ads_off.Position = UDim2.new(0.75000006, 0, 1.16666663, 0)
  132. ads_off.Size = UDim2.new(0, 75, 0, 30)
  133. ads_off.Font = Enum.Font.SourceSansLight
  134. ads_off.Text = "Off"
  135. ads_off.TextColor3 = Color3.fromRGB(255, 255, 255)
  136. ads_off.TextScaled = true
  137. ads_off.TextSize = 14.000
  138. ads_off.TextWrapped = true
  139. ads_off.MouseButton1Click:Connect(function()
  140.     ads_toggle = false
  141. end)
  142.  
  143. mid.Name = "mid"
  144. mid.Parent = main
  145. mid.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  146. mid.Position = UDim2.new(0.49000001, 0, 0.233333334, 0)
  147. mid.Size = UDim2.new(0, 10, 0, 230)
  148.  
  149. greet.Name = "greet"
  150. greet.Parent = main
  151. greet.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  152. greet.BackgroundTransparency = 1.000
  153. greet.BorderSizePixel = 0
  154. greet.Position = UDim2.new(0.649999976, 0, 0.333333343, 0)
  155. greet.Size = UDim2.new(0, 100, 0, 30)
  156. greet.Font = Enum.Font.SourceSansLight
  157. greet.Text = "Greeting (default on)"
  158. greet.TextColor3 = Color3.fromRGB(255, 255, 255)
  159. greet.TextScaled = true
  160. greet.TextSize = 14.000
  161. greet.TextWrapped = true
  162.  
  163. greet_on.Name = "greet_on"
  164. greet_on.Parent = greet
  165. greet_on.BackgroundColor3 = Color3.fromRGB(30, 30, 30)
  166. greet_on.BorderSizePixel = 0
  167. greet_on.Position = UDim2.new(-0.5, 0, 1.16666663, 0)
  168. greet_on.Size = UDim2.new(0, 75, 0, 30)
  169. greet_on.Font = Enum.Font.SourceSansLight
  170. greet_on.Text = "On"
  171. greet_on.TextColor3 = Color3.fromRGB(255, 255, 255)
  172. greet_on.TextScaled = true
  173. greet_on.TextSize = 14.000
  174. greet_on.TextWrapped = true
  175. greet_on.MouseButton1Click:Connect(function()
  176.     greet_toggle = true
  177. end)
  178.  
  179. greet_off.Name = "greet_off"
  180. greet_off.Parent = greet
  181. greet_off.BackgroundColor3 = Color3.fromRGB(30, 30, 30)
  182. greet_off.BorderSizePixel = 0
  183. greet_off.Position = UDim2.new(0.75000006, 0, 1.16666663, 0)
  184. greet_off.Size = UDim2.new(0, 75, 0, 30)
  185. greet_off.Font = Enum.Font.SourceSansLight
  186. greet_off.Text = "Off"
  187. greet_off.TextColor3 = Color3.fromRGB(255, 255, 255)
  188. greet_off.TextScaled = true
  189. greet_off.TextSize = 14.000
  190. greet_off.TextWrapped = true
  191. greet_off.MouseButton1Click:Connect(function()
  192.     greet_toggle = false
  193. end)
  194.  
  195. local UserInputService = game:GetService("UserInputService")
  196. local TweenService = game:GetService("TweenService")
  197. local gui = main
  198. local speed = 0.1
  199.  
  200. local dragging
  201. local dragInput
  202. local dragStart
  203. local startPos
  204.  
  205. local function update(input)
  206.     local delta = input.Position - dragStart
  207.     local goal = {}
  208.     goal.Position = UDim2.new(startPos.X.Scale, startPos.X.Offset + delta.X, startPos.Y.Scale, startPos.Y.Offset + delta.Y)
  209.     local tweenInfo = TweenInfo.new(speed)
  210.     local tween = TweenService:Create(gui, tweenInfo, goal)
  211.     tween:Play()
  212. end
  213.  
  214. gui.InputBegan:Connect(function(input)
  215.     if input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch then
  216.         dragging = true
  217.         dragStart = input.Position
  218.         startPos = gui.Position
  219.  
  220.         input.Changed:Connect(function()
  221.             if input.UserInputState == Enum.UserInputState.End then
  222.                 dragging = false
  223.             end
  224.         end)
  225.     end
  226. end)
  227.  
  228. gui.InputChanged:Connect(function(input)
  229.     if input.UserInputType == Enum.UserInputType.MouseMovement or input.UserInputType == Enum.UserInputType.Touch then
  230.         dragInput = input
  231.     end
  232. end)
  233.  
  234. UserInputService.InputChanged:Connect(function(input)
  235.     if input == dragInput and dragging then
  236.         update(input)
  237.     end
  238. end)
  239.  
  240. function format_url(url)
  241.     url = string.gsub(url,' ','%%20')
  242.     return url
  243. end
  244.  
  245. getWiki = function(word)
  246.     if not word then
  247.         return
  248.     end
  249.     word = format_url(word)
  250.     local response = HttpService:JSONDecode(game:HttpGet("https://api.dictionaryapi.dev/api/v2/entries/en_US/" .. word))
  251.     if not response or not response[1] or not response[1]['word'] then
  252.         return
  253.     end
  254.     return '/me |' .. response[1].word .. ': ' .. response[1].meanings[1].definitions[1].definition
  255. end
  256.  
  257. getVerse = function(passage)
  258.     if not passage then
  259.         passage = 'random'
  260.     end
  261.     passage = format_url(passage)
  262.     local response = HttpService:JSONDecode(game:HttpGet("https://labs.bible.org/api/?passage=" .. passage .. "&type=json"))
  263.     if not response then
  264.         wait()
  265.         return getVerse()
  266.     end
  267.     return '/me |' .. response[1].bookname .. " " .. response[1].chapter .. ":" .. response[1].verse .. " " .. response[1].text
  268. end
  269.  
  270. local t = tick()
  271. local msg = 0
  272. local can_msg = true
  273.  
  274. chat = function(content,msg,plr)
  275.     if can_msg or not plr then else return end
  276.     local wt = 0
  277.     if 1 >= tick()-t then
  278.         wt = 2
  279.     else
  280.         wt = 0
  281.     end
  282.     can_msg = false
  283.     wait(wt)
  284.     can_msg = true
  285.     t = tick()
  286.     local direct = false
  287.     if (msg and string.len(msg) >= 3 and string.sub(msg,1,3) == '/w ') --[[or (plr and plr ~= game:GetService("Players").LocalPlayer)]] then
  288.         direct = true
  289.     end
  290.     if direct then
  291.         game:GetService("ReplicatedStorage").DefaultChatSystemChatEvents.SayMessageRequest:FireServer('/w ' .. plr.Name .. ' ' .. content, "All")
  292.     else
  293.         game:GetService("ReplicatedStorage").DefaultChatSystemChatEvents.SayMessageRequest:FireServer(content, "All")
  294.     end
  295. end
  296.  
  297. local commands = {}
  298. local saved_response = {}
  299.  
  300. function blank(msg)
  301.     local args = string.split(msg,' ')
  302.     return args[2] == nil or args[2] == ' ' or args[2] == ''
  303. end
  304.  
  305. function save(plr,msg,ans)
  306.     if not saved_response[plr.UserId .. ' ' .. msg] then
  307.         saved_response[plr.UserId .. ' ' .. msg] = ans
  308.     end
  309. end
  310.  
  311. function load(plr,msg)
  312.     return saved_response[plr.UserId .. ' ' .. msg]
  313. end
  314.  
  315. commands.define = function(msg,plr)
  316.     local word = nil
  317.  
  318.     if not blank(msg) then
  319.         local args = string.split(msg,' ')
  320.         word = string.sub(msg,string.len(args[1] .. '  '),string.len(msg))
  321.     end
  322.  
  323.     local define = getWiki(word)
  324.     if string.len(define) > 200 then
  325.         return
  326.     end
  327.     chat(define,msg,plr)
  328. end
  329.  
  330. commands.verse = function(msg,plr)
  331.     local passage = nil
  332.    
  333.     if not blank(msg) then
  334.         local args = string.split(msg,' ')
  335.         passage = string.sub(msg,string.len(args[1] .. '  '),string.len(msg))
  336.     end
  337.    
  338.     local bible = getVerse(passage)
  339.     if string.len(bible) > 200 then
  340.         repeat
  341.             game:GetService("RunService").Heartbeat:Wait()
  342.             bible = getVerse()
  343.         until string.len(bible) < 200
  344.     end
  345.     chat(bible,msg,plr)
  346. end
  347.  
  348. commands.askgod = function(msg,plr)
  349.     if blank(msg) then return end
  350.     local ans = {
  351.         "Yes"; "No"; "It may be best for you not to know"; "Your question is beyond your mortal comprehension."; "Blasphemy! Ask no more."; "I do not care to entertain your trivial question.";
  352.         "You should be ashamed of what you are asking."; "Perhaps."; "I have nothing to say about it"; "I refuse to answer that"; "This is not a question befit for me, ask another."; "Try re-asking that question, I can't purely understand a thing you're saying.";
  353.         "A pity, made in my image yet couldn't ask a more reasonable question for me...";"Such foul words, I am ashamed of you";"Think twice of what you ask of me.";
  354.         "What you are asking me is blasphemy! Confess your sin to me or face your consequences";"You exist to suffer, no further comment.";"I didn't set fire to Gommorah for you to ask such a foolish question!";"Your question is why Judgement Day will come for us sooner than before.";"This question is beneath me, ask another!";
  355.     }
  356.     ans = ans[math.random(#ans)]
  357.     ans = ans .. ' ' .. plr.Name .. '.'
  358.    
  359.     save(plr,msg,ans)
  360.     ans = load(plr,msg) or ans
  361.    
  362.     chat(ans,msg,plr)
  363. end
  364.  
  365. commands.help = function(msg,plr)
  366.     local ans = "!askgod [question] | !verse [custom] | !help | !confess [sin] | !pray [prayer] | !commandment [1-10] | !define [word]"
  367.     chat(ans,msg,plr)
  368. end
  369.  
  370. commands.confession = function(msg,plr)
  371.     if blank(msg) then return end
  372.     local ans = {"Your sin has been forgiven, rejoice!";"I am overjoyed you have acknowledged your sin, God shall forgive you.";"You are forgiven, be glad Jesus died for your sake.";"I can see your sin weighs heavily on you, God has forgiven you!";"This is a sin that can not be easily forgiven, I demand you say Glory To God 20 times!";"Your sin mocks the commandments put forth by Our Almighty God, 20 Holy Mary's!";"Your blasphemy ends here, pray Our Father and Holy Mary 30 times each right now!";"Your actions disgust our Lord";"Satan, smite " .. plr.Name .. " down for " .. plr.Name .. " has dared to defy God himself."};
  373.     ans = ans[math.random(#ans)]
  374.     ans = ans .. ' ' .. plr.Name .. '.'
  375.  
  376.     save(plr,msg,ans)
  377.     ans = load(plr,msg) or ans
  378.  
  379.     chat(ans,msg,plr)
  380. end
  381.  
  382. commands.pray = function(msg,plr)
  383.     if blank(msg) then return end
  384.     local ans = {"Amen";"Your greed terrifies me, confess your sin so that I may judge you by typing !confess [describe your foul actions here]";"Your prayer will be answered, Hallelujah!";"Your prayer has been rejected for blasphemy! type !confess [your sin here] for judgement.";"I understand your feelings, it shall be done soon";"What you ask will be done, be patient my son";"Your prayer will be granted, when the time comes."}
  385.     ans = ans[math.random(#ans)]
  386.     ans = ans .. ' ' .. plr.Name .. '.'
  387.  
  388.     save(plr,msg,ans)
  389.     ans = load(plr,msg) or ans
  390.  
  391.     chat(ans,msg,plr)
  392. end
  393.  
  394. commands.shutup = function(msg,plr)
  395.     local ans = {"Do not say that out loud, ";"Do you really want me to cleanse your mouth with holy water?";"I will not tolerate you saying those words in this server, so take your own advice and close thine mouth in the name of the Christian Roblox place owner.";"That is not how you treat the members of the Church,";"Honor one another above yourselves, ";"Do not be so rude, ";"Treat others with respect as God has made us a family, ";}
  396.     ans = ans[math.random(#ans)]
  397.     ans = ans .. ' ' .. plr.Name .. '.'
  398.  
  399.     save(plr,msg,ans)
  400.     ans = load(plr,msg) or ans
  401.  
  402.     chat(ans,msg,plr)
  403. end
  404.  
  405. commands.commandment = function(msg,plr)
  406.     local ans = {
  407.         "You shall have no other Gods before me";
  408.         "You shall not make for yourselves an idol";
  409.         "You shall not misuse the name of the LORD your God";
  410.         "Remember the Sabbath day by keeping it holy";
  411.         "Honor your father and your mother";
  412.         "You shall not murder";
  413.         "You shall not commit adultery";
  414.         "You shall not steal";
  415.         "You shall not give false testimony";
  416.         "You shall not covet";
  417.     }
  418.    
  419.     local args = string.split(msg,' ')
  420.     local choice = tonumber(args[2])
  421.     if choice then else
  422.         choice = math.random(1,#ans)
  423.     end
  424.    
  425.     ans = choice .. ': ' .. ans[choice]
  426.     chat(ans,msg,plr)
  427. end
  428.  
  429. if not _G['sid'] then
  430.     _G['sid'] = 0
  431. end
  432. _G['sid'] = _G['sid'] + 1
  433. local sid = _G['sid']
  434.  
  435. local bad_words = {
  436.     'idiot',
  437.     'gosh',
  438.     'darn',
  439.     'stupid',
  440.     'moron',
  441.     'scum',
  442.     'jeez',
  443.     'omg',
  444.     'heck',
  445.     'hell',
  446. }
  447.  
  448. function find_word(msg,t)
  449.     for i,v in pairs(bad_words) do
  450.         if string.match(msg,v) then
  451.             return true
  452.         end
  453.     end
  454. end
  455.  
  456. local spam_warn = {"You're getting on my nerves.";"Are you just going to repeat the same thing?";"Can you say anything else?";"You're getting boring";"I'm waitng for a different response.";"Are you trying to get ignored?"}
  457. local spam_ban = {"It's a shame you had to get put on the ignore list.";"Looks like you should have learned your lesson.";"You did not have enough faith to keep talking.";"It's a shame you're now ignored."}
  458. local spam_count = nil
  459. local max_count = 5
  460.  
  461. function update_spam_list()
  462.     if not spam_count then
  463.         spam_count = _G['spam_count'] or {}
  464.         _G['spam_count'] = spam_count
  465.     end
  466.     _G['spam_count'] = spam_count
  467. end
  468. update_spam_list()
  469.  
  470. function is_plr(plr)
  471.     if plr == game:GetService("Players").LocalPlayer then
  472.         return true
  473.     end
  474. end
  475.  
  476. onPlayerChat = function(chat_type,plr,msg)
  477.     local s,r = pcall(function()
  478.         if sid == _G['sid'] then else return end
  479.         msg = string.lower(msg)
  480.         local pid = plr.UserId
  481.         local same_msg = false
  482.         if not spam_count[pid] then
  483.             spam_count[pid] = {
  484.                 count = 0,
  485.                 last_msg = '',
  486.                 ignored = false,
  487.             }
  488.         end
  489.         if spam_count[pid].last_msg == msg then
  490.             same_msg = false --true
  491.         end
  492.         spam_count[pid].last_msg = msg
  493.         if spam_count[pid].ignored and not is_plr(plr) then
  494.             return
  495.         end
  496.         update_spam_list()
  497.  
  498.         if (string.match(msg,'!askgod') or string.match(msg,'!ask')) and not same_msg then
  499.             commands.askgod(msg,plr)
  500.         elseif (string.match(msg,'!verse') or string.match(msg,'!bible')) and not same_msg then
  501.             commands.verse(msg,plr)
  502.         elseif (string.match(msg,'!help') or string.match(msg,'!cmds')) and not same_msg then
  503.             commands.help(msg,plr)
  504.         elseif (string.match(msg,'!pray')) and not same_msg then
  505.             commands.pray(msg,plr)
  506.         elseif (string.match(msg,'!confess')) and not same_msg then
  507.             commands.confession(msg,plr)
  508.         elseif (string.match(msg,'!define') or string.match(msg,'!dict') or string.match(msg,'!dictionary')) and not same_msg then
  509.             commands.define(msg,plr)
  510.         elseif (find_word(msg,bad_words) and not is_plr(plr)) and not same_msg then
  511.             commands.shutup(msg,plr)
  512.         elseif (string.match(msg,'!commandment') or string.match(msg,'!command') or string.match(msg,'!rule')) and not same_msg then
  513.             commands.commandment(msg,plr)
  514.         elseif not same_msg then
  515.             return
  516.         end
  517.  
  518.         if same_msg and not is_plr(plr) then
  519.             local ans = spam_warn[math.random(#spam_warn)]
  520.             ans = ans .. ' ' .. plr.Name .. '.'
  521.             spam_count[pid].count = spam_count[pid].count + 1
  522.             if spam_count[pid].count > max_count then
  523.                 ans = spam_ban[math.random(#spam_ban)]
  524.                 ans = ans .. ' ' .. plr.Name .. '.'
  525.                 spam_count[pid].ignored = true
  526.             end
  527.             chat(ans,msg,plr)
  528.             return
  529.         end
  530.         update_spam_list()
  531.     end)
  532.     --warn(s,r)
  533. end
  534.  
  535. Players.PlayerChatted:Connect(onPlayerChat)
  536.  
  537. Players.PlayerAdded:Connect(function(NewPlayer)
  538.     if sid == _G['sid'] then else return end
  539.     local welcomeSentence = {
  540.         "Greetings " .. NewPlayer.Name .. ", study the bible to further your blossoming faith by chatting !verse ๐Ÿ”";
  541.         "Welcome " .. NewPlayer.Name .. "! to Bibleblox! Study the bible with upmost vigor by chatting !verse ๐Ÿ™‚";
  542.         "Hello " .. NewPlayer.Name .. "! Bible bot is here to guide you. Start by chatting !help ๐Ÿ˜Š";
  543.         "Welcome to the most holy place in Roblox " .. NewPlayer.Name .. ". Study the bible as soon as possible by chatting !verse ๐Ÿ™‚";
  544.         "Feel free to ask any question to Our Almighty God by chatting !askgod [question] ๐Ÿ˜";
  545.         "Welcome to the most religious place in Roblox " .. NewPlayer.Name .. ". โ›ช";
  546.         function()
  547.             if os.date("*t").hour > 12 and os.date("*t").hour < 18 then
  548.                 return "Welcome " .. NewPlayer.Name .. " to the afternoon bible study session. Open your bible by chatting !verse. ๐Ÿ“–"
  549.             elseif os.date("*t").hour > 18 or os.date("*t").hour < 5 then
  550.                 return "Welcome " .. NewPlayer.Name .. " to the night bible study session. Open your bible by chatting !verse. ๐Ÿ“–"
  551.             elseif os.date("*t").hour > 5 and os.date("*t").hour < 12 then
  552.                 return "Welcome " .. NewPlayer.Name .. " to the morning bible study session. Open your bible by chatting !verse. ๐Ÿ“–"
  553.             end
  554.         end;
  555.         function()
  556.             if os.date("*t").hour > 12 and os.date("*t").hour < 18 then
  557.                 return "Gosh! " .. NewPlayer.Name .. " you're late to the afternoon bible study session! Open your bible by chatting !verse quickly!! ๐Ÿ“–"
  558.             elseif os.date("*t").hour > 18 or os.date("*t").hour < 5 then
  559.                 return  NewPlayer.Name .. " I can't believe you are, ahem, THIS late to the night bible study! Open the bible ASAP(chat !verse) ๐Ÿ“–"
  560.             elseif os.date("*t").hour > 5 and os.date("*t").hour < 12 then
  561.                 return "Oh my!  " .. NewPlayer.Name .. " You are late to the morning bible study session! Chat !verse to open the bible ๐Ÿ“–"
  562.             end
  563.         end;
  564.         function()
  565.             if os.date("*t").hour > 12 and os.date("*t").hour < 18 then
  566.                 return  NewPlayer.Name .. ", God will give you a second chance for making him wait " .. 18 - os.date("*t").hour .. " hours to listen your question(Chat !askgod to ask question) โŒš"
  567.             elseif os.date("*t").hour > 18 or os.date("*t").hour < 5 then
  568.                 return NewPlayer.Name .. ", God will give you a second chance for making him wait " .. os.date("*t").hour - 5 .. " hours to listen your question(Chat !askgod to ask question) โŒš"
  569.             elseif os.date("*t").hour > 5 and os.date("*t").hour < 12 then
  570.                 return NewPlayer.Name .. ", God will give you a second chance for making him wait " .. os.date("*t").hour - 5 .. " hours to listen your question(Chat !askgod to ask question) โŒš"
  571.             end
  572.         end;
  573.     }
  574.     for cycle,sentence in next,welcomeSentence do
  575.         if greet_toggle == true then
  576.             if cycle == math.random(#welcomeSentence) then
  577.                 if type(sentence) == "function" then
  578.                     chat(sentence())
  579.                 else
  580.                     chat(sentence)
  581.                 end
  582.                 break
  583.             end
  584.         end
  585.     end
  586. end)
  587.  
  588. ad = {
  589.     "Greetings all, I am Bible bot! And I guide the masses towards realizing the true faith. Chat !help to know all the available commands for me ๐Ÿค–๐Ÿ’’";
  590.     "I have come forth to bring the good news to all! Chat !verse to hear of it ๐Ÿ“ฐ";
  591.     "You can start believing as soon as now! Type !verse to start ๐Ÿ™";
  592.     "Stay connected! Keep having faith by catching the next verse using !verse ๐Ÿ“";
  593.     "Forgot the commandments? No problem! You can get one of them by chatting !commandment [1-10] ๐Ÿงพ";
  594.     "For a good refresher, type !commandment [1-10] to get one ๐Ÿงพ";
  595.     "Pray before bed and before eating. God is watching! Type !help if you're lost ๐Ÿ™";
  596.     "I spread the word of the great Almighty God but you can also run !define [word] on me ๐Ÿ“–";
  597.     "Did you know? Bible bot also has a dictionary command! Try using !define [word], don't forget your studies! ๐Ÿ“–";
  598.     "Do not live in sin or suffer for eternity in hell! Chat !help to know the available commands for bible bot ๐Ÿค–";
  599.     "Always remember to pray to God. Chat !pray [someone or something you want] to learn what He has in store for your prayer ๐Ÿ™";
  600.     "Remember to study the bible and praise Our Lord God to further your love for Him. type !verse to study a verse of the bible, Chat !help to know other commands ๐Ÿ”Ž๐Ÿ“š";
  601.     "Submit to the divine authority of God and learn more of the one true faith by typing !help to know all the available commands of bible bot ๐Ÿค–"
  602. }
  603.  
  604. local lplr = game:GetService("Players").LocalPlayer
  605.  
  606. lplr.Idled:connect(function()
  607.     if sid == _G['sid'] then else
  608.         return
  609.     end
  610.     game:GetService("VirtualUser"):CaptureController()
  611.     game:GetService("VirtualUser"):ClickButton2(Vector2.new())
  612. end)
  613.  
  614. while sid == _G['sid'] do
  615.     if ads_toggle then
  616.         chat(ad[math.random(#ad)])
  617.         local t = tick()
  618.         repeat
  619.             wait(0.1)
  620.         until tick()-t > timerbb
  621.     end
  622.     wait()
  623. end
RAW Paste Data