以下是通达信五看看盘贇贇古古版主图选股源码(无源码的请下载附件导入)
其实我只是想在K线中用“3根K线判强弱”,“用4根K线定多空”,"用5根K线抓趋势"(只看最近的5根K线),
1、用最近的3根K线解盘“转强或转弱”,并显示“转强或转弱”
2、用最近的4根K线解盘“转多或转空”,并显示“转多或转空”
3、用最近的5根K线解盘"趋势向上或趋势向下",并显示"趋势向上或趋势向下"
图片中1、3、5是一组,2、4、6是一组。总是用下一根K线来确认之前的组合来判断多空,但是最多5根K线就够了。
这个是“贇贇古古”同学提供的喜欢就用,不如意就放弃。跟帖别说三道四。
、难得有这么好心人与大家分享理念了 请支持 理解。
{主图}
TJ1:=EVERY(C<O,2) AND H<REF(H,1) AND L<REF(L,1);
XG1:=REF(TJ1,1) AND C>O AND C>REF(HHV(H,2),1) AND H=HHV(H,3);
Q1:=BACKSET(XG1,3);
T1:=BARSLAST(CROSS(Q1=1,0.5));
DRAWLINE(T1=0,REFX(HHV(H,3),BARSNEXT(XG1)),XG1,HHV(H,3),0),COLORMAGENTA;
DRAWLINE(T1=0,REFX(LLV(L,3),BARSNEXT(XG1)),XG1,LLV(L,3),0),COLORMAGENTA;
STICKLINE(T1=0,REFX(HHV(H,3),BARSNEXT(XG1)),REFX(LLV(L,3),BARSNEXT(XG1)),0,0),COLORMAGENTA;
STICKLINE(XG1,HHV(H,3),LLV(L,3),0,0),COLORMAGENTA;
TJ2:=EVERY(C>O,2) AND H>REF(H,1) AND L>REF(L,1);
XG2:=REF(TJ2,1) AND C<O AND C<REF(LLV(L,2),1) AND L=LLV(L,3);
Q2:=BACKSET(XG2,3);
T2:=BARSLAST(CROSS(Q2=1,0.5));
DRAWLINE(T2=0,REFX(HHV(H,3),BARSNEXT(XG2)),XG2,HHV(H,3),0),COLORYELLOW;
DRAWLINE(T2=0,REFX(LLV(L,3),BARSNEXT(XG2)),XG2,LLV(L,3),0),COLORYELLOW;
STICKLINE(T2=0,REFX(HHV(H,3),BARSNEXT(XG2)),REFX(LLV(L,3),BARSNEXT(XG2)),0,0),COLORYELLOW;
STICKLINE(XG2,HHV(H,3),LLV(L,3),0,0),COLORYELLOW;
XG3:=REF(XG1,1) AND C>O AND C>REF(HHV(H,3),1) AND H=HHV(H,4);
Q3:=BACKSET(XG3,4);
T3:=BARSLAST(CROSS(Q3=1,0.5));
DRAWLINE(T3=0,REFX(HHV(H,4),BARSNEXT(XG3)),XG3,HHV(H,4),0),COLORLIRED;
DRAWLINE(T3=0,REFX(LLV(L,4),BARSNEXT(XG3)),XG3,LLV(L,4),0),COLORLIRED;
STICKLINE(T3=0,REFX(HHV(H,4),BARSNEXT(XG3)),REFX(LLV(L,4),BARSNEXT(XG3)),0,0),COLORLIRED;
STICKLINE(XG3,HHV(H,4),LLV(L,4),0,0),COLORLIRED;
XG4:=REF(XG2,1) AND C<O AND C<REF(LLV(L,3),1) AND L=LLV(L,4);
Q4:=BACKSET(XG4,4);
T4:=BARSLAST(CROSS(Q4=1,0.5));
DRAWLINE(T4=0,REFX(HHV(H,4),BARSNEXT(XG4)),XG4,HHV(H,4),0),COLORBLUE;
DRAWLINE(T4=0,REFX(LLV(L,4),BARSNEXT(XG4)),XG4,LLV(L,4),0),COLORBLUE;
STICKLINE(T4=0,REFX(HHV(H,4),BARSNEXT(XG4)),REFX(LLV(L,4),BARSNEXT(XG4)),0,0),COLORBLUE;
STICKLINE(XG4,HHV(H,4),LLV(L,4),0,0),COLORBLUE;
XG5:=REF(XG3,1) AND C>O AND C>REF(HHV(H,4),1) AND H=HHV(H,5);
Q5:=BACKSET(XG5,5);
T5:=BARSLAST(CROSS(Q5=1,0.5));
DRAWLINE(T5=0,REFX(HHV(H,5),BARSNEXT(XG5)),XG5,HHV(H,5),0),COLORRED;
DRAWLINE(T5=0,REFX(LLV(L,5),BARSNEXT(XG5)),XG5,LLV(L,5),0),COLORRED;
STICKLINE(T5=0,REFX(HHV(H,5),BARSNEXT(XG5)),REFX(LLV(L,5),BARSNEXT(XG5)),0,0),COLORRED;
STICKLINE(XG5,HHV(H,5),LLV(L,5),0,0),COLORRED;
XG6:=REF(XG4,1) AND C<O AND C<REF(LLV(L,4),1) AND L=LLV(L,5);
Q6:=BACKSET(XG6,5);
T6:=BARSLAST(CROSS(Q6=1,0.5));
DRAWLINE(T6=0,REFX(HHV(H,5),BARSNEXT(XG6)),XG6,HHV(H,5),0),COLORGREEN;
DRAWLINE(T6=0,REFX(LLV(L,5),BARSNEXT(XG6)),XG6,LLV(L,5),0),COLORGREEN;
STICKLINE(T6=0,REFX(HHV(H,5),BARSNEXT(XG6)),REFX(LLV(L,5),BARSNEXT(XG6)),0,0),COLORGREEN;
STICKLINE(XG6,HHV(H,5),LLV(L,5),0,0),COLORGREEN;
A:='玫红框:三K看转强';
A1:='浅红框:四K判转多';
A2:='大红框:五K抓涨势';
B:='黄色框:三K看转弱';
B1:='蓝色框:四K判转空';
B2:='绿色框:五K抓跌势';
DRAWTEXT_FIX(ISLASTBAR,0.005,0,0,A),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.1,0,A1),COLORLIRED;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.2,0,A2),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.12,0,0,B),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.12,0.1,0,B1),COLORBLUE;
DRAWTEXT_FIX(ISLASTBAR,0.12,0.2,0,B2),COLORGREEN;
{选股}
TJ1:=EVERY(C<O,2) AND H<REF(H,1) AND L<REF(L,1);
XG1:=REF(TJ1,1) AND C>O AND C>REF(HHV(H,2),1) AND H=HHV(H,3);
XG3:=REF(XG1,1) AND C>O AND C>REF(HHV(H,3),1) AND H=HHV(H,4);
XG5:REF(XG3,1) AND C>O AND C>REF(HHV(H,4),1) AND H=HHV(H,5);
选股有三种情况 您喜欢那种就将哪一种的=号去掉,将其他两个=加上去,上面是选红色框,下面是选玫红框
TJ1:=EVERY(C<O,2) AND H<REF(H,1) AND L<REF(L,1);
XG1:REF(TJ1,1) AND C>O AND C>REF(HHV(H,2),1) AND H=HHV(H,3);
XG3:=REF(XG1,1) AND C>O AND C>REF(HHV(H,3),1) AND H=HHV(H,4);
XG5:=REF(XG3,1) AND C>O AND C>REF(HHV(H,4),1) AND H=HHV(H,5);
再下面是浅红框
TJ1:=EVERY(C<O,2) AND H<REF(H,1) AND L<REF(L,1);
XG1:=REF(TJ1,1) AND C>O AND C>REF(HHV(H,2),1) AND H=HHV(H,3);
XG3:REF(XG1,1) AND C>O AND C>REF(HHV(H,3),1) AND H=HHV(H,4);
XG5:=REF(XG3,1) AND C>O AND C>REF(HHV(H,4),1) AND H=HHV(H,5);
627366595.jpg
627444623.jpg
627499867.jpg
627133381.rar
(4.61 KB, 下载次数: 0, 售价: 2 金钱)
|