@main:
wait(10)
gotoifobjectwithindist(@cook,97,1)
goto(@cut)

@cut:
setvarsnearestobject(%x,%y,70)
objcmd2(%x,%y)
wait(500)
gotoifobjectwithindist(@cut,70,1)
goto(@fire)

@fire:
setvarmyx(%x)
setvarmyy(%y)
useitemwithgrounditem(%x,%y,14,0)
wait(500)
gotoifobjectwithindist(@main,97,0)
goto(@fire)

@cook:
setvarsnearestobject(%x,%y,97)
debugrs(%x)
debugrs(%y)
useitemwithobject(%x,%,372)
wait(500)
goto(@main)