execute store result score carpet carpet run carpet
execute if score carpet carpet matches 1 run function fz:scarpet