battle

options:
	s: &c[Void]&6

command /start:
	permission: siso
	trigger:
		if {game} is true:
			send "&c既に開始されています"
			stop
		set {game} to true
		set {timers} to "&63 minutes"
		broadcast "{@s} ゲームを開始します"
		wait 3 seconds
		loop all players:
			if {nojoin.%loop-player%} is "on":
				send "&cあなたは今回のゲームには参加しません" to loop-player
			else:
				add loop-player to {allplayer::*}
				add loop-player to {member::*}
		if {member::*} is not set:
			broadcast "{@s} &cゲームを開始できません"
			wait 3 seconds
			execute console command "/stopgame"
			stop
		if size of {member::*} <= 1:
			broadcast "{@s} &cゲームを開始できません"
			wait 3 seconds
			execute console command "/stopgame"
			stop
		delete {map}
		set {map} to random element of {map::*}
		loop {allplayer::*}:
			execute console command "/gamemode 0 %loop-value%"
			teleport loop-value to {map}
		stop

on death of player:
	{game} is true
	set death message to "&a%attacker% &6-> &c%victim%"
	add 1 to {kill.%attacker%}
	add 5 to {xp.%attacker%}
	force respawn victim
	clear victim's inventory
	if {red::*} contain victim:
		teleport victim to {map.spawn.%{map}%.red}
	else:
		teleport victim to {bluespawn}
	item(victim)

command /stopgame:
	trigger:
		broadcast "{@s} ゲームを終了しました"
		set {game} to false
		set {pvp} to false
		loop {allplayer::*}:
			teleport loop-value to {lobby}
			clear loop-value's inventory
			add 100 to loop-value's health
			set loop-value's gamemode to adventure
			apply potion of saturation 255 to loop-value for 2 seconds
			command "/effect @a clear"
			lvup(loop-value)
			rs(loop-value)
		delete {allplayer::*}
		remap()

function item(p: player):
	set slot 0 of {_p} to iron sword
	set slot 1 of {_p} to bow
	set slot 2 of {_p} to 64 planks
	set slot 3 of {_p} to 3 golden apple
	set slot 8 of {_p} to fishing rod
	set player's helmet to iron helmet
	set player's leggings to iron leggings
	set player's chestplate to iron chestplate
	set player's chestplate to iron boots
on break:
	{allplayer::*} contain player
	set {break::%location of event-block%} to type of event-block

on place:
	{allplayer::*} contain player


function remap():
	Async:
		loop {break::*}:
			set {_loc::*} to substring of loop-index from 7 to length of loop-index split at ","
			set {_x} to {_loc::1} parsed as number
			set {_y} to {_loc::2} parsed as number
			set {_z} to {_loc::3} parsed as number
			set block at location ({_x}, {_y}, {_z}) to loop-value
		delete {break::*}
on quit:
	if {allplayer::*} contain player:
		remove 1 from {allplayer::*}
		wait 3 tick
		if size of {allplayer::*} <= 1:
			broadcast "{@s} 人数が一人になったので強制終了します。"
	wait 3 seconds
	execute console command "/stopgame"
	wait 5 tick
	loop all players:
		set tab header to "&5&lMurder Mystery" and footer to "&6&lSisoPixel &a%number of all players%&7/15" for loop-player
on join:
	broadcast "&e%player%&6さんが参加しました"
	rs(player)
	command "/clear %player%"
	set player's gamemode to adventure
	teleport player to {lobby}
	set player tab name to "&6&l[&a&lLv%{lv.%player%}%&6&l] &f%player%"
	loop all players:
		set tab header to "&5&lMurder Mystery" and footer to "&6&lSisoPixel &a%number of all players%&7/15" for loop-player
on first join:
	set {xp.%player%} to 0
	set {lv.%player%} to 1
	set {kill.%player%} to 0
	set {gatya.%player%} to 2
	set {nextlv.%player%} to 5
	set player's gamemode to adventure
	teleport player to {lobby}
	broadcast "&e%player%&6さんが&d初参加&6しました"
	add "&e%player% &6IP &a%ip of player%" to {iplog::*}
	set player tab name to "&6&l[&a&lLv%{lv.%player%}%&6&l] &f%player%"
command /setspawn [<text>] [<text>] [<text>]:
	permission: siso
	trigger:
		if arg 1 is "lobby":
			set {lobby} to location of player
			send "&6Lobbyを%location%にセットしました"
			stop
		if arg 1 is "map":
			arg 2 and arg 3 is set
			if {map::*} do not contain arg 2:
				send "そのmapは存在しません"
				stop
			set {map.spawn.%arg 2%.%arg 3%} to location of player
			send "&6戦場&a(%arg 2%)&6の開始場所&a(%arg 3%)&6を%location%にセットしました"
			stop
command /addmap [<text>]:
	permission: siso
	trigger:
		add arg 1 to {map::*}
		send "%arg 1%を追加しました"
		stop