every seconds:
	loop all players:
		if {temotikabu::%loop-player%} is not set:
			set {temotikabu::%loop-player%} to 0
		if {money::%loop-player%} is not set:
			set {money::%loop-player%} to 1000
		if {level::%loop-player%} is not set:
			set {level::%loop-player%} to 1
		if {exp::%loop-player%} is not set:
			set {exp::%loop-player%} to 0
		if {needexp::%loop-player%} is not set:
			set {needexp::%loop-player%} to 100
		if {a} is not set:
			set {a} to 500
		else:
			set {b} to random integer between 1 and 4
			if {b} is 1:
				add 1 to {a}
			if {b} is 2:
				add 2 to {a}
			if {b} is 3:
				add -1 to {a}
			if {b} is 4:
				add -2 to {a}
			if {a} >= 1000:
				broadcast "&c君たちがこれ以上儲かるといけないので倒産ってことで^^"
				set {a} to 500
				set {temotikabu::*} to 0
			if {a} <= 0:
				broadcast "&c株は倒産してしまった..."

command /kabu [<text>] [<integer>]:
	trigger:
		if arg-1 or arg-2 is not set:
			message "&c/kabu <sell・buy> <個数>"
		if arg-1 and arg-1 is set:
			if arg-1 is "buy":
				set {d} to round({a} * arg-2)
				if arg-2 >= 101:
					stop
					message "&c数が多すぎます!! 1~100 にしてください!!"
				if arg-2 <= 0:
					stop
					message "&c数が少なすぎます!! 1~100 にしてください!!"
				if {money::%player%} >= {d}:
					add arg-2 to {temotikabu::%player%}
					message "&b株を&d%arg-2%&b個購入しました!!"
					remove {d} from {money::%player%}
					delete {d}
					play entity_experience_orb_pickup at player with volume 1 and pitch 1
				else:
					message "&c購入金額が所持金を上回っています!!"
			if arg-1 is "sell":
				set {d} to round({a} * arg-2)
				if arg-2 >= 101:
					stop
					message "&c数が多すぎます!! 1~100 にしてください!!"
				if arg-2 <= 0:
					stop
					message "&c数が少なすぎます!! 1~100 にしてください!!"
				if {temotikabu::%player%} >= arg-2:
					add {d} to {money::%player%}
					message "&b株を&d%arg-2%&b個売却しました!!"
					remove arg-2 from {temotikabu::%player%}
					delete {d}
					play entity_experience_orb_pickup at player with volume 1 and pitch 1

command /givemoney [<player>] [<integer>]:
	permission: sk.admin
	trigger:
		if arg-1 is not set:
			message "&c/givemoney <player> <数字>"
		add arg-2 to {money::%arg-1%}

every tick:
    loop all players:
        set action bar of loop-player to "&d&lLv.&9&l%{level::%loop-player%}% &8[&c%{exo::%loop-player%}%&8/&b%{needexp::%loop-player%}%&8] &c所持株数 &d%{temotikabu::%loop-player%}% &eMoney &d%{money::%loop-player%}% &a&l株価 &d&l%{a}%"

on break:
	if event-block is stone:
		add round({level::%player%} * 1) to {money::%player%}
		add round({level::%player%} * 1) to {exp::%player%}
		play entity_item_pickup at player with volume 1 and pitch 1
		if {exp::%player%} >= {needexp::%player%}:
			set {exp::%player%} to 0
			add 1 to {level::%player%}
			set {needexp::%player%} to round(({level::%player%} + 1) * {needexp::%player%} + (25 * {level::%player%}))
			message "&e========================="
			message "&a&lLevel Up!!"
			message "&a現在の&eレベル&8: &c&l%{level::%player%}%"
			message "&e========================="
			play entity_firework_blast at player with volume 1 and pitch 1
	if event-block is iron ore:
		add round({level::%player%} * 3) to {money::%player%}
		add round({level::%player%} * 3) to {exp::%player%}
		play entity_item_pickup at player with volume 1 and pitch 1
		if {exp::%player%} >= {needexp::%player%}:
			set {exp::%player%} to 0
			add 1 to {level::%player%}
			set {needexp::%player%} to round(({level::%player%} + 1) * {needexp::%player%} + (25 * {level::%player%}))
			message "&e========================="
			message "&a&lLevel Up!!"
			message "&a現在の&eレベル&8: &c&l%{level::%player%}%"
			message "&e========================="
			play entity_firework_blast at player with volume 1 and pitch 1
	if event-block is gold ore:
		add round({level::%player%} * 5) to {money::%player%}
		add round({level::%player%} * 5) to {exp::%player%}
		play entity_item_pickup at player with volume 1 and pitch 1
		if {exp::%player%} >= {needexp::%player%}:
			set {exp::%player%} to 0
			add 1 to {level::%player%}
			set {needexp::%player%} to round(({level::%player%} + 1) * {needexp::%player%} + (25 * {level::%player%}))
			message "&e========================="
			message "&a&lLevel Up!!"
			message "&a現在の&eレベル&8: &c&l%{level::%player%}%"
			message "&e========================="
			play entity_firework_blast at player with volume 1 and pitch 1
	if event-block is diamond ore:
		add round({level::%player%} * 10) to {money::%player%}
		add round({level::%player%} * 10) to {exp::%player%}
		play entity_item_pickup at player with volume 1 and pitch 1
		if {exp::%player%} >= {needexp::%player%}:
			set {exp::%player%} to 0
			add 1 to {level::%player%}
			set {needexp::%player%} to round(({level::%player%} + 1) * {needexp::%player%} + (25 * {level::%player%}))
			message "&e========================="
			message "&a&lLevel Up!!"
			message "&a現在の&eレベル&8: &c&l%{level::%player%}%"
			message "&e========================="
			play entity_firework_blast at player with volume 1 and pitch 1
	if event-block is dirt:
		add round({level::%player%} * 1) to {money::%player%}
		add round({level::%player%} * 1) to {exp::%player%}
		play entity_item_pickup at player with volume 1 and pitch 1
		if {exp::%player%} >= {needexp::%player%}:
			set {exp::%player%} to 0
			add 1 to {level::%player%}
			set {needexp::%player%} to round(({level::%player%} + 1) * {needexp::%player%} + (25 * {level::%player%}))
			message "&e========================="
			message "&a&lLevel Up!!"
			message "&a現在の&eレベル&8: &c&l%{level::%player%}%"
			message "&e========================="
			play entity_firework_blast at player with volume 1 and pitch 1
	if event-block is grass:
		add round({level::%player%} * 1) to {money::%player%}
		add round({level::%player%} * 1) to {exp::%player%}
		play entity_item_pickup at player with volume 1 and pitch 1
		if {exp::%player%} >= {needexp::%player%}:
			set {exp::%player%} to 0
			add 1 to {level::%player%}
			set {needexp::%player%} to round(({level::%player%} + 1) * {needexp::%player%} + (25 * {level::%player%}))
			message "&e========================="
			message "&a&lLevel Up!!"
			message "&a現在の&eレベル&8: &c&l%{level::%player%}%"
			message "&e========================="
			play entity_firework_blast at player with volume 1 and pitch 1