通达信年、季、月、周、日：一段过山车的股市故事主图源码贴图

今年的一根年K线留下一段过山车的股市故事，真不知道今年的K先是红还是绿？但愿明年能猴跳起来。
 我把论坛里的《年、季、月、周、日》K线整到一个主图上了，另存个模版，没事时欣赏吧  嘿嘿
{年涨跌}
年O:O#YEAR,NODRAW;
年C:C#YEAR,NODRAW;
年H:=H#YEAR,NODRAW;
年L:=L#YEAR,NODRAW;
STICKLINE(年C>=年O,年O,年C,5,0),COLOR34567F;{年涨}
STICKLINE(年C<年O,年O,年C,5,0),COLORLICYAN;{年跌}
{季度涨跌}
季O:=O#SEASON,NODRAW;
季C:=C#SEASON,NODRAW;
季H:=H#SEASON,NODRAW;
季L:=L#SEASON,NODRAW;
STICKLINE(季C>=季O,季C,季O,5,0),COLOR996998;{季度涨}
STICKLINE(季C<季O,季C,季O,5,0),COLORGRAY;{季度跌}

{月涨跌}
月O:O#MONTH,NODRAW;
月H:=H#MONTH,NODRAW;
月L:=L#MONTH,NODRAW;
月C:C#MONTH,NODRAW;
STICKLINE(月C>=月O,月C,月O,5,-1),COLORLIRED;{月涨}
STICKLINE(月C<月O,月C,月O,5,-1),COLORGREEN;{月跌}
{周涨跌}
周O:O#WEEK,NODRAW;
周H:=H#WEEK,NODRAW;
周L:=L#WEEK,NODRAW;
周C:C#WEEK,NODRAW;
STICKLINE(周C>=周O,周O,周C,5,0)COLORCC3299;{周涨}
STICKLINE(周C<周O,周O,周C,5,0)COLORBLUE;{周跌}

DRAWKLINE(H,O,L,C);
{涨K线}   
STICKLINE(C>O,C,O,2.6,0),COLOR000088;   
STICKLINE(C>O,C,O,1.9,0),COLOR0000AA;   
STICKLINE(C>O,C,O,1.2,0),COLOR0000CC;   
STICKLINE(C>O,C,O,0.4,0),COLOR0000EE;
{跌K线}
STICKLINE(O>=C,C,O,2.6,0),COLOR009900;
STICKLINE(O>=C,C,O,1.9,0),COLOR00BB00;
STICKLINE(O>=C,C,O,1.2,0),COLOR00DD00;
STICKLINE(O>=C,C,O,0.4,0),COLOR00FF00;