## Check if we've already used an item
execute if score @s vb.tick_data.custom_item_rc matches 1.. run scoreboard players set @s vb.tick_data.goat_horn 0
execute if score @s vb.tick_data.goat_horn matches 1.. run scoreboard players set @s vb.tick_data.custom_item_rc 1

## Whistle
execute store result score @s vb.dummy5 run data get entity @s Rotation[1]
execute if score @s vb.tick_data.goat_horn matches 1.. if score @s vb.dummy5 matches -70.. run function vb:tick_player/custom_item/animal_whistle/whistle {range:20}
execute if score @s vb.tick_data.goat_horn matches 1.. unless score @s vb.dummy5 matches -70.. run function vb:tick_player/custom_item/animal_whistle/whistle {range:120}