阴线阳线计数公式

编写要求：

任意选定的某根K线后开始计数，之后的第一根阳线上面标记红色1，之后的第二根阳线上面标记红色2，一直标到99; 之后的第一根阴线上面标记绿色1，之后的第二根阳线上面标记绿色2，一直标到99。

股票网解答：

drawkline(h,o,l,c);
D:=1150101;
yang:=date>=D and c>o {and c>ref(c,1)};
drawtext(yang,h*1.01,var2str(sum(yang,0),0)),colorred;