通达信海龟三买选股指标公式源码

通达信海龟三买选股指标公式源码

源码正文：

N1:=55;N2:=20{XG51};
LC:=REF(CLOSE,1){XG51};
WTR:=maX((HIGH - LOW),MAX((HIGH - LC),(LC - LOW))){XG51};
ATR:=SMA(WTR,20,1){XG51};
AA:=(HHV(HIGH,N1) - (2 * ATR)){XG51};
BB:=crOSS(CLOSE,REF(HHV(HIGH,55),1)){XG51};
SSS:=CROSS(MIN(MA(CLOSE,13),AA),CLOSE){XG51};
BBB:=BArslAst(BB){XG51};
SSSB:=BARSLAST(SSS){XG51};
B1:=((BBB = 0) AND (REF(SSSB,1) < REF(BBB,1))){XG51};
B1B:=BARSLAST(B1){XG51};
B2:=((((BB = 1) AND (B1B < SSSB)) AND (B1B > 0)) AND (COUNT(BB,SSSB) < 3)){XG51};
B2B:=BARSLAST(B2){XG51};
B3:=((((BB = 1) AND (B2B < B1B)) AND (COUNT(BB,SSSB) < 4)) AND (COUNT(BB,SSSB) > 2)){XG51};
B3B:=BARSLAST(B3){XG51};
SS:=CROSS(MAX(AA,MA(CLOSE,13)),CLOSE){XG51};
SS1:=(((SS AND ((B3B < B2B) OR (B2B < B1B))) AND (SSSB > B1B)) AND (COUNT(SS,B2B) < 2)){XG51};
SS1B:=BARSLAST(SS1){XG51};
SS2:=((((SS AND (SS1B < SSSB)) AND (B3B < B2B)) AND (SS1B > 0)) AND (COUNT(SS,B2B) < 3)){XG51};
SSSS:=(SSS AND (REF(SSSB,1) > REF(B1B,1))){XG51};
DRAWICON((B1 = 1),(LOW - 0.1),1){XG51};
DRAWTEXT((B1 = 1),(LOW - 0.25),'买1'){XG51};
DRAWICON((B2 = 1),(LOW - 0.1),1){XG51};
DRAWTEXT((B2 = 1),(LOW - 0.25),'买2'){XG51};
DRAWICON((B3 = 1),(LOW - 0.1),1){XG51};
DRAWTEXT((B3 = 1),(LOW - 0.25),'买3'){XG51};
DRAWICON((SS1 = 1),(HIGH + 0.1),2){XG51};
DRAWTEXT((SS1 = 1),(HIGH + 0.25),'止损1'){XG51};
DRAWICON((SS2 = 1),(HIGH + 0.1),2){XG51};
DRAWTEXT((SS2 = 1),(HIGH + 0.25),'止损2'){XG51};
DRAWICON((SSSS = 1),(HIGH + 0.1),2){XG51};
DRAWTEXT((SSSS = 1),(HIGH + 0.25),'快卖'){X_G~5-1_C_N_{};