wait 10000
if [$itemcount.238 > 0] { gotolabel "Burning" }
setcavebot off

reachgrounditem 2323
wait 1000
openbpitem
wait 1000

npcsay "hi"
npcsay "trade"

loop 5 { sellitems 284 100 }

set $pots 700
while [$pots > 100] { buyitems 238 100 | wait 200 | set $pots [$pots - 100] }
buyitems 238 $pots

setcavebot on