通达信怪异涨停（鹏腾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,'■------------------------先涨停后跌停');