farm

variables:
	{cash:%player%} = 0
	{level:%player%} = 1
	{exp:%player%} = 0
	{reqexp:%player%} = 30
	{wheat:%player%} = 0
	{backpackmax:%player%} = 25
	{sell:%player%} = 1
	{upgradecost:%player%} = 40
	{skillpoint:%player%} = 0
	{reqskill:%player%} = 5
	{getexp:%player%} = 1
	{getwheat:%player%} = 1
	{skill.wheatcost:%player%} = 1
	{skill.sellcost:%player%} = 1
	{skill.expcost:%player%} = 1

aliases:
	notclops = 59:0-6
	wheatitem = 296

command /reset:
	permission: sk.admin
	trigger:
		set {cash:%player%} to 0
		set {level:%player%} to 1
		set {exp:%player%} to 0
		set {reqexp:%player%} to 30
		set {wheat:%player%} to 0
		set {backpackmax:%player%} to 25
		set {sell:%player%} to 1
		set {upgradecost:%player%} to 40
		set {skillpoint:%player%} to 0
		set {reqskill:%player%} to 5
		set {getexp:%player%} to 1
		set {getwheat:%player%} to 1
		set {skill.wheatcost:%player%} to 1
		set {skill.sellcost:%player%} to 1
		set {skill.expcost:%player%} to 1

on first join:
	broadcast "&d%player%さんが初参加しました！！"
	message "&dようこそ！Farming Cantoryへ！"
	message "&dまずは近くのエンチャントテーブルをクリックして、チュートリアルを受けましょう！"
	give 1 of diamond hoe named "&b最強の桑" with lore "&e普通の桑と変わらない！" to player

on join:
	message "&dおかえりなさい！Farming Cantoryへ！"
	broadcast "&d%player%さんが参加しました！"

on quit:
	broadcast "&d%player%さんが退出しました・・・"


every 5 tick in "world":
	loop all players:
		set {_nextlevel} to ({level:%loop-player%} + 1)
		set {_reqexp} to ceil({reqexp:%loop-player%} * 1.25)
		show action bar from "&aLevel:&r%{level:%loop-player%}% &bExp:&r%{exp:%loop-player%}%/%{reqexp:%loop-player%}%  &cCash:&r%{cash:%loop-player%}%&6G&r &dWheat:&r%{wheat:%loop-player%}%/%{backpackmax:%loop-player%}%" to loop-player
		if {exp:%loop-player%} >= {reqexp:%loop-player%}:
			send loop-player title "&dLevel Up!" with subtitle "&6%{level:%loop-player%}%→%{_nextlevel}%" for 3 seconds
			set {exp:%loop-player%} to 0
			add 1 to {level:%loop-player%}
			set {reqexp:%loop-player%} to {_reqexp}
			if {level:%loop-player%} is {reqskill:%loop-player%}:
				add 1 to {skillpoint:%loop-player%}
				add 5 to {reqskill:%loop-player%}
				send "&dレベルが5の倍数になったので、1SkillPointをゲットしました！" to loop-player



On break of ripe wheat:
	if {wheat:%player%} is {backpackmax:%player%}:
		message "&cバックパックが満杯です"
		cancel event
		stop
	add {getexp:%player%} to {exp:%player%}
	add {getwheat:%player%} to {wheat:%player%}
	set the event-block to crops

On break of notclops:
	cancel event

on rightclick on chest:
	block under the event-block is gold block
	cancel event
	send player title "&cSelled!" with subtitle "&6バックパックの小麦を売却しました" for 3 seconds
	add ({wheat:%player%} * {sell:%player%}) to {cash:%player%}
	set {wheat:%player%} to 0

on rightclick on chest:
	block under the event-block is diamond block
	cancel event
	wait 1 tick
	open chest with 3 rows named "&c&lバックパックの拡張" to player
	format slot 13 of player with chest named "&bバックパックの容量を拡張しますか？" with lore "&a&l%{backpackmax:%player%}%→%({backpackmax:%player%} + 15)% &eCost:&r%{upgradecost:%player%}%G" to act unstealable
	format slot 11 of player with light green wool block named "&aはい" to close then run [execute player command "bupgrade"]
	format slot 15 of player with red wool block named "&cいいえ" to close

on rightclick on chest:
	block under the event-block is iron block
	cancel event
	open chest with 1 rows named "&dBank" to player
	format slot 0 of player with gold nugget named "&e1G" with lore "&cクリックで変換！" to run [execute player command "getgold 1"]
	format slot 1 of player with gold ingot named "&e10G" with lore "&cクリックで変換！" to run [execute player command "getgold 10"]
	format slot 2 of player with gold block named "&e100G" with lore "&cクリックで変換！" to run [execute player command "getgold 100"]
	format slot 3 of player with emerald named "&e1000G" with lore "&cクリックで変換！" to run [execute player command "getgold 1000"]
	format slot 4 of player with emerald block named "&e10000G" with lore "&cクリックで変換！" to run [execute player command "getgold 10000"]
	format slot 5 of player with diamond named "&e100000G" with lore "&cクリックで変換！" to run [execute player command "getgold 100000"]
	format slot 6 of player with diamond block named "&e1000000G" with lore "&cクリックで変換！" to run [execute player command "getgold 1000000"]



on rightclick on chest:
	block under the event-block is emerald block
	cancel event
	open chest with 4 rows named "&6&lスキルポイント割り振り" to player
	format slot 4 of player with emerald block named "&a現在のスキルポイント:&d%{skillpoint:%player%}%SP" to act unstealable
	format slot 13 of player with exp bottle named "&c経験値量増加" with lore "&e現在値:&a%{getexp:%player%}%Lv||&bコスト:&d%{skill.expcost:%player%}%SP||&cクリックで割り振り" to close then run [execute player command "upgrade exp"]
	format slot 22 of player with wheatitem named "&c小麦獲得量増加" with lore "&e現在値:&a%{getwheat:%player%}%Lv||&bコスト:&d%{skill.wheatcost:%player%}%SP||&cクリックで割り振り" to close then run [execute player command "upgrade wheat"]
	format slot 31 of player with gold ingot named "&c売却価格増加" with lore "&e現在値:&a%{sell:%player%}%Lv||&bコスト:&d%{skill.sellcost:%player%}%SP||&cクリックで割り振り" to close then run [execute player command "upgrade sell"]

on rightclick on enchantment table:
	cancel event
	open chest with 1 rows named "&d&lFarming Cantoryのチュートリアル" to player
	format slot 0 of player with paper named "&cチュートリアルその1 「始まり」" with lore "&rまずは、近くにある小麦を桑でも素手でもいいので壊しましょう。" to act unstealable
	format slot 1 of player with paper named "&cチュートリアルその2 「何が起きる？」" with lore "&r次に、小麦を壊すと&eExp&rと&eWheat&rが手に入ります。||&rホットバーの上の&dWheat&rと書かれた数値を見てください。||&r左にあるのが現在のWheatの所持数です。||&rまた、右の数字はWheatを収納できる最大数を表しています。||&r初期状態では25個です。" to act unstealable
	format slot 2 of player with paper named "&cチュートリアルその3 「売却」" with lore "&r近くにある、&e金ブロックが下にあるチェスト&rまで行きましょう。||&rWheatが溜まっている状態で、そのチェストを右クリックすると||&r1Wheatにつき1Gもらうことができます。||&rWheatは消費します。" to act unstealable
	format slot 3 of player with paper named "&cチュートリアルその4 「経験」" with lore "&r次に、Wheatの欄の左から2番目を見て下さい。それがあなたの経験値です。||&r左は現在の経験値で、右は次のレベルまでの経験値の数を表しています。||&r5レベルごとに、&eSP(Skillpoint)&rが手に入ります。" to act unstealable
	format slot 4 of player with paper named "&cチュートリアルその5 「何ができる？」" with lore "&rこれまでで手に入れた、SPやGは何に使うのか説明します。||&rGは、バックパックの拡張や、建築資材の購入に使います。||&rバックパックは&eダイヤブロックの上のチェスト&rを開くと||&rバックパックの拡張ができます。||&rGはアイテムにしてトレードに使うこともできます。||&e鉄ブロックの上のチェスト&rで交換ができます。||&rSPは、スキルレベルを上げるのに使います。||&eエメラルドブロックの上のチェスト&rで振り分け画面が出ます。||&rスキルレベルを上げるのに必要なSPは、||&r振り分けるたびに増えるので注意です。" to act unstealable
	format slot 5 of player with paper named "&cチュートリアルその6 「建築」" with lore "&rそろそろ飽きてきたころだと思います。||&rそんなあなたに&e建築&rはいかがでしょうか？||&rスポーンの壁の外であり、かつ道の近くであれば自由に建築してOKです。||&r建築資材は近くの村人がアイテムのGと交換してくれます。" to act unstealable
	format slot 6 of player with book named "&cチュートリアル 最後" with lore "&rここまで読んでくれたなら、この先は自由です。||&rくれぐれも常識的な範囲内でお願いします" to act unstealable





command /upgrade <text>:
	trigger:
		if arg-1 is "exp":
			if {skillpoint:%player%} >= {skill.expcost:%player%}:
				add 1 to {getexp:%player%}
				message "&a経験値量増加がレベルアップしました！"
				add ({skill.expcost:%player%} * -1) to {skillpoint:%player%}
				add 1 to {skill.expcost:%player%}
			else:
				message "&c&lSkillPointが足りません"
		if arg-1 is "wheat":
			if {skillpoint:%player%} >= {skill.wheatcost:%player%}:
				add 1 to {getwheat:%player%}
				message "&a小麦獲得量増加がレベルアップしました！"
				add ({skill.wheatcost:%player%} * -1) to {skillpoint:%player%}
				add 1 to {skill.wheatcost:%player%}
			else:
				message "&c&lSkillPointが足りません"
		if arg-1 is "sell":
			if {skillpoint:%player%} >= {skill.sellcost:%player%}:
				add 1 to {sell:%player%}
				message "&a売却価格増加がレベルアップしました！"
				add ({skill.sellcost:%player%} * -1) to {skillpoint:%player%}
				add 1 to {skill.sellcost:%player%}
			else:
				message "&c&lSkillPointが足りません"

command /bupgrade:
	trigger:
		if {cash:%player%} >= {upgradecost:%player%}:
			add ({upgradecost:%player%} * -1) to {cash:%player%}
			add 15 to {backpackmax:%player%}
			set {upgradecost:%player%} to ceil({upgradecost:%player%} * 1.5)
			send player title "&aBackpack Upgraded!" with subtitle "&cバックパックが%{backpackmax:%player%}%に拡張されました！" for 3 seconds
		else:
			send player title "&cCashが足りません" for 3 seconds

command /setgold <number>:
	permission: sk.admin
	trigger:
		set {cash:%player%} to arg-1

command /getgold <number>:
	trigger:
		if arg-1 is 1:
			if {cash:%player%} >= 1:
				give 1 of gold nugget named "&61G" to player
				add -1 to {cash:%player%}
			else:
				message "&cCashが足りません！"
		if arg-1 is 10:
			if {cash:%player%} >= 10:
				give 1 of gold ingot named "&610G" to player
				add -10 to {cash:%player%}
			else:
				message "&cCashが足りません！"
		if arg-1 is 100:
			if {cash:%player%} >= 100:
				give 1 of gold block named "&6100G" to player
				add -100 to {cash:%player%}
			else:
				message "&cCashが足りません！"
		if arg-1 is 1000:
			if {cash:%player%} >= 1000:
				give 1 of emerald named "&61000G" to player
				add -1000 to {cash:%player%}
			else:
				message "&cCashが足りません！"
		if arg-1 is 10000:
			if {cash:%player%} >= 10000:
				give 1 of emerald block named "&610000G" to player
				add -10000 to {cash:%player%}
			else:
				message "&cCashが足りません！"
		if arg-1 is 100000:
			if {cash:%player%} >= 100000:
				give 1 of diamond named "&6100000G" to player
				add -100000 to {cash:%player%}
			else:
				message "&cCashが足りません！"
		if arg-1 is 1000000:
			if {cash:%player%} >= 1000000:
				give 1 of diamond block named "&61000000G" to player
				add -1000000 to {cash:%player%}
			else:
				message "&cCashが足りません！"

on rightclick holding a gold nugget:
	remove 1 gold nugget from the player
	add 1 to {cash:%player%}

on rightclick holding a gold ingot:
	remove 1 gold ingot from the player
	add 10 to {cash:%player%}

on rightclick holding a gold block:
	cancel event
	remove 1 gold block from the player
	add 100 to {cash:%player%}

on rightclick holding a emerald:
	remove 1 emerald from the player
	add 1000 to {cash:%player%}

on rightclick holding a emerald block:
	cancel event
	remove 1 emerald block from the player
	add 10000 to {cash:%player%}

on rightclick holding a diamond:
	remove 1 diamond from the player
	add 100000 to {cash:%player%}

on rightclick holding a diamond block:
	cancel event
	remove 1 diamond block from the player
	add 1000000 to {cash:%player%}