Filing cabinet

1asset filing_cabinet "Filing cabinet" complexity=3
2// a three-drawer steel filing cabinet: a rounded body, three drawer fronts with label cards and bar
3// handles, folders packed inside the top drawer (they show when it slides out) and a little cactus or a
4// tray of papers on top; the open state pulls the top drawer out and pushes it back
5let S = .97..1.03
6let bodyC = silver:2|mint:2|cobalt|sunflower|cream|coral
7let pullC = iron:2|silver|white
8let top = "cactus":2|"tray"
9 
10// the body and its drawers
11box body size=(.5, 1.1, .62)*S round=.04 bev=3 color=bodyC
12box drawer x2 on=body at=(0, .045*S+.175*S, .02*S) row=(0, .35*S, 0) size=(.44, .32, .56)*S round=.025 color=bodyC*.8
13box face on=drawer at=(0, .01, .28*S) size=(.44, .3, .03)*S round=.025 color=bodyC*1.06
14box pull on=face at=(0, .17*S, .03) size=(.2, .035, .035)*S round=.015 color=pullC
15box card on=face at=(0, .24*S, .025) size=(.12, .045, .012)*S round=.006 color=white ink=none
16 
17// the top drawer slides; its folders show when it opens
18box topd on=body at=(0, .745*S, .02*S) size=(.44, .32, .56)*S round=.025 color=bodyC*.8 joint
19box topface on=topd at=(0, .01, .28*S) size=(.44, .3, .03)*S round=.025 color=bodyC*1.06
20box toppull on=topface at=(0, .17*S, .03) size=(.2, .035, .035)*S round=.015 color=pullC
21box topcard on=topface at=(0, .24*S, .025) size=(.12, .045, .012)*S round=.006 color=white ink=none
22box folder x4 on=topd at=(0, .25*S, -.06) row=(0, 0, .1) size=(.38, .1, .02)*S round=.008 color=sel(i, sunflower, cherry, sky, lime)
23 
24// on top: a cactus in a pot, or a paper tray
25lathe pot on=body at=(.1*S, 1.1*S, 0) h=.12 r=.07 prof=[0:.8 1:1] color=terracotta segs=14 if=top=="cactus"
26lathe cactus on=pot at=(0, .11, 0) h=.2 r=.05 prof=[0:.9 .7:1 1:.5] panels=8 color=leafD segs=16
27ball bud on=cactus at=(0, .2, 0) r=.025 color=pink segs=8 rings=5
28cyl arm on=cactus at=(.045, .09, 0) rot=(0, 0, -60) h=.06 r=.022 color=leafD segs=8
29box tray on=body at=(-.05*S, 1.1*S, .02) size=(.34, .06, .26)*S round=.02 color=iron if=top=="tray"
30box sheets on=tray at=(0, .02, 0) size=(.3, .05, .22)*S round=.006 color=white
31 
32anim open: topd pz keys=[0:0 .3:.42 .7:.42 1:0] hz=.4
33