silnik:

on chat:
	if {fabulamembersof::%{fabula::zalozona::%player%}%::*} is set:
        if first character of message is "!":
        	cancel event
            loop {fabulamembersof::%{fabula::zalozona::%player%}%::*}:
            	send "&c%player% &7>> %coloured message%" to loop-player
                
command /fabula [<text>] [<text>] [<text>]:
	trigger:
		if arg 1 is "zapros":
			arg 2 is not set:
				send "&8» &cPodaj nick gracza!"
				stop
			if {fabula::zalozona::%player%} is not set:
				send "&8» &cNie zalozyles jeszcze fabuly!"
				stop
			if arg 2 is "%player%":
				send "&8» &cNie mozesz zaprosic samego siebie!"
				stop
			set {_player} to arg 2 parsed as player
			if "%{fabula::zalozona::%player%}%" is "%{fabula::zalozona::%{_player}%}%":
				send "&8» &cGracz jest juz w fabule!"
				stop
			send "&8» &7Dostales zaproszenie do fabuly &e%{_tag}%&7!"
			send "&8» &7Napisz &6/fabula dolacz&7 aby przyjac zaproszenie!"
			set {fabula::zaproszenie::%player%::%arg 2%} to true
		if arg 1 is "dolacz":
			if {fabula::zalozona::%player%} is set:
				send "&8» &cJestes juz w gildi!"
				stop
			if arg 2 is not set:
				send "&8» &cPodaj nazwe gildii!"
				stop
			if {fabula::zaproszenie::%player%::%arg 2%} is true:
				set {fabula::zalozona::%player%} to "%arg 2%"
				add "%player%" to {fabula::czlonkowie::%arg 2%}
                add player to {fabulamembersof::%arg 2%::*}
				set {fabula::zaproszenie::%player%::%arg 2%} to false
				broadcast "&8» &aGracz &2%player%&a dolaczyl do fabuly &2%arg 2%"
			else:
				send "&8» &cNie jestes zaproszony do tej fabuly!"
		if arg 1 is "opusc":
			if {fabula::zalozona::%player%} is not set:
				send "&8» &cNie jestes w zadnej fabule!"
				stop
			if {fabula::lider::%{fabula::zalozona::%player%}%} is player:
				send "&8» &cLider fabuly nie moze jej opuscic!"
				stop
			else:
				broadcast "&8» &cGracz &4%player% &copuscil fabule &4%{fabula::zalozona::%player%}%"
				remove "%player%" from {fabula::czlonkowie::%{fabula::zalozona::%player%}%}
                remove player from {fabulamembersof::%{fabula::zalozona::%player%}%::*}
				clear {fabula::zalozona::%player%}
				stop
		if arg 1 is "zaloz":
			if arg 2 is not set:
				send "&8» &cMusisz wpisac tag fabuly!"
				stop
			if arg 3 is not set:
				send "&8» &cMusisz wpisac nazwe fabuly!"
				stop
			if {fabula::zalozona::%player%} is set:
				send "&8» &cJestes juz w fabule!"
				stop
			if {fabula::lider::%{fabula::zalozona::%player%}%} is set:
				send "&8» &cJestes liderem innej fabuly!"
				stop
			if length of arg 2 is less than 3:
				send "&8» &cTag musi miec minimum 3 litery!"
				stop
			if length of arg 2 is greater than 5:
				send "&8» &cTag moze miec maximum 5 liter!"
				stop
			if length of arg 2 is greater than 25:
				send "&8» &cNazwa fabuly nie moze byc dluzsza niz 25 liter!"
				stop
			if length of arg 3 is less than 10:
				send "&8» &cNazwa fabuly nie moze byc krotsza niz 10 liter!"
				stop
			if {fabula::tag::%arg 2%} is set:
				send "&8» &cIstnieje fabula o takiej nazwie!"
				stop
			if {fabula::nazwa::%arg 3%} is set:
				send "&8» &cFabula o takiej nazwie juz istenieje!"
			set {fabula::zalozona::%player%} to arg 2
			set {fabula::tag::%arg 2%} to true
			set {fabula::nazwa::%arg 3%} to arg 3
			add player to {fabula::czlonkowie::%arg 2%}
			set {fabula::lider::%arg 2%} to "%player%"
			broadcast "&8» &aGracz &2%player% &azalozyl fabule &2%arg 3%&a!"