Quarry ]|[ Skript #321

#GUI when clicking on it
function checkQuarry(p: Player, loc: Location) :: boolean:
	set {_below} to block 1 meters below {_loc}
	if block at {_below} is not dropper:
		return false
	set {_detected} to false
	if block at location 1 meters north of {_below} is hopper:
		if block at location 1 meters south of {_below} is chest:
			if block at location 2 meters south of {_below} is chest:
				set {_detected} to true
				set {quarry.chestDetect.%{_loc}%} to north
	else if block at location 1 meters east of {_below} is hopper:
		if block at location 1 meters west of {_below} is chest:
			if block at location 2 meters west of {_below} is chest:
				set {_detected} to true
				set {quarry.chestDetect.%{_loc}%} to east
	else if block at location 1 meters south of {_below} is hopper:
		if block at location 1 meters north of {_below} is chest:
			if block at location 2 meters north of {_below} is chest:
				set {_detected} to true
				set {quarry.chestDetect.%{_loc}%} to south
	else if block at location 1 meters west of {_below} is hopper:
		if block at location 1 meters east of {_below} is chest:
			if block at location 2 meters east of {_below} is chest:
				set {_detected} to true
				set {quarry.chestDetect.%{_loc}%} to west

	return {_detected}

function quarryGUI(p: Player, loc: Location):
	set {quarry.open.%{_p}%} to {_loc}
	open chest with 5 rows named "Quarry" to {_p}
	wait 2 ticks
	set {_count} to 45
	loop 9 times:
		set slot loop-value - 1 of {_p}'s current inventory to gray stained glass pane named "&8"
		set slot {_count} - loop-value of {_p}'s current inventory to gray stained glass pane named "&8"

	loop 4 times:
		set slot 9*loop-value of {_p}'s current inventory to gray stained glass pane named "&8"
		set slot 9*loop-value - 1 of {_p}'s current inventory to gray stained glass pane named "&8"

	if {quarry.list.%{_loc}%.enabled} is true:
		set slot 21 of {_p}'s current inventory to lime shulker box named "&aEnabled"
		set slot 23 of {_p}'s current inventory to red shulker box named "&cDisable"
	else:
		set slot 21 of {_p}'s current inventory to lime shulker box named "&aEnable"
		set slot 23 of {_p}'s current inventory to red shulker box named "&cDisabled"

on rightclick on daylight detector:
	if checkQuarry(player, location of clicked block):
		cancel event
		quarryGUI(player, location of clicked block)

on inventory click:
	if inventory name of player's current inventory is "Quarry":
		cancel event
		if clicked slot is 21:
			if name of clicked item is "&aEnable":
				set {quarry.list.%{quarry.open.%player%}%.enabled} to true
				set slot 21 of player's current inventory to lime shulker box named "&aEnabled"
				set slot 23 of player's current inventory to red shulker box named "&cDisable"
				play "ENTITY_PLAYER_LEVELUP" to player at volume 10
				if {quarry.chest.%{quarry.open.%player%}%} is not set:
					if {quarry.chestDetect.%{quarry.open.%player%}%} is north:
						set {quarry.chest.%{quarry.open.%player%}%} to block at location 1 meters below and 1 meters north of {quarry.open.%player%}

					else if {quarry.chestDetect.%{quarry.open.%player%}%} is east:
						set {quarry.chest.%{quarry.open.%player%}%} to block at location 1 meters below and 1 meters east of {quarry.open.%player%}

					else if {quarry.chestDetect.%{quarry.open.%player%}%} is south:
						set {quarry.chest.%{quarry.open.%player%}%} to block at location 1 meters below and 1 meters south of {quarry.open.%player%}

					else if {quarry.chestDetect.%{quarry.open.%player%}%} is west:
						set {quarry.chest.%{quarry.open.%player%}%} to block at location 1 meters below and 1 meters west of {quarry.open.%player%}

				set {_quarry} to {quarry.open.%player%}
				delete {quarry.current.%{_quarry}%}
				if {quarry.current.%{_quarry}%} is not set:
					if {quarry.chestDetect.%{quarry.open.%player%}%} is north:
						set {quarry.current.%{_quarry}%} to location 3 meters west and 1 meters north and 2 meters below {_quarry}
					else if {quarry.chestDetect.%{quarry.open.%player%}%} is east:
						set {quarry.current.%{_quarry}%} to location 3 meters north and 1 meters east and 2 meters below {_quarry}
					else if {quarry.chestDetect.%{quarry.open.%player%}%} is south:
						set {quarry.current.%{_quarry}%} to location 3 meters east and 1 meters south and 2 meters below {_quarry}
					else if {quarry.chestDetect.%{quarry.open.%player%}%} is west:
						set {quarry.current.%{_quarry}%} to location 3 meters south and 1 meters west and 2 meters below {_quarry}

				while {quarry.list.%{_quarry}%.enabled}:
					#3 east, 1 north
					set {_mine} to false
					if {quarry.row.%{_quarry}%} is not set:
						set {quarry.row.%{_quarry}%} to 0
					if {quarry.colmn.%{_quarry}%} is not set:
						set {quarry.colmn.%{_quarry}%} to 0
					if {quarry.depth.%{_quarry}%} is not set:
						set {quarry.depth.%{_quarry}%} to 0

					if {quarry.row.%{_quarry}%} > 5:
						set {quarry.row.%{_quarry}%} to 0
						if {quarry.colmn.%{_quarry}%} <= 5:
							add 1 to {quarry.colmn.%{_quarry}%}
						else:
							set {quarry.colmn.%{_quarry}%} to 0
							if y-coordinate of {quarry.current.%{_quarry}%} > 0:
								add 1 to {quarry.depth.%{_quarry}%}
								set {quarry.current.%{_quarry}%} to location {quarry.depth.%{_quarry}%} meters below {_quarry}
							else:
								set {quarry.list.%{_quarry}%.enabled} to false
								delete {quarry.current.%{_quarry}%}
					else:
						add 1 to {quarry.row.%{_quarry}%}

					checkQuarry("" parsed as an offline player, {_quarry})
					set {_b} to block at {quarry.current.%{_quarry}%}
					add {_b} to {quarry.chest.%{_quarry}%}


					set {_mine} to true
					if {_mine}:
						wait 7 seconds

			else:
				play "ENTITY_ITEM_BREAK" to player at volume 10
		else if clicked slot is 23:
			if name of clicked item is "&cDisable":
				delete {quarry.list.%{quarry.open.%player%}%.enabled}
				set slot 21 of player's current inventory to lime shulker box named "&aEnable"
				set slot 23 of player's current inventory to red shulker box named "&cDisabled"
				#CHECK SET AND SET INTO VARIABLE
				play "ENTITY_PLAYER_LEVELUP" to player at volume 10
			else:
				play "ENTITY_ITEM_BREAK" to player at volume 10