投资者咨询：老师请帮忙修改 (文华财经WH6赢顺V6.7)
来源:文华财经 日期:2018-8-24 20:54
A4:=MA(CLOSE,20);
A5:=(CLOSE>MA(CLOSE,5));
A6:=(MA(CLOSE,5)>MA(CLOSE,10));
A7:=(CLOSE>MA(CLOSE,10));
A8:=(MA(CLOSE,5)>MA(CLOSE,20));
A9:=(CLOSE>MA(CLOSE,20));
A10:=REF(A4,1);
A11:=(A4> A10);
AVX:=(((((IF(A5,10,(0 - 10)) + IF(A6,10,(0 - 10))) + IF(A7,10,(0 -10))) +
IF(A8,10,(0 - 10))) + IF(A9,10,(0 - 10))) + IF(A11,10,(0 -10)))+50,COLORFF00FF;
AAB:= AVX>=90;
BBBB:= AVX>=70 AND AVX<90;
DDB:= AVX>=50 AND AVX<70;
EEB:=AVX<50 AND AVX>=30;
FFB:=AVX<30;
STICKLINE(AAB,C,O,3.4,0),COLOR000088;
STICKLINE(AAB,C,O,3.0,0),COLOR000099 ;
STICKLINE(AAB,C,O,2.4,0),COLOR0000AA;
STICKLINE(AAB,C,O,2.0,0),COLOR0000BB ;
STICKLINE(AAB,C,O,1.2,0),COLOR0000DD;
STICKLINE(AAB,C,O,0.6,0),COLOR0000EE;
STICKLINE(AAB,H,L,0,0),COLOR0000FF;
STICKLINE(BBBB,C,O,3.4,0),COLOR880088;
STICKLINE(BBBB,C,O,3.0,0),COLOR990099;
STICKLINE(BBBB,C,O,2.4,0),COLORAA00AA;
STICKLINE(BBBB,C,O,2.0,0),COLORBB00BB;
STICKLINE(BBBB,C,O,1.2,0),COLORDD00DD;
STICKLINE(BBBB,C,O,0.6,0),COLOREE00EE;
STICKLINE(BBBB,H,L,0,0),COLORFF00FF;
STICKLINE(DDB,C,O,3.4,0),COLOR008888;
STICKLINE(DDB,C,O,3.8,0),COLOR00AA99;
STICKLINE(DDB,C,O,2.2,0),COLOR00BBBB;
STICKLINE(DDB,C,O,1.2,0),COLOR00CCDD;
STICKLINE(DDB,C,O,0.6,0),COLOR00EEEE;
STICKLINE(DDB,H,L,0,0),COLOR00EEFF;
STICKLINE(EEB,C,O,3.4,0),COLORAAAA00;
STICKLINE(EEB,C,O,2.8,0),COLORBBBB00;
STICKLINE(EEB,C,O,2.2,0),COLORCCCC00;
STICKLINE(EEB,C,O,1.2,0),COLORDDDD00;
STICKLINE(EEB,C,O,0.6,0),COLOREEEE00;
STICKLINE(EEB,H,L,0,0),COLORFFFF00;
STICKLINE(FFB,C,O,3.4,0),COLOR882200;
STICKLINE(FFB,C,O,2.8,0),COLOR995500;
STICKLINE(FFB,C,O,2.2,0),COLORAA7700;
STICKLINE(FFB,C,O,1.2,0),COLORDD8800;
STICKLINE(FFB,C,O,0.6,0),COLOREE9900;
STICKLINE(FFB,H,L,0,0),COLORFF9900;
底部:LLV(HIGH,30),COLOR00FFFF,LINETHICK1;
超跌:IF(ISLASTBAR,底部,DRAWNULL),COLORRED,LINETHICK2;
STICKLINE(ISLASTBAR ,超跌,超跌,60,0),LINETHICK2,COLORRED;
TT:=IF(ISLASTBAR,240/FROMOPEN,1);
NN:=120;
HH:=HHV(V*TT,NN);
LL:=LLV(V,NN);
最高:=CONST(HH);
最低:=CONST(LL);
最高2:=CONST(HHV(H,NN));
最低2:=CONST(LLV(L,NN));
PP:=IF((最高2*0.9-(最高2-最低2)*0.5)>CONST(LLV(L,20)),0.9,IF((最高2*0.9-(最高2-最低2)*0.5)>CONST(LLV(L,50)),0.7,0.6)),NODRAW;
RCC1:=最高2*0.9-(最高2-最低2)*PP;
最低3:=MIN(RCC1,最低2);
AAD:=最低3;
DRAWTEXT_FIX(1,0,0.0,0,'★★ 黄色线--底部线★★'),COLORFFFF00;
STICKLINE(AAB,AAD-0.000*AAD,AAD-0.030*AAD,4,0),COLORRED;
STICKLINE(BBBB,AAD-0.000*AAD,AAD-0.030*AAD,4,0),COLORFF00FF;
STICKLINE(DDB,AAD-0.0000*AAD,AAD-0.030*AAD,4,0),COLOR00FFFF;
STICKLINE(EEB,AAD-0.0*AAD,AAD-0.03*AAD,4,0),COLORFFFF00;
STICKLINE(FFB,AAD-0.0*AAD,AAD-0.03*AAD,4,1),COLORFF6600;
DRAWTEXT_FIX(1,0.12,0.90,0,'【谷峰色条】★★ 红色-谷峰线>=90★★粉色--70<=谷峰线<90★★黄色--50<=谷峰线<70★★青色---50>谷峰线>=30 ★★ 蓝色-谷峰线<30★★'),COLOR00FF00;
MA20:MA(CLOSE,20),COLORFFFFFF,LINETHICK3;
IF(MA20>=REF(MA20,1),MA20,DRAWNULL),COLOR0000FF,LINETHICK3;
IF(REF(MA20,1)>MA20,MA20,DRAWNULL),COLOR00FF00,LINETHICK3;
A6:=(MA(CLOSE,5)>MA(CLOSE,10));
A7:=(CLOSE>MA(CLOSE,10));
A8:=(MA(CLOSE,5)>MA(CLOSE,20));
A9:=(CLOSE>MA(CLOSE,20));
A10:=REF(A4,1);
A11:=(A4> A10);
AVX:=(((((IF(A5,10,(0 - 10)) + IF(A6,10,(0 - 10))) + IF(A7,10,(0 -10))) +
IF(A8,10,(0 - 10))) + IF(A9,10,(0 - 10))) + IF(A11,10,(0 -10)))+50,COLORFF00FF;
AAB:= AVX>=90;
BBBB:= AVX>=70 AND AVX<90;
DDB:= AVX>=50 AND AVX<70;
EEB:=AVX<50 AND AVX>=30;
FFB:=AVX<30;
STICKLINE(AAB,C,O,3.4,0),COLOR000088;
STICKLINE(AAB,C,O,3.0,0),COLOR000099 ;
STICKLINE(AAB,C,O,2.4,0),COLOR0000AA;
STICKLINE(AAB,C,O,2.0,0),COLOR0000BB ;
STICKLINE(AAB,C,O,1.2,0),COLOR0000DD;
STICKLINE(AAB,C,O,0.6,0),COLOR0000EE;
STICKLINE(AAB,H,L,0,0),COLOR0000FF;
STICKLINE(BBBB,C,O,3.4,0),COLOR880088;
STICKLINE(BBBB,C,O,3.0,0),COLOR990099;
STICKLINE(BBBB,C,O,2.4,0),COLORAA00AA;
STICKLINE(BBBB,C,O,2.0,0),COLORBB00BB;
STICKLINE(BBBB,C,O,1.2,0),COLORDD00DD;
STICKLINE(BBBB,C,O,0.6,0),COLOREE00EE;
STICKLINE(BBBB,H,L,0,0),COLORFF00FF;
STICKLINE(DDB,C,O,3.4,0),COLOR008888;
STICKLINE(DDB,C,O,3.8,0),COLOR00AA99;
STICKLINE(DDB,C,O,2.2,0),COLOR00BBBB;
STICKLINE(DDB,C,O,1.2,0),COLOR00CCDD;
STICKLINE(DDB,C,O,0.6,0),COLOR00EEEE;
STICKLINE(DDB,H,L,0,0),COLOR00EEFF;
STICKLINE(EEB,C,O,3.4,0),COLORAAAA00;
STICKLINE(EEB,C,O,2.8,0),COLORBBBB00;
STICKLINE(EEB,C,O,2.2,0),COLORCCCC00;
STICKLINE(EEB,C,O,1.2,0),COLORDDDD00;
STICKLINE(EEB,C,O,0.6,0),COLOREEEE00;
STICKLINE(EEB,H,L,0,0),COLORFFFF00;
STICKLINE(FFB,C,O,3.4,0),COLOR882200;
STICKLINE(FFB,C,O,2.8,0),COLOR995500;
STICKLINE(FFB,C,O,2.2,0),COLORAA7700;
STICKLINE(FFB,C,O,1.2,0),COLORDD8800;
STICKLINE(FFB,C,O,0.6,0),COLOREE9900;
STICKLINE(FFB,H,L,0,0),COLORFF9900;
底部:LLV(HIGH,30),COLOR00FFFF,LINETHICK1;
超跌:IF(ISLASTBAR,底部,DRAWNULL),COLORRED,LINETHICK2;
STICKLINE(ISLASTBAR ,超跌,超跌,60,0),LINETHICK2,COLORRED;
TT:=IF(ISLASTBAR,240/FROMOPEN,1);
NN:=120;
HH:=HHV(V*TT,NN);
LL:=LLV(V,NN);
最高:=CONST(HH);
最低:=CONST(LL);
最高2:=CONST(HHV(H,NN));
最低2:=CONST(LLV(L,NN));
PP:=IF((最高2*0.9-(最高2-最低2)*0.5)>CONST(LLV(L,20)),0.9,IF((最高2*0.9-(最高2-最低2)*0.5)>CONST(LLV(L,50)),0.7,0.6)),NODRAW;
RCC1:=最高2*0.9-(最高2-最低2)*PP;
最低3:=MIN(RCC1,最低2);
AAD:=最低3;
DRAWTEXT_FIX(1,0,0.0,0,'★★ 黄色线--底部线★★'),COLORFFFF00;
STICKLINE(AAB,AAD-0.000*AAD,AAD-0.030*AAD,4,0),COLORRED;
STICKLINE(BBBB,AAD-0.000*AAD,AAD-0.030*AAD,4,0),COLORFF00FF;
STICKLINE(DDB,AAD-0.0000*AAD,AAD-0.030*AAD,4,0),COLOR00FFFF;
STICKLINE(EEB,AAD-0.0*AAD,AAD-0.03*AAD,4,0),COLORFFFF00;
STICKLINE(FFB,AAD-0.0*AAD,AAD-0.03*AAD,4,1),COLORFF6600;
DRAWTEXT_FIX(1,0.12,0.90,0,'【谷峰色条】★★ 红色-谷峰线>=90★★粉色--70<=谷峰线<90★★黄色--50<=谷峰线<70★★青色---50>谷峰线>=30 ★★ 蓝色-谷峰线<30★★'),COLOR00FF00;
MA20:MA(CLOSE,20),COLORFFFFFF,LINETHICK3;
IF(MA20>=REF(MA20,1),MA20,DRAWNULL),COLOR0000FF,LINETHICK3;
IF(REF(MA20,1)>MA20,MA20,DRAWNULL),COLOR00FF00,LINETHICK3;
爱生活 爱Delphi
技术人员回复
日期:2018-8-24 21:02
DRAWTEXT_FIX函数无法改写，相关语句已经帮您注释掉了，参考：
A4:=MA(CLOSE,20);
A5:=(CLOSE>MA(CLOSE,5));
A6:=(MA(CLOSE,5)>MA(CLOSE,10));
A7:=(CLOSE>MA(CLOSE,10));
A8:=(MA(CLOSE,5)>MA(CLOSE,20));
A9:=(CLOSE>MA(CLOSE,20));
A10:=REF(A4,1);
A11:=(A4> A10);
AVX:=(((((IF(A5,10,(0 - 10)) + IF(A6,10,(0 - 10))) + IF(A7,10,(0 -10))) +
IF(A8,10,(0 - 10))) + IF(A9,10,(0 - 10))) + IF(A11,10,(0 -10)))+50,COLORFF00FF;
AAB:= AVX>=90;
BBBB:= AVX>=70 AND AVX<90;
DDB:= AVX>=50 AND AVX<70;
EEB:=AVX<50 AND AVX>=30;
FFB:=AVX<30;
STICKLINE1(AAB,C,O,3.4,0),COLOR000088;
STICKLINE1(AAB,C,O,3.0,0),COLOR000099 ;
STICKLINE1(AAB,C,O,2.4,0),COLOR0000AA;
STICKLINE1(AAB,C,O,2.0,0),COLOR0000BB ;
STICKLINE1(AAB,C,O,1.2,0),COLOR0000DD;
STICKLINE1(AAB,C,O,0.6,0),COLOR0000EE;
STICKLINE1(AAB,H,L,0,0),COLOR0000FF;
STICKLINE1(BBBB,C,O,3.4,0),COLOR880088;
STICKLINE1(BBBB,C,O,3.0,0),COLOR990099;
STICKLINE1(BBBB,C,O,2.4,0),COLORAA00AA;
STICKLINE1(BBBB,C,O,2.0,0),COLORBB00BB;
STICKLINE1(BBBB,C,O,1.2,0),COLORDD00DD;
STICKLINE1(BBBB,C,O,0.6,0),COLOREE00EE;
STICKLINE1(BBBB,H,L,0,0),COLORFF00FF;
STICKLINE1(DDB,C,O,3.4,0),COLOR008888;
STICKLINE1(DDB,C,O,3.8,0),COLOR00AA99;
STICKLINE1(DDB,C,O,2.2,0),COLOR00BBBB;
STICKLINE1(DDB,C,O,1.2,0),COLOR00CCDD;
STICKLINE1(DDB,C,O,0.6,0),COLOR00EEEE;
STICKLINE1(DDB,H,L,0,0),COLOR00EEFF;
STICKLINE1(EEB,C,O,3.4,0),COLORAAAA00;
STICKLINE1(EEB,C,O,2.8,0),COLORBBBB00;
STICKLINE1(EEB,C,O,2.2,0),COLORCCCC00;
STICKLINE1(EEB,C,O,1.2,0),COLORDDDD00;
STICKLINE1(EEB,C,O,0.6,0),COLOREEEE00;
STICKLINE1(EEB,H,L,0,0),COLORFFFF00;
STICKLINE1(FFB,C,O,3.4,0),COLOR882200;
STICKLINE1(FFB,C,O,2.8,0),COLOR995500;
STICKLINE1(FFB,C,O,2.2,0),COLORAA7700;
STICKLINE1(FFB,C,O,1.2,0),COLORDD8800;
STICKLINE1(FFB,C,O,0.6,0),COLOREE9900;
STICKLINE1(FFB,H,L,0,0),COLORFF9900;
底部:LLV(HIGH,30),COLOR00FFFF,LINETHICK1;
超跌:IF(ISLASTBAR,底部,NULL),COLORRED,LINETHICK2;
STICKLINE1(ISLASTBAR ,超跌,超跌,60,0),LINETHICK2,COLORRED;
FROMOPEN:=IF(HOUR<12,60*(HOUR-9)-30+MINUTE,120+60*(HOUR-13)+MINUTE);
TT:=IF(ISLASTBAR,240/FROMOPEN,1);
NN:=120;
HH:=HHV(V*TT,NN);
LL:=LLV(V,NN);
最高:=REFX1(HH,9999);
最低:=REFX1(LL,9999);
最高2:=REFX1(HHV(H,NN),9999);
最低2:=REFX1(LLV(L,NN),9999);
PP:=IF((最高2*0.9-(最高2-最低2)*0.5)>REFX1(LLV(L,20),9999),0.9,IF((最高2*0.9-(最高2-最低2)*0.5)>REFX1(LLV(L,50),9999),0.7,0.6)),NODRAW;
RCC1:=最高2*0.9-(最高2-最低2)*PP;
最低3:=MIN(RCC1,最低2);
AAD:=最低3;
//DRAWTEXT_FIX(1,0,0.0,0,'★★ 黄色线--底部线★★'),COLORFFFF00;
STICKLINE1(AAB,AAD-0.000*AAD,AAD-0.030*AAD,4,0),COLORRED;
STICKLINE1(BBBB,AAD-0.000*AAD,AAD-0.030*AAD,4,0),COLORFF00FF;
STICKLINE1(DDB,AAD-0.0000*AAD,AAD-0.030*AAD,4,0),COLOR00FFFF;
STICKLINE1(EEB,AAD-0.0*AAD,AAD-0.03*AAD,4,0),COLORFFFF00;
STICKLINE1(FFB,AAD-0.0*AAD,AAD-0.03*AAD,4,1),COLORFF6600;
//DRAWTEXT_FIX(1,0.12,0.90,0,'【谷峰色条】★★ 红色-谷峰线>=90★★粉色--70<=谷峰线<90★★黄色--50<=谷峰线<70★★青色---50>谷峰线>=30 ★★ 蓝色-谷峰线<30★★'),COLOR00FF00;
MA20:MA(CLOSE,20),COLORFFFFFF,LINETHICK3;
IF(MA20>=REF(MA20,1),MA20,NULL),COLOR0000FF,LINETHICK3;
投资者咨询：老师请帮忙修改 (文华财经WH6赢顺V6.7)
来源:文华财经 日期:2018-8-24 20:54
老手 再帮忙修改一下这个 谢谢
顶部:STICKLINE(C,75,75,0.5,0.5),COLOR3C3CFF;
底部:STICKLINE(C,25,25,0.5,0.5),COLORCYAN;
均价:=(HIGH+LOW+CLOSE)/3;
VAR1:=LLV(LOW,12);
VAR2:=HHV(HIGH,5);
快线:=EMA((均价-VAR1)/(VAR2-VAR1)*100,4);
慢线:=EMA(0.667*REF(快线,1)+0.333*快线,2);
转点:=IF(快线>慢线,1,0);
大盘均价:=(INDEXH+INDEXL+INDEXC)/3;
{股旁网-股票公式网站 www.GupaNg.com}
N:=28;
个股LC:=REF(均价,1);
个股牛熊:SMA(MAX(均价-个股LC,0),N,1)/SMA(ABS(均价-个股LC),N,1)*100,COLORWHITE;
DRAWBAND(个股牛熊,RGB(155,50,50),50,RGB(0,100,50));
LC:=REF(大盘均价,1);
大盘牛熊:SMA(MAX(大盘均价-LC,0),N,1)/SMA(ABS(大盘均价-LC),N,1)*100,COLORYELLOW;
长线转强:IF(个股牛熊>50,个股牛熊,DRAWNULL),COLORRED;
长线转弱:IF(个股牛熊<50,个股牛熊,DRAWNULL),COLORGREEN;
STICKLINE(转点=1,50,50,2,0),COLORYELLOW;
STICKLINE(转点=0,50,50,2,0),COLORCYAN;
底部:STICKLINE(C,25,25,0.5,0.5),COLORCYAN;
均价:=(HIGH+LOW+CLOSE)/3;
VAR1:=LLV(LOW,12);
VAR2:=HHV(HIGH,5);
快线:=EMA((均价-VAR1)/(VAR2-VAR1)*100,4);
慢线:=EMA(0.667*REF(快线,1)+0.333*快线,2);
转点:=IF(快线>慢线,1,0);
大盘均价:=(INDEXH+INDEXL+INDEXC)/3;
{股旁网-股票公式网站 www.GupaNg.com}
N:=28;
个股LC:=REF(均价,1);
个股牛熊:SMA(MAX(均价-个股LC,0),N,1)/SMA(ABS(均价-个股LC),N,1)*100,COLORWHITE;
DRAWBAND(个股牛熊,RGB(155,50,50),50,RGB(0,100,50));
LC:=REF(大盘均价,1);
大盘牛熊:SMA(MAX(大盘均价-LC,0),N,1)/SMA(ABS(大盘均价-LC),N,1)*100,COLORYELLOW;
长线转强:IF(个股牛熊>50,个股牛熊,DRAWNULL),COLORRED;
长线转弱:IF(个股牛熊<50,个股牛熊,DRAWNULL),COLORGREEN;
STICKLINE(转点=1,50,50,2,0),COLORYELLOW;
STICKLINE(转点=0,50,50,2,0),COLORCYAN;
技术人员回复
日期:2018-8-24 22:20
参考：
//顶部:
STICKLINE1(C,75,75,0.5,0.5),COLOR3C3CFF;
//底部:
STICKLINE1(C,25,25,0.5,0.5),COLORCYAN;
均价:=(HIGH+LOW+CLOSE)/3;
VAR1:=LLV(LOW,12);
VAR2:=HHV(HIGH,5);
快线:=EMA((均价-VAR1)/(VAR2-VAR1)*100,4);
慢线:=EMA(0.667*REF(快线,1)+0.333*快线,2);
转点:=IF(快线>慢线,1,0);
INDEXL:="999001$L";
INDEXC:="999001$C";
INDEXH:="999001$H";
大盘均价:=(INDEXH+INDEXL+INDEXC)/3;
{股旁网-股票公式网站 WWW.GUPANG.COM}
N:=28;
个股LC:=REF(均价,1);
个股牛熊:SMA(MAX(均价-个股LC,0),N,1)/SMA(ABS(均价-个股LC),N,1)*100,COLORWHITE;
FILLRGN(个股牛熊>50,个股牛熊,50,RGB(155,50,50));
FILLRGN(个股牛熊<50,个股牛熊,50,RGB(0,100,50));
LC:=REF(大盘均价,1);
大盘牛熊:SMA(MAX(大盘均价-LC,0),N,1)/SMA(ABS(大盘均价-LC),N,1)*100,COLORYELLOW;
长线转强:IF(个股牛熊>50,个股牛熊,NULL),COLORRED;
长线转弱:IF(个股牛熊<50,个股牛熊,NULL),COLORGREEN;
STICKLINE1(转点=1,50,50,2,0),COLORYELLOW;
技术人员回复
日期:2018-8-24 22:24
为方便论坛管理，新的问题请重新发帖提问，感谢您的配合
INDEXH:="999300$H";
INDEXL:="999300$L";
INDEXC:="999300$C";
//顶部:
STICKLINE1(C,75,75,0.5,0.5),COLOR3C3CFF;
//底部:
STICKLINE1(C,25,25,0.5,0.5),COLORCYAN;
均价:=(HIGH+LOW+CLOSE)/3;
VAR1:=LLV(LOW,12);
VAR2:=HHV(HIGH,5);
快线:=EMA((均价-VAR1)/(VAR2-VAR1)*100,4);
慢线:=EMA(0.667*REF(快线,1)+0.333*快线,2);
转点:=IF(快线>慢线,1,0);
大盘均价:=(INDEXH+INDEXL+INDEXC)/3;
//{股旁网-股票公式网站 WWW.GUPANG.COM}
N:=28;
个股LC:=REF(均价,1);
个股牛熊:SMA(MAX(均价-个股LC,0),N,1)/SMA(ABS(均价-个股LC),N,1)*100,COLORWHITE;
//DRAWBAND(个股牛熊,RGB(155,50,50),50,RGB(0,100,50));
FILLRGN(个股牛熊>50,个股牛熊,50,RGB(155,50,50));
FILLRGN(个股牛熊<50,个股牛熊,50,RGB(0,100,50));
LC:=REF(大盘均价,1);
大盘牛熊:SMA(MAX(大盘均价-LC,0),N,1)/SMA(ABS(大盘均价-LC),N,1)*100,COLORYELLOW;
长线转强:IF(个股牛熊>50,个股牛熊,NULL),COLORRED;
长线转弱:IF(个股牛熊<50,个股牛熊,NULL),COLORGREEN;
STICKLINE1(转点=1,50,50,2,0),COLORYELLOW;
STICKLINE1(转点=0,50,50,2,0),COLORCYAN;
