SZportals

on enter region "szportale_quest":
	set metadata value "szportale.rand" of player to random integer between 1 and 10
	set metadata value "szportale.meta" of player to random integer between 1 and 40
	loop all players in radius 300 around player:
		"%loop-player%" is not "%player%":
			"%region at loop-player%" contains "szportale_quest":
				stop
	loop all zombies in radius 300 around player:
		"%region at loop-zombie%" contains "szportale_quest":
			teleport loop-zombie 50 meters below loop-zombie
			kill loop-zombie
	loop 10 times:
		loop-number != 1:
			set {_loc1} to location 7 meters west and 1.5 meter above {szportal.portale::%loop-number%}
			set {_loc2} to location 7 meters south and 1.5 meter above {szportal.portale::%loop-number%}
			set {_loc3} to location 7 meters east and 1.5 meter above {szportal.portale::%loop-number%}
			set {_loc4} to location 7 meters north and 1.5 meter above {szportal.portale::%loop-number%}
			if mod(loop-number-1, 2) = 0:
				spawn mythicmob "CzarnoKsieznik" at {_loc1} with level 30
				spawn mythicmob "CzarnoKsieznik" at {_loc2} with level 30
				spawn mythicmob "CzarnoKsieznik" at {_loc3} with level 30
				spawn mythicmob "CzarnoKsieznik" at {_loc4} with level 30
			else:
				spawn mythicmob "UczenCzaroksieznika" at {_loc1} with level 30
				spawn mythicmob "UczenCzaroksieznika" at {_loc2} with level 30
				spawn mythicmob "UczenCzaroksieznika" at {_loc3} with level 30
				spawn mythicmob "UczenCzaroksieznika" at {_loc4} with level 30


on enter region:
	if "%region%" contains "szportale_kociol":
		set {_r} to "%region at player%"
		send "&d%{_r}%"
		loop all zombies in radius 60 around player:
			if "%region at loop-zombie%" contains "%{_r}%":
				play 50 witch spell at event-location
				play sound "minecraft:entity.bat.death" with volume 0.8 and pitch 0.5 at player
				push player upwards at speed 0.5
				push player horizontal behind at speed 0.2
				cancel event
				stop
		play 2000 water drip on event-location
#		summon 100 of "dripWater" particles at player offset by 0.5, 1, 0.5
		wait 3 ticks
		set {_n} to "%region%"
		replace all " in world katedra" with "" in {_n}
		set {_n} to last 2 characters of {_n} parsed as integer
		set {_k} to {_n}
		set {_a} to metadata value "szportale.meta" of player
		if {_a} = {_n}:
			teleport player to {szportal.end}
			send player title "&a&lBrawo!" with subtitle "&c&lDotarles do Bossa!"
			stop
		set {_m} to metadata value "szportale.rand" of player
		add {_m} to {_n}
		set {_n} to mod({_n}, 10)
		add 1 to {_n}
		if {_n} = 1:
			send "&3&lWszedles do kociolka nr %{_k}%"
		else if {_n} = 2:
			send "&e&lWszedles do kociolka nr %{_k}%"
		else if {_n} = 3:
			send "&6&lWszedles do kociolka nr %{_k}%"
		else if {_n} = 4:
			send "&b&lWszedles do kociolka nr %{_k}%"
		else if {_n} = 5:
			send "&d&lWszedles do kociolka nr %{_k}%"
		else if {_n} = 6:
			send "&4&lWszedles do kociolka nr %{_k}%"
		else if {_n} = 7:
			send "&a&lWszedles do kociolka nr %{_k}%"
		else if {_n} = 8:
			send "&5&lWszedles do kociolka nr %{_k}%"
		else if {_n} = 9:
			send "&1&lWszedles do kociolka nr %{_k}%"
		else:
			send "&2&lWszedles do kociolka nr %{_k}%"
		teleport player to {szportal.portale::%{_n}%}
		play sound "entity.player.swim" with volume 0.7 and pitch 1 at player
		play 1000 happy villager at player


command /szportal <text> [<integer>]:
	usage: /szportal <add|clear|list|remove|end> [integer]
	permission: wlasciciel
	trigger:
		if arg 1 is "add":
			set {_l} to location of block at player
			"%{szportal.portale::*}%" contains "%{_l}%":
				send "&cTa lokalizacja jest juz dodana do listy"
			else:
				add {_l} to {szportal.portale::*}
				send "&2Dodano &a%size of {szportal.portale::*}% &2lokalizacje do listy"
		else if arg 1 is "clear":
			delete {szportal.portale::*}
			send "&2Usunieto wszystkie dotychczasowe lokalizacje"
		else if arg 1 is "list":
			send "&2&lZapisano &4&l%size of {szportal.portale::*}%&2&l lokalizacji:"
			loop {szportal.portale::*}:
				send "&2%loop-index%. &a%loop-value%"
			send "&2Lokalizacja koncowa: %{szportal.end}%}"
		else if arg 1 is "remove":
			if arg 2 is set:
				if {szportal.portale::%arg 2%} is set:
					delete {szportal.portale::%arg 2%}
					send "&2Usunieto lokalizacje nr &a%arg 2%&2!"
				else:
					send "&cPodaj numer lokalizacji"
			else:
				send "&cPodaj numer lokalizacji"
		else if arg 1 is "end":
			set {szportal.end} to player's location
			send "&2Pomyslnie ustawiono koncowa lokalizacje"