以下是通达信怪异涨停(鹏腾2009版本)主图源码
T1:=H/MIN(C,O)>1.095 AND MAX(C,O)/MIN(C,O)<1.02 AND MIN(C,O)/L<1.01;
DRAWTEXT(T1,C,'☆------------------------涨停异动长上影');
T2:=O/L>1.06 AND C=O AND O=H;
DRAWTEXT(T2,C,'●------------------------涨停异动长下影'),COLORRED;
T3:=REF(C,1)/O>1.095 AND C/L>1.095 AND H/C<1.01;
DRAWTEXT(T3,C,'○------------------------先跌停后涨停'),COLORYELLOW;
T4:=MAX(O,C)/MIN(C,O)<1.01 AND H/MAX(O,C)>1.05 AND MIN(C,O)/L>1.05;
DRAWTEXT(T4,C,'★------------------------涨停异动长十字'),COLORCYAN;
T5:=H=O AND O/REF(C,1)>1.095 AND H/L>1.18 AND L=C;
DRAWTEXT(T5,C,'■------------------------先涨停后跌停');