Manipulate[
kushi={Thick,Brown,Line[{{0,-5},{0,5}}]};

chikuwa={Darker[Orange],Rectangle[{-3,(12-t1)-1},{3,(12-t1)+1}]};
chikuwa2={Darker[Orange],Rectangle[{-3,-1-1},{3,-1+1}]};

Daikon ={Lighter[Brown],Disk[{0,12-t1+14},2]};
Daikon2={Lighter[Brown],Disk[{0,2},2]};

konnyaku={Gray,Triangle[{{-3.5,23+11-t1},{0,(23+11-t1)+4},{3.5,23+11-t1}}]};
konnyaku2={Gray,Triangle[{{-3.5,4},{0,8},{3.5,4}}]};

Which[0≤t1≤13,Graphics[{kushi,chikuwa},PlotRange->{{-10,10},{-10,10}}],
13<t1≤22,Graphics[{kushi,chikuwa2,Daikon},PlotRange->{{-10,10},{-10,10}}],
22<t1≤30,Graphics[{kushi,chikuwa2,Daikon2,konnyaku},PlotRange->{{-10,10},{-10,10}}],
30<t1≤35,Graphics[{kushi,chikuwa2,Daikon2,konnyaku2},PlotRange->{{-10,10},{-10,10}}]],{t1,0,35,0.1}
]