crewly please give me leader role

command /shop:
  trigger:
    openMainShop(player)
function openMainShop(P: player):
  set {_inv} to chest inventory with 3 rows named "&7Shop - &3Select a catagory"
  set slot 11 of {_inv} to glowstone dust named "&6&lGPC" with lore "&7&oClick to open the Gold Per Click shop."
  set slot 15 of {_inv} to glowstone dust named "&6&lGPS" with lore "&7&oClick to open the Gold Per Second shop."
  open {_inv} to {_P}
  set metadata "gui" of {_P} to "main"
function openGPCShop(P: player):
  set {_inv} to chest inventory with 1 rows named "&7Shop - &3Gold Per Click"
  set slot 0 of {_inv} to glowstone dust named "&6&l+1" with lore "&7Cost: &e150"
  set slot 1 of {_inv} to glowstone dust named "&6&l+10" with lore "&7Cost: &e225 gold"
  set slot 2 of {_inv} to glowstone dust named "&6&l+20" with lore "&7Cost: &e550 gold"
  set slot 3 of {_inv} to glowstone dust named "&6&l+30" with lore "&7Cost: &e750 gold"
  set slot 4 of {_inv} to glowstone dust named "&6&l+40" with lore "&7Cost: &e1000 gold"
  set slot 5 of {_inv} to glowstone dust named "&6&l+50" with lore "&7Cost: &e1750 gold"
  set slot 6 of {_inv} to glowstone dust named "&6&l+100" with lore "&7Cost: &e2500 gold"
  set slot 7 of {_inv} to glowstone dust named "&6&l+250" with lore "&7Cost: &e3750 gold"
  set slot 8 of {_inv} to glowstone dust named "&6&l+500" with lore "&7Cost: &e5000 gold"
  open {_inv} to {_P}
  set metadata "gui" of {_P} to "gpc"
function openGPSShop(P: player):
  set {_inv} to chest inventory with 1 rows named "&7Shop - &3Gold Per Second"
  set slot 0 of {_inv} to glowstone dust named "&6&l+1" with lore "&7Cost: &e1500"
  set slot 1 of {_inv} to glowstone dust named "&6&l+10" with lore "&7Cost: &e2250 gold"
  set slot 2 of {_inv} to glowstone dust named "&6&l+20" with lore "&7Cost: &e5500 gold"
  set slot 3 of {_inv} to glowstone dust named "&6&l+30" with lore "&7Cost: &e7500 gold"
  set slot 4 of {_inv} to glowstone dust named "&6&l+40" with lore "&7Cost: &e10000 gold"
  set slot 5 of {_inv} to glowstone dust named "&6&l+50" with lore "&7Cost: &e17500 gold"
  set slot 6 of {_inv} to glowstone dust named "&6&l+100" with lore "&7Cost: &e25000 gold"
  set slot 7 of {_inv} to glowstone dust named "&6&l+250" with lore "&7Cost: &e37500 gold"
  set slot 8 of {_inv} to glowstone dust named "&6&l+500" with lore "&7Cost: &e50000 gold"
  open {_inv} to {_P}
  set metadata "gui" of {_P} to "gps"
function GPCBuy(P: player, A: integer, C: integer, T: text):
  set {_U} to {_P}'s uuid
  if {dollar::%{_U}%} >= {_C}:
    remove {_C} from {dollar::%{_U}%}
    if {_T} is "gpc":
      add {_A} to {mpc::%{_U}%}
      send "&c> &7Added &3%{_A}%&7 to your Gold Per Click!" to {_P}
    else if {_T} is "gps":
      add {_A} to {mps::%{_U}%}
      send "&c> &7Added &3%{_A}%&7 to your Gold Per Second!" to {_P}
  else:
    send "&c> &7You need &3%{_C} - {dollar::%{_U}%}% &3gold&7 more to purchase this." to {_P}
on inventory click:
  if metadata "gui" of player is "main":
    cancel event
    if clicked slot is 11:
      openGPCShop(player)
    if clicked slot is 15:
      openGPSShop(player)
  if metadata "gui" of player is "gpc":
    cancel event
    if clicked slot is 0:
      GPCBuy(player, 1, 150, "gpc")
    if clicked slot is 1:
      GPCBuy(player, 10, 225, "gpc")
    if clicked slot is 2:
      GPCBuy(player, 20, 550, "gpc")
    if clicked slot is 3:
      GPCBuy(player, 30, 750, "gpc")
    if clicked slot is 4:
      GPCBuy(player, 40, 1000, "gpc")
    if clicked slot is 5:
      GPCBuy(player, 50, 1750, "gpc")
    if clicked slot is 6:
      GPCBuy(player, 100, 2500, "gpc")
    if clicked slot is 7:
      GPCBuy(player, 259, 3750, "gpc")
    if clicked slot is 8:
      GPCBuy(player, 500, 5000, "gpc")
  if metadata "gui" of player is "gps":
    cancel event
    if clicked slot is 0:
      GPCBuy(player, 1, 1500, "gps")
    if clicked slot is 1:
      GPCBuy(player, 10, 2250, "gps")
    if clicked slot is 2:
      GPCBuy(player, 20, 5500, "gps")
    if clicked slot is 3:
      GPCBuy(player, 30, 7500, "gps")
    if clicked slot is 4:
      GPCBuy(player, 40, 10000, "gps")
    if clicked slot is 5:
      GPCBuy(player, 50, 17500, "gps")
    if clicked slot is 6:
      GPCBuy(player, 100, 25000, "gps")
    if clicked slot is 7:
      GPCBuy(player, 259, 37500, "gps")
    if clicked slot is 8:
      GPCBuy(player, 500, 50000, "gps")