on script load:
	new Recipe "kamera";
	new Recipe "ekran";
	"kamera".Recipe.registerIngredient{1, iron ingot};
	"kamera".Recipe.registerIngredient{2, glass pane};
	"kamera".Recipe.registerIngredient{3, iron ingot};
	"kamera".Recipe.registerIngredient{4, redstone};
	"kamera".Recipe.registerIngredient{5, lever};
	"kamera".Recipe.registerIngredient{6, redstone};
	"kamera".Recipe.registerIngredient{7, iron ingot};
	"kamera".Recipe.registerIngredient{8, gold ingot};
	"kamera".Recipe.registerIngredient{9, iron ingot};
	"kamera".Recipe.registerResult{1 dispenser named "&6&lKamera"};
	"kamera".Recipe.register{};
	"ekran".Recipe.registerIngredient{1, iron ingot};
	"ekran".Recipe.registerIngredient{2, iron ingot};
	"ekran".Recipe.registerIngredient{3, iron ingot};
	"ekran".Recipe.registerIngredient{4, iron ingot};
	"ekran".Recipe.registerIngredient{5, glass pane};
	"ekran".Recipe.registerIngredient{6, iron ingot};
	"ekran".Recipe.registerIngredient{7, iron ingot};
	"ekran".Recipe.registerIngredient{8, iron ingot};
	"ekran".Recipe.registerIngredient{9, iron ingot};
	"ekran".Recipe.registerResult{1 glass pane named "&7&lEkran"};
	"ekran".Recipe.register{};

on place:
	loop {kamery::*}:
		if location of event-block is loop-value:
			send "&cNie mozesz stawiac tu bloku."
			cancel event
			stop
	player's tool is dispenser named "&6&lKamera"
	add location of event-block to {kamery::*}
	set {kamery.nazwagracza.%location of event-block%} to player's name
	send "&6Utworzono kamere."

on break:
	loop {kamery::*}:
		if loop-value is location of event-block:
			if {kamery.nazwagracza.%loop-value%} is player's name:
				remove location of event-block from {kamery::*}
				clear {kamery.nazwagracza.%loop-value%}
				send "&6Zniszczono kamere."
			else:
				send "&6Nie mozesz zniszczyc kamery innych graczy."
				cancel event
on place:
	name of player's tool contains "&7&lEkran"
	cancel event

on rightclick:
	clicked block is dispenser
	loop {kamery::*}:
		if loop-value is location of clicked block:
			cancel event

on rightclick:
	if 1st line of lore of player's tool is not set:
		player's tool is glass pane named "&7&lEkran"
		clicked block is dispenser
		loop {kamery::*}:
			if loop-value is location of clicked block:
				if {kamery.nazwagracza.%loop-value%} is player's name:
					cancel event
					set 1st line of lore of player's tool to "%x-coord of location of clicked block%||%y-coord of location of clicked block%||%z-coord of location of clicked block%||%world of location of clicked block%"
					set name of player's tool to "&7&lEkran (&b&lpodpiety&7&l)"
					send "&6Podpieto."
				else:
					cancel event
					send "&cNie mozesz podpiac czyjejs kamery do swojego ekranu!"
	else:
		name of player's tool is "&7&lEkran (&b&lpodpiety&7&l)"
		player's tool is glass pane
		set {_frstLoc} to location of player
		set {_frstMode} to player's gamemode
		set {_koordynaty::*} to 1st line of lore of player's tool split by "||"
		set {_x} to {_koordynaty::1}
		set {_y} to {_koordynaty::2}
		set {_z} to {_koordynaty::3}
		set {_world} to {_koordynaty::4}
		set {_loc} to the location at {_x} parsed as number, {_y} parsed as number, {_z} parsed as number in world {_world} parsed as world
		set {_loc2} to location 1 meter under {_loc}
		set x-coord of {_loc} to {_x} parsed as number
		set y-coord of {_loc} to {_y} parsed as number
		set z-coord of {_loc} to {_z} parsed as number
		if block at {_loc} is 23:0:
			set {_facing} to "0"
			set y-coord of {_loc2} to y-coord of {_loc2} - 0.6
			set {_loc3} to {_loc2}
		if block at {_loc} is 23:1:
			set {_facing} to "1"
			set y-coord of {_loc2} to y-coord of {_loc2} + 1
			set {_loc3} to {_loc2}
		if block at {_loc} is 23:2:
			set {_facing} to "2"
			set z-coord of {_loc2} to z-coord of {_loc2} - 0.6
			set {_loc3} to {_loc2}
		if block at {_loc} is 23:3:
			set {_facing} to "3"
			set z-coord of {_loc2} to z-coord of {_loc2} + 0.6
			set {_loc3} to {_loc2}
		if block at {_loc} is 23:4:
			set {_facing} to "4"
			set x-coord of {_loc2} to x-coord of {_loc2} - 0.6
			set {_loc3} to {_loc2}
		if block at {_loc} is 23:5:
			set {_facing} to "5"
			set x-coord of {_loc2} to x-coord of {_loc2} + 0.6
			set {_loc3} to {_loc2}
		set block 1 meter above {_loc3} to air
		execute console command "/gamemode 3 %player%"
		teleport player 0.5 meter under {_loc3}
		set {_number} to 0
		set {kamera.uzywa.%player%} to true
		set {kamera.uzywalokacja.%player%} to {_loc3}
		while {_number} < 60:
			add 1 to {_number}
			wait 1 tick
		set player's gamemode to {_frstMode}
		teleport player to {_frstLoc}
		clear {kamera.uzywa.%player%}
		clear {kamera.uzywalokacja.%player%}
		if {_facing} is "0":
			set block at {_loc} to 23:0
		if {_facing} is "1":
			set block at {_loc} to 23:1
		if {_facing} is "2":
			set block at {_loc} to 23:2
		if {_facing} is "3":
			set block at {_loc} to 23:3
		if {_facing} is "4":
			set block at {_loc} to 23:4
		if {_facing} is "5":
			set block at {_loc} to 23:5

on any move:
	set {_x} to x-coord of player
	set {_y} to y-coord of player
	set {_z} to z-coord of player
	wait 1 tick
	set {_x2} to x-coord of player
	set {_y2} to y-coord of player
	set {_z2} to z-coord of player
	if {kamera.uzywa.%player%} is true:
		if {_x} is not {_x2}:
			teleport player 0.5 meter under {kamera.uzywalokacja.%player%}
		if {_y} is not {_y2}:
			teleport player 0.5 meter under {kamera.uzywalokacja.%player%}
		if {_z} is not {_z2}:
			teleport player 0.5 meter under {kamera.uzywalokacja.%player%}

command /kamery [<text>]:
	permission: kamery.dajprzedmioty
	permission message: &cNie masz permisji, aby uruchomic te komende!
	executable by: player
	trigger:
		if arg 1 is not set:
			send "&e&lWpisz: &6&n/kamery ekran&6 lub &6&n/kamery kamera."
		if arg 1 is "kamera":
			if player has enough space for dispenser:
				give dispenser named "&6&lKamera" to player
				send "&6Otrzymales kamere."
			else:
				send "&cNie masz miejsca w ekwipunku!"
		if arg 1 is "ekran":
			if player has enough space for glass pane named "&7&lEkran":
				give glass pane named "&7&lEkran" to player
				send "&6Otrzymales ekran."
			else:
				send "&cNie masz miejsca w ekwipunku!"