Resetting Mines Af! ]|[ Skript #461

options:
	prefix: &6Mines&8:&7
	mineResetDelay: 300

on quit:
	delete {mine.user.%uuid of player%.isConfirmingMine}
	delete {mine.user.%uuid of player%.isShowingMine}
	loop {mine.user.%uuid of player%.fallingBlocks::*}:
		kill loop-value

on disable:
	loop all players:
		delete {mine.user.%uuid of loop-player%.isConfirmingMine}
		delete {mine.user.%uuid of loop-player%.isShowingMine}
		loop {mine.user.%uuid of loop-player%.fallingBlocks::*}:
			kill loop-value-2

	if {mine.isLoopingMines} is true:
		set {mine.loopingMinesStopped} to true
		set {mine.disableTime} to now

on enable:
	if difference between {mine.disableTime} and now >= 10 seconds:
		delete {mine.isLoopingMines}
	while {mine.isLoopingMines} is true:
		wait 5 ticks
	set {mine.looping.currentDelay} to 0
	if {mine.loopingMinesStopped} is true:
		delete {mine.loopingMinesStopped}
		delete {mine.isLoopingMines}
		startLoopingMines()

function startLoopingMines():
	if {mine.isLoopingMines} or {mine.loopingMinesStopped} is true:
		stop
	else if {mine.list::*} is empty:
		stop

	set {mine.isLoopingMines} to true
	while {mine.isLoopingMines} is true:
		if {mine.loopingMinesStopped} is true:
			delete {mine.isLoopingMines}
			set {mine.looping.currentDelay} to 0
			stop
		else if {mine.list::*} is empty:
			delete {mine.isLoopingMines}
			set {mine.looping.currentDelay} to 0
			stop
		add 1 to {mine.looping.currentDelay}
		if {mine.looping.currentDelay} >= {@mineResetDelay}:
			loop {mine.list::*}:
				resetMine(loop-value)
			broadcast "{@prefix} All mines have been reset!"
			set {mine.looping.currentDelay} to 0
		else if "%{mine.looping.currentDelay}/60%" doesn't contain ".":
			broadcast "{@prefix} The mines will reset in &e%({@mineResetDelay}-{mine.looping.currentDelay}) / 60% &eminutes&7."
		else if {@mineResetDelay}-{mine.looping.currentDelay} < 60:
			if {@mineResetDelay}-{mine.looping.currentDelay} is 30 or 15 or 10 or 5:
				broadcast "{@prefix} The mines will reset in &e%{@mineResetDelay}-{mine.looping.currentDelay}% &eseconds&7."
		wait 20 ticks
command /reset:
	trigger:
		loop {mine.list::*}:
			resetMine(loop-value)



function resetMine(id: String):
	set {_location} to {mine.%{_id}%.location}
	loop {mine.%{_id}%.depth} times:
		loop {mine.%{_id}%.width} times:
			loop {mine.%{_id}%.length} times:
				set {_selectedLocation} to location -1+loop-value-1 meters below, -1+loop-value-2 meters east and -1+loop-value-3 meters north of {_location}
				if block at {_selectedLocation} is air:
					if chance of 1.3%:
						set block at {_selectedLocation} to diamond ore
					else if chance of 0.1%:
						set block at {_selectedLocation} to emerald ore
					else if chance of 3.7%:
						set block at {_selectedLocation} to lapis ore
					else if chance of 5.8%:
						set block at {_selectedLocation} to redstone ore
					else if chance of 5.5%:
						set block at {_selectedLocation} to gold ore
					else if chance of 13.2%:
						set block at {_selectedLocation} to iron ore
					else if chance of 18.9%:
						set block at {_selectedLocation} to coal ore
					else:
						set block at {_selectedLocation} to stone

command /mine [<text>] [<text>] [<text>] [<text>] [<text>]:
	aliases: /mines
	trigger:
		if executor is not a player:
			send "{@prefix} This command can only be executed by a player."
		else if arg-1 is "create":
			if arg-2 is not set:
				send "{@prefix} Invalid Usage! &e/mine create <id> <length> <depth> <width>&7."
			else if {mine.list::*} contains arg-2 in lower case:
				send "{@prefix} A mine with the id &e%arg-2 in lower case% &7already exists."
			else if {mine.user.%uuid of player%.isConfirmingMine} is true:
				send "{@prefix} You are already creating a mine. Either cancel or confirm the mine first."
			else if isNotANumber(player, arg-3, "<length>", "<depth>", "<width>"), isNotANumber(player, arg-4, arg-3, "<depth>", "<width>") or isNotANumber(player, arg-5, arg-3, arg-4, "<width>") is false:
				stop
			else:
				set {mine.user.%uuid of player%.isConfirmingMine} to true
				set {mine.user.%uuid of player%.location} to location of block at location of player
				set {mine.user.%uuid of player%.id} to arg-2 in lower case
				set {mine.user.%uuid of player%.length} to arg-3 parsed as an integer
				set {mine.user.%uuid of player%.depth} to arg-4 parsed as an integer
				set {mine.user.%uuid of player%.width} to arg-5 parsed as an integer
				showMineToConfirm(player)
				send "{@prefix} Please confirm you want to create a mine with as parameters &e%arg-3% &e%arg-4% &e%arg-5%&7."
				send "{@prefix} To confirm, please type &e/mine <confirm | cancel>&7."

		else if arg-1 is "delete":
			if arg-2 is not set:
				send "{@prefix} Invalid Usage! &e/mine delete <id> <length> <depth> <width>&7."
			else if {mine.list::*} doesn't contain arg-2 in lower case:
				send "{@prefix} A mine with the id &e%arg-2 in lower case% &7does not exist."
			else:
				set {_id} to arg-2 in lower case
				remove {_id} from {mine.list::*}
				send "{@prefix} The mine &e%{_id}% &7has been deleted!"
		else if arg-1 is "confirm":
			if {mine.user.%uuid of player%.isConfirmingMine} is not true:
				send "{@prefix} Invalid Usage! &e/mine <create | delete> <id> <length> <depth> <width>&7."
			else:
				if {mine.list::*} contains {mine.user.%uuid of player%.id}:
					send "{@prefix} A mine with the id &e%arg-2 in lower case% &7already exists."
					delete {mine.user.%uuid of player%.isConfirmingMine}
					delete {mine.user.%uuid of player%.isShowingMine}
				else:

					loop {mine.user.%uuid of player%.fallingBlocks::*}:
						set health of loop-value to 0
						kill loop-value
					add {mine.user.%uuid of player%.id} to {mine.list::*}
					set {_id} to {mine.user.%uuid of player%.id}
					set {mine.%{_id}%.location} to {mine.user.%uuid of player%.location}
					set {mine.%{_id}%.length} to {mine.user.%uuid of player%.length}+1
					set {mine.%{_id}%.depth} to {mine.user.%uuid of player%.depth}+1
					set {mine.%{_id}%.width} to {mine.user.%uuid of player%.width}+1
					delete {mine.user.%uuid of player%.isConfirmingMine}
					send "{@prefix} You have created the mine &e%{_id}%&7!"
					resetMine({_id})
					startLoopingMines()
		else if arg-1 is "cancel":
			if {mine.user.%uuid of player%.isConfirmingMine} is not true:
				send "{@prefix} Invalid Usage! &e/mine <create | delete> <id> <length> <depth> <width>&7."
			else:
				delete {mine.user.%uuid of player%.isConfirmingMine}
				delete {mine.user.%uuid of player%.isShowingMine}
				send "{@prefix} You have cancelled creating the mine."
				loop {mine.user.%uuid of player%.fallingBlocks::*}:
					kill loop-value
		else:
			send "{@prefix} Invalid Usage! &e/mine <create | delete> <id> <length> <depth> <width>&7."

function isNotANumber(player: Player, input: String, length: String, depth: String, width: String) :: Boolean:
	if {_input} parsed as an integer is not set:
		send "{@prefix} Invalid Usage! &e/mine create <id> %{_length}% &e%{_depth}% &e%{_width}%&7." to {_player}
		return false
	return true

function showMineToConfirm(player: Player):
	set {_uuid} to uuid of {_player}
	if {mine.user.%{_uuid}%.isShowingMine} is true:
		stop
	set {mine.user.%{_uuid}%.isShowingMine} to true
	set {_locationOffsetNorth::*} to 0, 0, {mine.user.%{_uuid}%.length} and {mine.user.%{_uuid}%.length}
	set {_locationOffsetEast::*} to 0, {mine.user.%{_uuid}%.width}, {mine.user.%{_uuid}%.width} and 0
	loop 8 times:
		if loop-value < 5:
			spawn falling sea lantern at location {_locationOffsetNorth::%loop-value%} meters north and {_locationOffsetEast::%loop-value%} meters east of {mine.user.%{_uuid}%.location}
		else:
			spawn falling sea lantern at location {mine.user.%{_uuid}%.depth} meters below, {_locationOffsetNorth::%loop-value - 4%} meters north and {_locationOffsetEast::%loop-value - 4%} meters east of {mine.user.%{_uuid}%.location}

		set {_entity} to spawned entity
		hide {_entity} for all players
		show {_entity} to {_player}
		add {_entity} to {mine.user.%{_uuid}%.fallingBlocks::*}
		add "{NoGravity:1b,Invulnerable:1b}" to nbt of {_entity}