execute store result score $grape_chance cnk.dummy run random value 0..4
execute if score $grape_chance cnk.dummy matches 0 run return fail

execute store result storage cnk:temp slot int 1 run random value 0..26
function cnk:seeds/grape/loot/ray/modify with storage cnk:temp

execute if score $grape_chance cnk.dummy matches 1 run return fail
execute store result storage cnk:temp slot int 1 run random value 0..26
function cnk:seeds/grape/loot/ray/modify with storage cnk:temp

execute if score $grape_chance cnk.dummy matches 2 run return fail
execute store result storage cnk:temp slot int 1 run random value 0..26
function cnk:seeds/grape/loot/ray/modify with storage cnk:temp

execute if score $grape_chance cnk.dummy matches 3 run return fail
execute store result storage cnk:temp slot int 1 run random value 0..26
function cnk:seeds/grape/loot/ray/modify with storage cnk:temp

execute if score $grape_chance cnk.dummy matches 4 run return fail
execute store result storage cnk:temp slot int 1 run random value 0..26
function cnk:seeds/grape/loot/ray/modify with storage cnk:temp