jywzyjl 2008-4-19 16:11
求高人出手将短线套利和直效主图指标合二为一
求高人出手将短线套利和直效主图指标合二为一
一、短线套利
MA6:MA(C,6),COLORWHITE,LINETHICK2;
MA18:MA(C,18),COLOR0099FF,LINETHICK2;
MA55:MA(C,55),COLORFF00FF;
MA125:MA(C,125),COLORFFCC66;
MA250:MA(C,250),COLORBLUE;
TY:=C;
A1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10); C1:=BACKSET(B1,10+1); HD:=FILTER(C1,10);
A2:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(A2,10); C2:=BACKSET(B2,10+1); LD:=FILTER(C2,10);
A:=REF(C,BARSLAST(HD)); B:=REF(C,BARSLAST(LD));
T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;
T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
波峰:IF(T1,A,A),COLORFF00FF,POINTDOT;
STICKLINE(T1,A,A,9,0),COLORFF00FF;
波谷:IF(T2,B,B),COLOR80FF00,POINTDOT;
STICKLINE(T2,B,B,9,0),COLOR80FF00;
买进价:=((C-REF(MA6,1))/6+MA6)*1.004;
买进条件:=CROSS(C,买进价) AND 买进价>REF(买进价,1);
白K买进:IF(买进条件,L,H),COLORWHITE,POINTDOT;
STICKLINE(买进条件,H,L,0,1),COLORWHITE,LINETHICK2;
STICKLINE(买进条件,O,C,4,1),COLORWHITE,LINETHICK2;
加码价:=((C-REF(MA18,1))/18+MA18)*1.004;
加码条件:=CROSS(C,加码价) AND 加码价>REF(加码价,1);
黄K加码:IF(加码条件,L,H),COLORYELLOW,POINTDOT;
STICKLINE(加码条件,H,L,0,1),COLORYELLOW,LINETHICK2;
STICKLINE(加码条件,O,C,4,1),COLORYELLOW,LINETHICK2;
二、直效主图
直效主图
{n=10,0.150 CX=1,1,2}
s1:=条件函数(证券类型=0 OR 证券类型=7,0.999,0.98);
s2:=条件函数(证券类型=0 OR 证券类型=7,1.001,1.02);
MA06:简单移动平均(收盘价,6),PRECISION2,COLOR00FFFF,短虚线;
MA18:简单移动平均(收盘价,18),PRECISION2,COLOREEEEEE,短虚线;
画分段线(MA06>=向前引用(MA06,1) AND CX=1,MA06),COLOR0000CC,LINETHICK2;
画分段线(MA06<向前引用(MA06,1) AND CX=1,MA06),COLOR009900,LINETHICK2;
画分段线(MA18>=向前引用(MA18,1) AND CX=2,MA18),COLOR0000CC,LINETHICK2;
画分段线(MA18<向前引用(MA18,1) AND CX=2,MA18),COLOR009900,LINETHICK2;
BZA06:=上一次条件成立位置(收盘价<MA06);
BZB06:=上一次条件成立位置(MA06<向前引用(MA06,1));
BZA18:=上一次条件成立位置(收盘价<MA18);
BZB18:=上一次条件成立位置(MA18<向前引用(MA18,1));
BDA06:=上一次条件成立位置(收盘价>MA06);
BDB06:=上一次条件成立位置(MA06>向前引用(MA06,1));
BDA18:=上一次条件成立位置(收盘价>MA18);
BDB18:=上一次条件成立位置(MA18>向前引用(MA18,1));
V06:简单移动平均(成交量,6),LINETHICK0,PRECISION0,COLOR6666CC;
V36:简单移动平均(成交量,36),LINETHICK0,PRECISION0,COLORFFCC00;
VVOL:成交量,LINETHICK0,PRECISION0,COLORFF00FF;
A1:=向前引用(收盘价,N)=最高值(收盘价,2*N+1); B1:=信号过滤(A1,N); C1:=向前赋值(B1,N+1); HD:=信号过滤(C1,N);
A2:=向前引用(收盘价,N)=最低值(收盘价,2*N+1); B2:=信号过滤(A2,N); C2:=向前赋值(B2,N+1); LD:=信号过滤(C2,N);
A:=向前引用(收盘价,上一次条件成立位置(HD)); B:=向前引用(收盘价,上一次条件成立位置(LD));
t1:=上一次条件成立位置(HD)<上一次条件成立位置(LD) AND 求逻辑非(HD) ;
t2:=上一次条件成立位置(HD)>上一次条件成立位置(LD) AND 求逻辑非(LD);
画分段线(t1,A),COLORCC6600,LINETHICK2;
画分段线(t2,B),COLORDDDDDD,LINETHICK2;
显示数字(t1=0 and 向前引用(t1,1)>0 or 是否最后周期 and t1>0,向前引用(a,1),向前引用(a,1),2),COLORCC6600;
显示数字(t2=0 and 向前引用(t2,1)>0 or 是否最后周期 and t2>0,向前引用(b,1),向前引用(b,1),2),COLORDDDDDD;
画分段线(t1,A*0.9),COLORCC6600,LINETHICK1;
显示数字(t1=0 and 向前引用(t1,1)>0 or 是否最后周期 and t1>0,向前引用(a*0.9,1),向前引用(a*0.9,1),2),COLORCC6600;
画分段线(t2,B*1.1),COLORDDDDDD,LINETHICK1;
显示数字(t2=0 and 向前引用(t2,1)>0 or 是否最后周期 and t2>0,向前引用(b*1.1,1),向前引用(b*1.1,1),2),COLORCDDDDDD;
tj:=收盘价>开盘价 or 收盘价=开盘价 and 收盘价>向前引用(收盘价,1);
画柱线(tj and 收盘价>MA18,最高价,最低价,0.1,0),colorred;
画柱线(tj and 收盘价>MA18,收盘价,开盘价,7,0),colorred;
画柱线(求逻辑非(tj) and 收盘价>MA18,最高价,最低价,0.1,0),colorcyan;
画柱线(求逻辑非(tj) and 收盘价>MA18,收盘价,开盘价,7,0),colorcyan;
画柱线(tj and 收盘价<MA18,最高价,最低价,0.1,0),colorred;
画柱线(tj and 收盘价<MA18,收盘价,开盘价,7,1),colorred;
画柱线(求逻辑非(tj) and 收盘价<MA18,最高价,最低价,0.1,0),colorcyan;
画柱线(求逻辑非(tj) and 收盘价<MA18,收盘价,开盘价,7,1),colorcyan
{INPUT:N(10,1,150),CX(1,1,2);}
MA06:MA(C,6),COLOR00FFFF,POINTDOT;
MA18:MA(C,18),COLOREEEEEE,POINTDOT;
IF(MA06>=REF(MA06,1),MA06,DRAWNULL),COLOR0000CC,LINETHICK2;
IF(MA06<REF(MA06,1) AND CX=1,MA06,DRAWNULL),COLOR009900,LINETHICK2;
IF(MA18>=REF(MA18,1) AND CX=2,MA18,DRAWNULL),COLOR0000CC,LINETHICK2;
IF(MA18<REF(MA18,1) AND CX=2,MA18,DRAWNULL),COLOR009900,LINETHICK2;
BZA06:=BARSLAST(C<MA06);
BZB06:=BARSLAST(MA06<REF(MA06,1));
BZA18:=BARSLAST(C<MA18);
BZB18:=BARSLAST(MA18<REF(MA18,1));
BDA06:=BARSLAST(C>MA06);
BDB06:=BARSLAST(MA06>REF(MA06,1));
BDA18:=BARSLAST(C>MA18);
BDB18:=BARSLAST(MA18>REF(MA18,1));
V06:MA(VOL,6),COLOR6666CC,NODRAW;
V36:MA(VOL,36),COLORFFCC00,NODRAW;
VVOL:V,COLORFF00FF,NODRAW;
A1:=REF(C,N)=HHV(C,2*N+1);
B1:=FILTER(A1,N);
C1:=BACKSET(B1,N+1);
HD:=FILTER(C1,N);
A2:=REF(C,N)=LLV(C,2*N+1);
B2:=FILTER(A2,N);
C2:=BACKSET(B2,N+1);
LD:=FILTER(C2,N);
A:=REF(C,BARSLAST(HD)); B:=REF(C,BARSLAST(LD));
T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;
T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
IF(T1,A,DRAWNULL),COLORCC6600,LINETHICK2;
IF(T2,B,DRAWNULL),COLORDDDDDD,LINETHICK2;
IF(T1,A*0.9,DRAWNULL),COLORCC6600,LINETHICK1;
IF(T2,B*1.1,DRAWNULL),COLORDDDDDD,LINETHICK1;
YIN1:=BDA06>=2 AND BDB06=1 AND CX=1;
YIN2:=BDA18>=2 AND BDB18=1 AND CX=2;
YIN3:=BZA06>=2 AND BZB06=1 AND V06>V36 AND CX=1;
YIN4:=BZA06>=2 AND BZB06=1 AND V06>V36 AND CX=2;
DRAWTEXT(YIN1 OR YIN2,H*1.05,'卖出'),COLOR00FFFF;
DRAWTEXT(YIN3 OR YIN4,L*0.95,'买入'),COLOR00FF00;
以上两个指标原理均来自付吾豪《操盘圣经》买卖八法。整合后可清晰看到介入 加码 卖出。（最好能在均线标题区提示6日18日均线走多走平走空箭头）
jywzyjl 2008-4-19 16:13
发个求助，不知道如何发独自主题，只好跟贴求助了。希望版 主见谅，不吝赐教。多谢！
求高人出手将短线套利和直效主图指标合二为一
一、短线套利
MA6:MA(C,6),COLORWHITE,LINETHICK2;
MA18:MA(C,18),COLOR0099FF,LINETHICK2;
MA55:MA(C,55),COLORFF00FF;
MA125:MA(C,125),COLORFFCC66;
MA250:MA(C,250),COLORBLUE;
TY:=C;
A1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10); C1:=BACKSET(B1,10+1); HD:=FILTER(C1,10);
A2:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(A2,10); C2:=BACKSET(B2,10+1); LD:=FILTER(C2,10);
A:=REF(C,BARSLAST(HD)); B:=REF(C,BARSLAST(LD));
T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;
T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
波峰:IF(T1,A,A),COLORFF00FF,POINTDOT;
STICKLINE(T1,A,A,9,0),COLORFF00FF;
波谷:IF(T2,B,B),COLOR80FF00,POINTDOT;
STICKLINE(T2,B,B,9,0),COLOR80FF00;
买进价:=((C-REF(MA6,1))/6+MA6)*1.004;
买进条件:=CROSS(C,买进价) AND 买进价>REF(买进价,1);
白K买进:IF(买进条件,L,H),COLORWHITE,POINTDOT;
STICKLINE(买进条件,H,L,0,1),COLORWHITE,LINETHICK2;
STICKLINE(买进条件,O,C,4,1),COLORWHITE,LINETHICK2;
加码价:=((C-REF(MA18,1))/18+MA18)*1.004;
加码条件:=CROSS(C,加码价) AND 加码价>REF(加码价,1);
黄K加码:IF(加码条件,L,H),COLORYELLOW,POINTDOT;
STICKLINE(加码条件,H,L,0,1),COLORYELLOW,LINETHICK2;
STICKLINE(加码条件,O,C,4,1),COLORYELLOW,LINETHICK2;
二、直效主图
直效主图
{n=10,0.150 CX=1,1,2}
s1:=条件函数(证券类型=0 OR 证券类型=7,0.999,0.98);
s2:=条件函数(证券类型=0 OR 证券类型=7,1.001,1.02);
MA06:简单移动平均(收盘价,6),PRECISION2,COLOR00FFFF,短虚线;
MA18:简单移动平均(收盘价,18),PRECISION2,COLOREEEEEE,短虚线;
画分段线(MA06>=向前引用(MA06,1) AND CX=1,MA06),COLOR0000CC,LINETHICK2;
画分段线(MA06<向前引用(MA06,1) AND CX=1,MA06),COLOR009900,LINETHICK2;
画分段线(MA18>=向前引用(MA18,1) AND CX=2,MA18),COLOR0000CC,LINETHICK2;
画分段线(MA18<向前引用(MA18,1) AND CX=2,MA18),COLOR009900,LINETHICK2;
BZA06:=上一次条件成立位置(收盘价<MA06);
BZB06:=上一次条件成立位置(MA06<向前引用(MA06,1));
BZA18:=上一次条件成立位置(收盘价<MA18);
BZB18:=上一次条件成立位置(MA18<向前引用(MA18,1));
BDA06:=上一次条件成立位置(收盘价>MA06);
BDB06:=上一次条件成立位置(MA06>向前引用(MA06,1));
BDA18:=上一次条件成立位置(收盘价>MA18);
BDB18:=上一次条件成立位置(MA18>向前引用(MA18,1));
V06:简单移动平均(成交量,6),LINETHICK0,PRECISION0,COLOR6666CC;
V36:简单移动平均(成交量,36),LINETHICK0,PRECISION0,COLORFFCC00;
VVOL:成交量,LINETHICK0,PRECISION0,COLORFF00FF;
A1:=向前引用(收盘价,N)=最高值(收盘价,2*N+1); B1:=信号过滤(A1,N); C1:=向前赋值(B1,N+1); HD:=信号过滤(C1,N);
A2:=向前引用(收盘价,N)=最低值(收盘价,2*N+1); B2:=信号过滤(A2,N); C2:=向前赋值(B2,N+1); LD:=信号过滤(C2,N);
A:=向前引用(收盘价,上一次条件成立位置(HD)); B:=向前引用(收盘价,上一次条件成立位置(LD));
t1:=上一次条件成立位置(HD)<上一次条件成立位置(LD) AND 求逻辑非(HD) ;
t2:=上一次条件成立位置(HD)>上一次条件成立位置(LD) AND 求逻辑非(LD);
画分段线(t1,A),COLORCC6600,LINETHICK2;
画分段线(t2,B),COLORDDDDDD,LINETHICK2;
显示数字(t1=0 and 向前引用(t1,1)>0 or 是否最后周期 and t1>0,向前引用(a,1),向前引用(a,1),2),COLORCC6600;
显示数字(t2=0 and 向前引用(t2,1)>0 or 是否最后周期 and t2>0,向前引用(b,1),向前引用(b,1),2),COLORDDDDDD;
画分段线(t1,A*0.9),COLORCC6600,LINETHICK1;
显示数字(t1=0 and 向前引用(t1,1)>0 or 是否最后周期 and t1>0,向前引用(a*0.9,1),向前引用(a*0.9,1),2),COLORCC6600;
画分段线(t2,B*1.1),COLORDDDDDD,LINETHICK1;
显示数字(t2=0 and 向前引用(t2,1)>0 or 是否最后周期 and t2>0,向前引用(b*1.1,1),向前引用(b*1.1,1),2),COLORCDDDDDD;
tj:=收盘价>开盘价 or 收盘价=开盘价 and 收盘价>向前引用(收盘价,1);
画柱线(tj and 收盘价>MA18,最高价,最低价,0.1,0),colorred;
画柱线(tj and 收盘价>MA18,收盘价,开盘价,7,0),colorred;
画柱线(求逻辑非(tj) and 收盘价>MA18,最高价,最低价,0.1,0),colorcyan;
画柱线(求逻辑非(tj) and 收盘价>MA18,收盘价,开盘价,7,0),colorcyan;
画柱线(tj and 收盘价<MA18,最高价,最低价,0.1,0),colorred;
画柱线(tj and 收盘价<MA18,收盘价,开盘价,7,1),colorred;
画柱线(求逻辑非(tj) and 收盘价<MA18,最高价,最低价,0.1,0),colorcyan;
画柱线(求逻辑非(tj) and 收盘价<MA18,收盘价,开盘价,7,1),colorcyan
{INPUT:N(10,1,150),CX(1,1,2);}
MA06:MA(C,6),COLOR00FFFF,POINTDOT;
MA18:MA(C,18),COLOREEEEEE,POINTDOT;
IF(MA06>=REF(MA06,1),MA06,DRAWNULL),COLOR0000CC,LINETHICK2;
IF(MA06<REF(MA06,1) AND CX=1,MA06,DRAWNULL),COLOR009900,LINETHICK2;
IF(MA18>=REF(MA18,1) AND CX=2,MA18,DRAWNULL),COLOR0000CC,LINETHICK2;
IF(MA18<REF(MA18,1) AND CX=2,MA18,DRAWNULL),COLOR009900,LINETHICK2;
BZA06:=BARSLAST(C<MA06);
BZB06:=BARSLAST(MA06<REF(MA06,1));
BZA18:=BARSLAST(C<MA18);
BZB18:=BARSLAST(MA18<REF(MA18,1));
BDA06:=BARSLAST(C>MA06);
BDB06:=BARSLAST(MA06>REF(MA06,1));
BDA18:=BARSLAST(C>MA18);
BDB18:=BARSLAST(MA18>REF(MA18,1));
V06:MA(VOL,6),COLOR6666CC,NODRAW;
V36:MA(VOL,36),COLORFFCC00,NODRAW;
VVOL:V,COLORFF00FF,NODRAW;
A1:=REF(C,N)=HHV(C,2*N+1);
B1:=FILTER(A1,N);
C1:=BACKSET(B1,N+1);
HD:=FILTER(C1,N);
A2:=REF(C,N)=LLV(C,2*N+1);
B2:=FILTER(A2,N);
C2:=BACKSET(B2,N+1);
LD:=FILTER(C2,N);
A:=REF(C,BARSLAST(HD)); B:=REF(C,BARSLAST(LD));
T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;
T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
IF(T1,A,DRAWNULL),COLORCC6600,LINETHICK2;
IF(T2,B,DRAWNULL),COLORDDDDDD,LINETHICK2;
IF(T1,A*0.9,DRAWNULL),COLORCC6600,LINETHICK1;
IF(T2,B*1.1,DRAWNULL),COLORDDDDDD,LINETHICK1;
YIN1:=BDA06>=2 AND BDB06=1 AND CX=1;
YIN2:=BDA18>=2 AND BDB18=1 AND CX=2;
YIN3:=BZA06>=2 AND BZB06=1 AND V06>V36 AND CX=1;
YIN4:=BZA06>=2 AND BZB06=1 AND V06>V36 AND CX=2;
DRAWTEXT(YIN1 OR YIN2,H*1.05,'卖出'),COLOR00FFFF;
DRAWTEXT(YIN3 OR YIN4,L*0.95,'买入'),COLOR00FF00;
以上两个指标原理均来自付吾豪《操盘圣经》买卖八法。整合后可清晰看到介入 加码 卖出。（最好能在均线标题区提示6日18日均线走多走平走空箭头）