压力支撑线--精品公式 飞狐支撑指标 源码

指标公式详细说明

压力支撑线.alg

此指标结合了几位指标高手的理论和创意而写，在此先感谢这些高手们。指标主要根据kdj的金死叉假设为压力支撑平台，应朋友们的请求特发此指标，希望大家喜欢！！
＝＝＝＝＝＝＝＝
{压力支撑线}
drawgbk(c=c,colorrgb(130,130,130),colorrgb(30,30,30),1);

var1:=(sma(high,21,2) * 1.05);
stickline((open >= close),close,open,9,0),colorff5b00;
stickline((open >= close),close,open,8,0),colorff6c00;
stickline((open >= close),close,open,7,0),colorff7b00;
stickline((open >= close),close,open,6,0),colorff9c00;
stickline((open >= close),close,open,5,0),colorffbe00;
stickline((open >= close),close,open,3.5,0),colorffcc00;
stickline((open >= close),close,open,1.5,0),colorffff00;
stickline((close >= open),close,open,9,0),color070084;
stickline((close >= open),close,open,8,0),color0000a3;
stickline((close >= open),close,open,7,0),color0000b7;
stickline((close >= open),close,open,6,0),color0000cd;
stickline((close >= open),close,open,5,0),color0000e9;
stickline((close >= open),close,open,3,0),color0754e9;
stickline((close >= open),close,open,1.5,0),color076ef3;
stickline((close >= open),close,open,1,0),color077bf3;
stickline((close > open),open,low,1,0),color0726ca;
stickline((close > open),close,high,1,0),color0726ca;
stickline((open > close),close,low,1,0),colorde9100;
stickline((open > close),open,high,1,0),colorde9100;
stickline(((((close / open) > 1.04) and (close < var1)) and ((close - ref(close,1)) > 0)),close,open,9,0),color0090ff;
stickline(((((close / open) > 1.04) and (close < var1)) and ((close - ref(close,1)) > 0)),close,open,8,0),color009fff;
stickline(((((close / open) > 1.04) and (close < var1)) and ((close - ref(close,1)) > 0)),close,open,4,0),color00b5ff;
stickline(((((close / open) > 1.04) and (close < var1)) and ((close - ref(close,1)) > 0)),close,open,2,0),color00e4ff;
stickline(((((close / open) > 1.04) and (close < var1)) and ((close - ref(close,1)) > 0)),open,low,0.7,0),color00ffff;
stickline(((((close / open) > 1.04) and (close < var1)) and ((close - ref(close,1)) > 0)),close,high,0.7,0),color00ffff;
stickline(((((close < ref(close,1)) and (close < ref(close,1))) and (high > var1)) and (close < var1)),open,low,0.7,0),colorff76ff;
stickline(((((close < ref(close,1)) and (close < ref(close,1))) and (high > var1)) and (close < var1)),close,high,0.7,0),colorff76ff;
stickline(((((close < ref(close,1)) and (close < ref(close,1))) and (high > var1)) and (close < var1)),close,open,9,0),colorff00ff;
stickline(((((close < ref(close,1)) and (close < ref(close,1))) and (high > var1)) and (close < var1)),close,open,6,0),colorff62ff;
stickline(((((close < ref(close,1)) and (close < ref(close,1))) and (high > var1)) and (close < var1)),close,open,4,0),colorff76ff;
stickline(((((close < ref(close,1)) and (close < ref(close,1))) and (high > var1)) and (close < var1)),close,open,2,0),colorffa8ff;
/////////
ac:=close;
转强:=wma(high,5);
转弱:=wma(low,5);
bara:=close*0;
for i=13+1 to datacount do begin
if ac[i]>转强[i-1] then
bara[i]:=1;else
if ac[i]<转弱[i-1] then
bara[i]:=-1;else
bara[i]:=bara[i-1];
end;
转折线:if(bara=-1,ma(high,5),ma(low,5)),linethick1,colorffffff;
////////////
rsv21:=(close-llv(low,21))/(hhv(high,21)-llv(low,21))*100;
k21:=sma(rsv21,5,1),colormagenta,linethick2;
d21:=sma(k21,5,1),colorgreen,linethick2;
j21:=3*k21-2*d21,coloryellow,linethick2;
m5:=ma(c,5);
m10:=ma(c,10);
zxx1:=cross(k21,d21);
zxx2:=cross(d21,k21);
zxx3:=cross(j21,10);
zxx4:=cross(80,j21);
stickline(zxx4,hhv(h,5),hhv(h,5),150,1);
stickline(zxx3,llv(l,5),llv(l,5),150,1);
stickline(zxx2,hhv(h,5),hhv(h,5),100,1),linedot;
stickline(zxx1,llv(l,5),llv(l,5),100,1),linedot;
drawicon(zxx1,l*0.98,10),align;
drawicon(zxx2,h*1.005,11),align;
drawicon(zxx3,l*0.98,4),align;
drawicon(zxx4,h*1.005,5),align;
//////////
{加仓提示}
varzc3:=if((close>ref(close,1)),88,0);
varzc4:=if(((close)/(ref(close,1))>1.10) and ((high)/(close)<1.01) and (varzc3>0),91,0);
drawtext((varzc4>90),(low)*(0.94999998),'★加仓'),color00ffff;
varqs2:=ema(ema(l,8),6)*0.799;
土:=varqs2,color0080ff;
{下轨道最低价买股指标；很简单的！l<ema(ema(l,8),6)*0.799;准确度99%！}
drawsl(l<ema(ema(l,8),6)*0.799,l,0,2,2),{color80ff00}colorwhite;
//////////
bbbb:=ma(low,5)*(1-5/100);
振幅均价:=(hhv(bbbb,5)+llv(bbbb,5))/2,colorwhite,linedot;
均线选股:=cross(振幅均价,c) and 振幅均价>ref(振幅均价,1),linethick0;
drawtext(cross(振幅均价,l) and 振幅均价>ref(振幅均价,1),l*0.998,'▲\n回\n马\n枪'),colorred,align;
xxs:=ma(low,5)*(1-5/100),linedot;
xxs1:=ma(high,5)*(1+5/100),linedot;
均线:=c,linethick2,colorgreen;
aaaa:=close/ref(close,3)<=0.85 and cross(c,xxs) and c>ref(c,1),linethick0 ;
drawtext(aaaa,l*0.995,'▲\n下\n影\n买'),colorred,align;
bbaa:=cross(xxs1,c),linethick0;
drawtext(cross(xxs1,c),h*1.03,'▼\n开盘逃'),colorwhite,align;
dddd:=cross(c,xxs1),linethick0;
drawtext(dddd,h*1.02,'▼\n明日走'),coloryellow,align;
eeee:=close/ref(close,2)<=0.9 and cross(c,xxs);
drawtext(eeee,l*0.995,'▲\n抢\n反\n弹'),colorred,align;
ffff:=ref(c,1)/ref(c,2)<=0.93 and between(c/ref(c,1),1.03,0.97) and close/ref(close,8)<=0.8 and between(ref(c,2)/ref(c,3),1.04,0.96) and between(ref(c,3)/ref(c,4),1.04,0.96),linethick0,coloryellow;
drawtext(ffff,l*0.995,'▲\n明\n日\n板'),colorred,align;
var1r:=llv(low,2)=llv(low,16) and close>=open*1.04;
var2r:=close>(ref(high,1)+ref(low,1))/2;
var3r:=var1r and var2r;
drawtext(var3r,low,'▲\n低入 '),colorffff,align;
drawtext(cross((ref(high,1)+ref(low,1))/2,ma(close,20)+2*std(close,20)),high*1.02,'▼\n卖出'),colorwhite,align;
///////
a101:=ma(c,10)-ma(c,20),colorred,linethick2;
b101:=a101>ref(a101,1) and ref(a101,1)<ref(a101,2);
bl101:= barslast(b101);
m101:=ma(c,10);
d101:= ref(m101,bl101)/hhv(ma(c,10),20+bl101)<0.8;
e101:= a101>ref(a101,1) and barslast(b101)>2 and barslast(b101)<12;
f101:= e101 and d101 and cross(c,ma(c,10));
drawtext(f101,l*0.995,'★\n均\n线\n走\n平'),coloryellow,align;

/////////
{预测明日}
c1:=ref(close,1);
c2:=hhv(c1,2);
c3:=llv(c1,1);
et:=hhv(c1,2);
et1:=ref(et,1);
xb:=llv(c1,1);
xb1:=ref(xb,1);
m:=barslast(((close < xb) and (c1 >= xb1)));
c1:=ref(close,1);
c2:=hhv(c1,2);
c3:=llv(c1,1);
et:=hhv(c1,2);
et1:=ref(et,1);
xb:=llv(c1,1);
xb1:=ref(xb,1);
m:=barslast(((close < xb) and (c1 >= xb1)));
m11:=ref(m,1);
nn9:=barslast(((close > et) and (c1 <= et1)));
nn1:=ref(nn9,1);
m21:=(barslast((((m - nn9) > 0) and (m11 <= nn1))) + 1);
nn2:=(barslast((((nn9 - m) > 0) and (nn1 <= m11))) + 1);
et2:=hhv(et,m21);
xb2:=llv(xb,nn2);
aab:=if((((m - nn9) > 0) and (m11 <= nn1)),1,if((((nn9 - m) > 0) and (nn1 <= m11)),0,2));
h1:=if(((m - nn9) > 0),close,et2);
h2:=if((aab = 1),close,c2);
h3:=if(((m - nn9) < 0),close,xb2);
h4:=if((aab = 1),close,xb2);
h5:=if((((m - nn9) > 0) or (aab = 1)),close,h3);
h6:=ref(h5,1);
h7:=ref(h5,2);
h8:=(h5 > h6);
h9:=(((h4 = ref(h4,1)) and (ref(h4,1) < ref(h4,2))) and (h5 > ref(h5,2)));
h10:=(((h2 = ref(h2,1)) and (h4 = ref(h4,1))) and (h5 = ref(h5,2)));
w:=((h8 or h9) or h10);
t9:=((h5 < h6) and (h5 < ref(h5,2)));
t10:=((h4 = ref(h4,1)) and (h5 < ref(h5,2)));
t11:=((h3 > ref(h3,1)) and (h5 < ref(h5,1)));
t12:=((h5 = ref(h5,1)) and (h3 = h4));
t13:=((h2 = ref(h2,1)) and (h2 = h5));
tw:=((((t9 or t10) or t11) or t12) or t13);
pk:=((amount * (((open + close) + high) + low)) / 4);
pk1:=if((vol > 0),(pk / amount),((((open + close) + high) + low) / 4));
bbp:=(((close - llv(low,9)) / (hhv(high,9) - llv(low,9))) * 100);
stickline((islastbar and w),(h5 * 1.025),(h5 * 0.99),0.5,0),shift1,colorff;
stickline((islastbar and w),(h5 * 1.02),h5,8,0),shift1,color102088;
stickline((islastbar and w),(h5 * 1.02),h5,7,0),shift1,color102099;
stickline((islastbar and w),(h5 * 1.02),h5,6,0),shift1,color1020aa;
stickline((islastbar and w),(h5 * 1.02),h5,5,0),shift1,color1020bb;
stickline((islastbar and w),(h5 * 1.02),h5,4,0),shift1,color1020cc;
stickline((islastbar and w),(h5 * 1.02),h5,3,0),shift1,color1020dd;
stickline((islastbar and w),(h5 * 1.02),h5,2,0),shift1,color1020ee;
stickline((islastbar and w),(h5 * 1.02),h5,1,0),shift1,color1020ff;
stickline((islastbar and tw),((h5 + h4) / 1.96),((h5 + h3) / 2.05),0.5,0),shift1,colorff8800;
stickline((islastbar and tw),((h5 + h4) / 1.99),((h5 + h3) / 2.03),8,0),shift1,colorff7700;
stickline((islastbar and tw),((h5 + h4) / 1.99),((h5 + h3) / 2.03),7,0),shift1,colorff8800;
stickline((islastbar and tw),((h5 + h4) / 1.99),((h5 + h3) / 2.03),6,0),shift1,colorff9900;
stickline((islastbar and tw),((h5 + h4) / 1.99),((h5 + h3) / 2.03),5,0),shift1,colorffaa00;
stickline((islastbar and tw),((h5 + h4) / 1.99),((h5 + h3) / 2.03),4,0),shift1,colorffbb00;
stickline((islastbar and tw),((h5 + h4) / 1.99),((h5 + h3) / 2.03),3,0),shift1,colorffcc00;
stickline((islastbar and tw),((h5 + h4) / 1.99),((h5 + h3) / 2.03),2,0),shift1,colorffdd00;
stickline((islastbar and tw),((h5 + h4) / 1.99),((h5 + h3) / 2.03),1,0),shift1,colorffee00;
drawtext((islastbar and (bbp >= 96.5)),(h5 * 1.022),' 明见\n 短高\n 龙头\n 除外'),shift1,colorffff;
drawtext((islastbar and (bbp < 1)),((h5 + h4) / 1.96),' 明见\n 短低\n 跌停\n 除外'),shift1,colorff00ff;
drawtext(((islastbar and w) and (bbp < 96.5)),(h5 * 1.022),' 明日\n 看涨'),shift1,colormagenta;
drawtext(((islastbar and tw) and (bbp > 1)),((h5 + h4) / 2),' 明日\n 看跌'),shift1,colorgreen;
////////////
drawtextex(1,0,10,5,'■所属板块：'+blkname),color00ff00;
drawtextex(1,0,10,20,'╬'+stklabel+'【 '+stkname+' 】'),linethick1,colorfffffc;
rh:=h-l;
r:=dynainfo(14)*100;
drawtextex(1,0,10,45,'日高低差:'+numtostr(rh,2)+'元'),colorwhite;
金叉:=barslast(filter(cross("kd.k","kd.d") and "kd.d"<30,13));
主力吸筹区:=if(金叉>0 and 金叉<61,金叉,0);
drawtextex(1,0,10,60,'主力建仓天数：'+numtostr(主力吸筹区,0)+'天'),colorfffffc,linethick1;

ma30:=ema(close,30);
ma60:=ema(close,60);
ma125:=ema(close,125);
ma250:=ema(close,250);
a1:=ma30[sysparam(1)];
ra1:=ma30[sysparam(1)-1];
jt1:=if(a1>ra1,'↑','↓');
drawtextex(1,0,10,110,'ma30: '+numtostr(ma30[sysparam(1)],2)+jt1),colorwhite;
a2:=ma60[sysparam(1)];
ra2:=ma60[sysparam(1)-1];
jt2:=if(a2>ra2,'↑','↓');
drawtextex(1,0,10,130,'ma60: '+numtostr(ma60[sysparam(1)],2)+jt2),colorwhite;
a3:=ma125[sysparam(1)];
ra3:=ma125[sysparam(1)-1];
jt3:=if(a3>ra3,'↑','↓');
drawtextex(1,0,10,150,'ma125:'+numtostr(ma125[sysparam(1)],2)+jt3),colorwhite;
a4:=ma250[sysparam(1)];
ra4:=ma250[sysparam(1)-1];
jt4:=if(a4>ra4,'↑','↓');
drawtextex(1,0,10,170,'ma250:'+numtostr(ma250[sysparam(1)],2)+jt4),colorwhite;

{换手100%}
svol:=intpart(sum(v,0)/capital);
tj0:=svol>ref(svol,1) or barssince(close)=0;
s1:=barslast(tj0)+1,precision,colorwhite;//时间1
tj2:=s1<ref(s1,1);//取点
s2:=if(tj2,ref(s1,1)+1,s1),precision,colormagenta;//时间2
s3:=sum(tj2,0),colormagenta;
阶段总额（万元）:=sum(amount/10000,s2)*100,precision,linethick,color008bfa;//换手100%成交额
阶段总量（手）:=sum(v,s2)*100,precision,linethick,colorcyan;//换手100%成交量
阶段成本（元）:=(阶段总额（万元）/(阶段总量（手）/100)),linethick,precision2,colorred;
drawtextex(1,0,10,75,'阶段平均成本:'+numtostr(阶段成本（元）[sysparam(1)],2)+'(元)'),align4,colorcyan;
aa3:=sumbars(vol,capital);
换手成本:=if(capital>0,sum(amount,aa3)/sum(vol,aa3)/100,ema(close,120));{100%换手平均成本线};
drawtextex(1,0,10,90,'换手成本:'+numtostr(换手成本,2)),coloryellow;

bb:=barpos=sysparam(1);
variable:wday[7]='星期六';
wday[1]:='星期日';
wday[2]:='星期一';
wday[3]:='星期二';
wday[4]:='星期三';
wday[5]:='星期四';
wday[6]:='星期五';
fy:=year;
fm:=month;
fd:=day;
wd:=weekday;
pd:=sysparam(1);
drawtextex(c,1,0,840,'■今日： '+numtostr(fy[pd],0)+'年'+numtostr(fm[pd],0)+'月'+numtostr(fd[pd],0)+'日 '+wday[wd[pd]+1]),coloryellow;

yyzq:=(sysparam(3)-sysparam(2))/1.8;
picl:=refx(llv(sysparam(5),yyzq),yyzq);
当天换手率:=((vol / capital) * 100);
b:=datacount-barpos+1;
wb:=barslast(sysparam(1)=barpos)+1;
换手率1:=sum(当天换手率,wb);
累计换手:=refx(换手率1,wb[datacount]-1);
drawtext(sysparam(1)=barpos,picl,numtostr(b[sysparam(1)],0)+'天'+'换手: '+numtostr(累计换手[sysparam(1)],2)+'% '),align2,coloryellow;
vertline(sysparam(1)=barpos),linedot,colorgreen;
vertline(sysparam(3)=barpos and b),linedot,colorred;

sj:=datacount-sysparam(1);
涨跌:=(dynainfo(7)-c)/c*100,coloryellow,linethick0;
{drawnumber(barpos+4=sysparam(1),l,sj,0),align5,colorwhite;//交易日}
drawtextex(1,0,10,250,'距今涨跌:'+numtostr(涨跌[sysparam(1)],2)+'%'),align4,colorred;



hh:=sysparam(4);ll:=sysparam(5);
x:=ll-(hh-ll+mindiff)/5;
y:=hhv(vol,sysparam(3)-sysparam(2)+1);
yvb:=y[sysparam(3)]/(ll-x+mindiff);
z:=vol/yvb+x;
stickline(close>ref(close,1),x,z,9,0) ,coloraa;
stickline(close>ref(close,1),x,z,8,0) ,color11bb;
stickline(close>ref(close,1),x,z,7,0) ,color22cc;
stickline(close>ref(close,1),x,z,6,0) ,color33dd;
stickline(close>ref(close,1),x,z,5,0) ,color44ee;
stickline(close>ref(close,1),x,z,4,0) ,color55ff;
stickline(close>ref(close,1),x,z,2.2,0) ,color66ff;
stickline(close>ref(close,1),x,z,1.5,0) ,color77ff;
stickline(close<=ref(close,1),x,z,9,0),coloraa00;
stickline(close<=ref(close,1),x,z,8,0),colorbb11;
stickline(close<=ref(close,1),x,z,7,0),colorcc22;
stickline(close<=ref(close,1),x,z,6,0),colordd33;
stickline(close<=ref(close,1),x,z,5,0),coloree44;
stickline(close<=ref(close,1),x,z,4,0),colorff55;
stickline(close<=ref(close,1),x,z,2.5,0),colorff66;
stickline(close<=ref(close,1),x,z,1.5,0),colorff77;

指标公式下载地址

上一指标公式：私募机构量异动公式 飞狐私募机构指标 源码

下一指标公式：十九波段低点公式 飞狐低点指标 源码

相关飞狐公式推荐

指标公式下载注意

☉ 好公式网发布的指标公式主要用于软件技术面分析，仅供参考，勿用于实际操作，据此操作风险自负！

☉ 解压密码：www.goodgongshi.com 就是好公式网域名，希望大家看清楚，切勿输错。

☉ tnc和tni格式指标公式，仅可以用通达信软件引入使用，例如可以用通达信软件引入使用指标公式；

☉ tne格式指标公式，仅可以用通达信软件公式编辑器5.0版导入，高版本兼容低版本；

☉ fnc格式指标公式，可以用大智慧软件新一代高速行情分析系统股票软件使用，少部分可以用分析家软件引入使用；

☉ alg格式指标公式，仅仅可以用飞狐交易师软件引入使用；exp格式指标公式，仅可以用大智慧经典版软件引入使用；

☉ hxf格式指标公式，仅可以用同花顺软件引入使用。

☉ 如果您发现下载软件链接错误，请联系管理员报告错误。

☉ 好公式网欢迎各位网友帮忙宣传转发本站网址，有您的支持，我们会做得更好！

☉ 本文压力支撑线--精品公式 飞狐支撑指标 源码仅供学习研究。