我一时也想不出解决办法。提供如下资料和途径供参考：
1. 如下连接中有几幅图涉及区域填充颜色问题，看看能否借用到你那边：
http://www.survey-design.com.au/Usergraphs.html

2. 到 Statalist 或 FAQ 中提问，看看有没有学者可以帮你解决这个问题：
http://www.stata.com/statalist/
http://www.stata.com/support/faqs/

3. 发邮件给如下两位学者，寻求他们的帮助：

   Mitchell M.
     A Visual Guide to Stata Graphics 3rd Edition  的作者；http://www.survey-design.com.au/vgsg3_con.htm

   Baum http://fmwww.bc.edu/ec/baum.php Baum 教授人很好，通常都会回复你的邮件。

谢谢老师

老师，我发邮件后，Baum教授的回信（真的很快，不到20分钟回信）。

Louis,

Within Stata, please do

ssc install nbercycles

and examine the code of nbercycles.ado with viewsource. You just need to change the database that identifies NBER recession dates to include the dates you would like to highlight.

Kit

我感觉 Baum 每天都在电脑前吃饭睡觉，每次邮件的回复都超级迅捷。

根据 Baum 教授的思路，做了一个例子，以后可以自己随意添加阴影带了。

        clear
        set seed 13579
        set obs 100
        gen x = rnormal()
        kdensity x
        twoway (function y=0.4, range(-2 -1.7) recast(area) color(green*0.3)) ///
                   (function y=0.4, range(-1 -0.9) recast(area) color(red*0.4)) ///
                   (function y=0.4, range( 1  1.5) recast(area) color(blue*0.2)) ///
                   (kdensity x), ///
                   legend(off)