- 金币:
-
- 奖励:
-
- 热心:
-
- 注册时间:
- 2007-8-13
|
|
根据之前一个兄弟提供的海龟公式结合EMA13 做成的主图,感觉效果不错,也可以进行选股,分享出来,希望能继续改进。
- ema13:ema(c,13),colorblue,linethick2;
- ema17:ema(c,17),colorred,linethick2;
- ema34:ema(c,34),colorgreen;
- ema55:ema(c,55),colorff00ff;
- ema120:ema(c,120),colorffcc66;
- {海龟公式}
- LC:=REF(CLOSE,1);
- TR:=MAX((HIGH - LOW),MAX((HIGH - LC),(LC - LOW)));
- ATR:=SMA(TR,20,1);
- AA:=(HHV(HIGH,N1) - (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))),linethick0;
- B1B:=BARSLAST(B1);
- B2:=((((BB = 1) AND (B1B < SSSB)) AND (B1B > 0)) AND (COUNT(BB,SSSB) < 3)),linethick0;
- B2B:=BARSLAST(B2);
- B3:=((((BB = 1) AND (B2B < B1B)) AND (COUNT(BB,SSSB) < 4)) AND (COUNT(BB,SSSB) > 2)),linethick0;
- 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),1);
- DRAWTEXT((B1 = 1),(LOW - 0.5),'买1'),colorred;
- DRAWICON((B2 = 1),(LOW - 0.1),1);
- DRAWTEXT((B2 = 1),(LOW - 0.5),'买2'),colorf00ff0;
- DRAWICON((B3 = 1),(LOW - 0.1),1);
- DRAWTEXT((B3 = 1),(LOW - 0.5),'买3'),color000999;
- DRAWICON((SS1 = 1),(HIGH + 0.1),2);
- DRAWTEXT((SS1 = 1),(HIGH + 0.5),'跑1'),colorgreen;
- DRAWICON((SS2 = 1),(HIGH + 0.1),2);
- DRAWTEXT((SS2 = 1),(HIGH + 0.5),'跑2'),color00ff00;
- DRAWICON((SSSS = 1),(HIGH + 0.1),2);
- DRAWTEXT((SSSS = 1),(HIGH + 0.5),'跑3'),color399c7f;
- 海龟选股:B1=1 or B2=1 or B3=1,linethick0;
复制代码
[ 本帖最后由 leo_wang22 于 2008-1-5 14:34 编辑 ] |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
|
|