通达信龙抬头源码
A154:=((((((((CLOSE < A17) AND (CROSS(A6,A7))) AND ((REF(A2,1)) < 1)) AND (A2 > A3)) AND (A8 > (REF(A8,4)))) AND ((REF(A4,1)) < (REF(A4,2)))) AND (A4 > (REF(A4,1)))) * 55);
A155:=((FILTER(((((((REF(A40,1)) < (REF(A40,2))) AND (CLOSE > A33)) AND (A40 > (REF(A40,1)))) AND (A2 > A3)) AND (A8 > (REF(A8,1)))),5)) * 45);
A156:=((((((((((((((((MAX(A40,A39)) / (MIN(A40,A39))) > 1.01) AND (((MAX(A40,A39)) / (MIN(A40,A39))) < 1.03)) AND (A39 > (REF(A39,1)))) AND (A39 > (REF(A39,5)))) AND (A8 < 50)) AND (A30 > A40)) AND (A30 < A39)) AND (A39 > A40)) AND (CLOSE < (REF(CLOSE,1)))) AND (CLOSE > A40)) AND (CLOSE > A36)) AND (CLOSE < OPEN)) AND ((CLOSE - LOW) <= 0.04)) * 55);
A157:=MAX(MAX(MAX(MAX(A13,A16),A17),A18),A19) / MIN(MIN(MIN(MIN(A13,A16),A17),A18),A19) < 1.05;
A158:=MAX(MAX(MAX(A13,A16),A17),A18) / MIN(MIN(MIN(A13,A16),A17),A18) < 1.05;
海面:20,COLORLIBLUE;
DRAWTEXT(ISLASTBAR,海面,'海面'),COLORGREEN;
海天分界线:50,COLORYELLOW;
DRAWTEXT(ISLASTBAR,海天分界线,'分界线'),COLORYELLOW;
天际:80,COLORRED;
DRAWTEXT(ISLASTBAR,天际,'天际'),COLORRED;
YAR1:=HHV(HIGH,9)-LLV(LOW,9);
YAR2:=HHV(HIGH,9)-CLOSE;
YAR3:=CLOSE-LLV(LOW,9);
YAR4:=YAR2/YAR1*100-70;
YAR5:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60));
YAR6:=(2*CLOSE+HIGH+LOW)/4;
YAR7:=SMA(YAR3/YAR1*100,3,1);
YAR8:=LLV(LOW,34);
YAR9:=SMA(YAR7,3,1)-SMA(YAR4,9,1);
YAR10:=IF(YAR9>100,YAR9-100,0);
YAR11:=HHV(HIGH,34);
多:EMA((YAR6-YAR8)/(YAR11-YAR8)*100,13),COLORRED;
空:EMA(0.667*REF(多,1)+0.333*多,2);
DRAWBAND(多,RGB(255,0,0),空,RGB(256,200,10));
DRAWTEXT((龙抬头 > 0),-5,'龙抬头'),COLORYELLOW;