通达信猪头望源码

以下是通达信猪头望源码

LC:=REF(CLOSE,1);
 AR:=MAX((HIGH - LOW),MAX((HIGH - LC),(LC - LOW)));
 ATR:=SMA(AR,20,1);
 AA:=(HHV(HIGH,20) - (2 * ATR));
 BB:=CROSS(CLOSE,REF(HHV(HIGH,55),1));
 SSS:=CROSS(MIN(MA(CLOSE,13),AA),CLOSE);
 BBB:=BARSLAST(BB);
 SSSB:=BARSLAST(SSS);
 B1:=((BBB = 0) AND (REF(SSSB,1) < REF(BBB,1)));
 B1B:=BARSLAST(B1);
 B2:=((((BB = 1) AND (B1B < SSSB)) AND (B1B > 0)) AND (COUNT(BB,SSSB) < 3));
 B2B:=BARSLAST(B2);
 B3:=((((BB = 1) AND (B2B < B1B)) AND (COUNT(BB,SSSB) < 4)) AND (COUNT(BB,SSSB) > 2));
 B3B:=BARSLAST(B3);
 SS:=CROSS(MAX(AA,MA(CLOSE,13)),CLOSE);
 SS1:=(((SS AND ((B3B < B2B) OR (B2B < B1B))) AND (SSSB > B1B)) AND (COUNT(SS,B2B) < 2));
 SS1B:=BARSLAST(SS1);
 SS2:=((((SS AND (SS1B < SSSB)) AND (B3B < B2B)) AND (SS1B > 0)) AND (COUNT(SS,B2B) < 3));
 SSSS:=(SSS AND (REF(SSSB,1) > REF(B1B,1)));
 DRAWICON((B1 = 1),(LOW - 0.1),13);
 DRAWTEXT((B1 = 1),(LOW*0.96),'买1'),COLOR0000FF;
 DRAWICON((B2 = 1),(LOW - 0.1),13);
 DRAWTEXT((B2 = 1),(LOW*0.96),'买2'),COLOR0000FF;
 DRAWICON((B3 = 1),(LOW - 0.1),13);
 DRAWTEXT((B3 = 1),(LOW *0.96),'买3'),COLOR0000FF;
 DRAWICON((SS1 = 1),(HIGH + 0.1),2);
 DRAWTEXT((SS1 = 1),(HIGH + 0.25),'止损1'),COLOR00FF00;
 DRAWICON((SS2 = 1),(HIGH + 0.1),2);
 DRAWTEXT((SS2 = 1),(HIGH + 0.25),'止损2'),COLOR00FF00;
 DRAWICON((SSSS = 1),(HIGH + 0.5),10);
 DRAWTEXT((SSSS = 1),(HIGH*1.05),'快卖'),COLOR00FF00;

K:=SMA(C,3,1),COLORMAGENTA;
 D:=SMA(K,3,1)COLORCYAN;
猪头望:REF(HHV(H,3),BARSLAST(CROSS(D,K))+1),DOTLINE,COLORFFFFFF;