minesweeper/Generate.lua at main · numberss/minesweeper · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
local Generate = {}

local Cell = require(game:GetService("ReplicatedStorage"):WaitForChild("Cells"))

local minefield = workspace:WaitForChild("Minefield"):WaitForChild("SurfaceGui"):WaitForChild("Minefield")

function Generate.SetupGrid(totalMines : number, w : number, h : number, static : boolean)
	minefield:ClearAllChildren()
	local minefieldConstraint = Instance.new("UIAspectRatioConstraint", minefield)
	local minefieldCorner = Instance.new("UICorner", minefield)
	local minefieldStroke = Instance.new("UIStroke", minefield)
	minefieldStroke.Thickness = 10
	minefieldCorner.CornerRadius = UDim.new(0, 10)
	minefield:SetAttribute("Width", w)
	minefield:SetAttribute("Height", h)

	for i=1, h do
		for j=1, w do
			minefield.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
			local button = Instance.new("TextButton")
			button.Name = i.."|"..j
			button.Size = UDim2.new(0.9/w, 0, 0.9/h, 0)
			button.Position = UDim2.new((j-0.95)/w, 0, (i-0.95)/h, 0)
			button.Font = Enum.Font.FredokaOne
			button.TextScaled = true
			button.Text = ""
			button.BackgroundColor3 = Color3.fromRGB(103, 103, 103)
			button:SetAttribute("NearbyMines", 0)
			button:SetAttribute("Mine", false)
			button:SetAttribute("Flagged", false)
			button:SetAttribute("Revealed", false)
			button.Parent = minefield
			local corner = Instance.new("UICorner", button)
			corner.CornerRadius = UDim.new(0.1,0)
			local stroke = Instance.new("UIStroke", button)
			stroke.ApplyStrokeMode = Enum.ApplyStrokeMode.Border
			stroke.Thickness = 5
		end
	end
	Generate.PlaceMines(totalMines)
	Generate.DiscoverBoard()
	Generate.FindFirstCell()
	minefield:SetAttribute("Static", static)
end

function Generate.PlaceMines(totalMines : number)
	for i=1, totalMines do
		local x = math.random(1,minefield:GetAttribute("Width"))
		local y = math.random(1,minefield:GetAttribute("Height"))
		local button = minefield:FindFirstChild(x.."|"..y)
		if not button then continue end
		while button:GetAttribute("Mine") do
			x += 1
			if x > minefield:GetAttribute("Width") then
				x = 1
				y += 1
				if y > minefield:GetAttribute("Height") then
					y = 0
				end
			end
			button = minefield:FindFirstChild(x.."|"..y)
		end
		button:SetAttribute("Mine", true)
	end
end

function Generate.DiscoverBoard()
	for i=1, minefield:GetAttribute("Width") do
		for j=1, minefield:GetAttribute("Height") do
			local button = minefield:FindFirstChild(i.."|"..j)
			Cell.GetSurroundingMines(button)
		end
	end
end

function Generate.FindFirstCell()
	for i=1, minefield:GetAttribute("Width") do
		for j=1, minefield:GetAttribute("Height") do
			local button = minefield:FindFirstChild(i.."|"..j)
			if button:GetAttribute("NearbyMines") == 0 then
				Cell.UpdateCell(button, false)
				return
			end
		end
	end
end

return Generate