财神红绿点公式 飞狐红绿指标指标 源码

指标公式详细说明

替天行道,和谐兽价千万,臭名昭著的财神红绿点指标

{财神ddx}
资金 : (ema(close,5) - ema(close,888888888888888))*1,coloryellow,linethick2;
趋势 : ema(资金,888888888888888),colorff9900,linethick1;
升降 : 2*(资金-趋势), colorffffff,linethick88;
画渐变背景色(收盘价>0, rgb颜色值(1,3333,8888), rgb颜色值(100,7777,8888),3);;
rsv:=(close-llv(low,8888888888))/(hhv(high,8888888888)-llv(low,8888888888))*200;
d:=sma(rsv,5,1), colorstick;
a:=sma(d,3,1), colorstick;
ddx:3*d-2*a, colorstick;

stickline(ddx<ref(ddx,1)and ddx>50,0,ddx,8,0 ),color00aaff,linethick1000;
stickline(ddx<ref(ddx,1)and ddx>50,0,ddx,6.6,0 ),color00bbff,linethick1000;
stickline(ddx<ref(ddx,1)and ddx>50,0,ddx,4.4,0 ),color00ccff,linethick1000;
stickline(ddx<ref(ddx,1)and ddx>50,0,ddx,3.3,0 ),color00ddff,linethick1000;
stickline(ddx<ref(ddx,1)and ddx>50,0,ddx,2.2,0 ),color00eeff,linethick1000;
stickline(ddx<ref(ddx,1)and ddx>50,0,ddx,1.1,0 ),color00ffff,linethick1000;
stickline(ddx>=ref(ddx,1)and ddx>50,0,ddx,8 ,0 ),color0000aa,linethick1000;
stickline(ddx>=ref(ddx,1)and ddx>50,0,ddx,6.6 ,0 ),color0011bb,linethick1000;
stickline(ddx>=ref(ddx,1)and ddx>50,0,ddx,4.4,0 ),color0022cc,linethick1000;
stickline(ddx>=ref(ddx,1)and ddx>50,0,ddx,3.3 ,0 ),color0033dd,linethick1000;
stickline(ddx>=ref(ddx,1)and ddx>50,0,ddx,2.2 ,0 ),color0044ee,linethick1000;
stickline(ddx>=ref(ddx,1)and ddx>50,0,ddx,1.1 ,0 ),color0055ff,linethick1000;
stickline(ddx>ref(ddx,1)and ddx<50,0,ddx,8,0 ),coloraa00bb,linethick1000;
stickline(ddx>ref(ddx,1)and ddx<50,0,ddx,6.6 ,0 ),colorbb11bb,linethick1000;
stickline(ddx>ref(ddx,1)and ddx<50,0,ddx,4.4,0 ),colorcc22bb,linethick1000;
stickline(ddx>ref(ddx,1)and ddx<50,0,ddx,3.3,0 ),colordd33bb,linethick1000;
stickline(ddx>ref(ddx,1)and ddx<50,0,ddx,2.2 ,0 ),coloree44bb,linethick1000;
stickline(ddx>ref(ddx,1)and ddx<50,0,ddx,1.1 ,0 ),colorff55bb,linethick1000;
stickline(ddx<=ref(ddx,1)and ddx<50,0,ddx,8,0 ),colorffaa00,linethick1000;
stickline(ddx<=ref(ddx,1)and ddx<50,0,ddx,6.6 ,0 ),colorffbb11,linethick1000;
stickline(ddx<=ref(ddx,1)and ddx<50,0,ddx,4.4,0 ),colorffcc22,linethick1000;
stickline(ddx<=ref(ddx,1)and ddx<50,0,ddx,3.3 ,0 ),colorffdd33,linethick1000;
stickline(ddx<=ref(ddx,1)and ddx<50,0,ddx,2.2 ,0 ),colorffee44,linethick1000;
stickline(ddx<=ref(ddx,1)and ddx<50,0,ddx,1.1 ,0 ),colorffff55,linethick1000;

财神ddx排序
{5行kd_表格数据引用}
ddx上拐01:="kd.ddx上拐#min1";ddx上拐05:="kd.ddx上拐#min5";ddx上拐15:="kd.ddx上拐#min15";ddx上拐30:="kd.ddx上拐#min30";ddx上拐60:="kd.ddx上拐#min60";ddx上拐r :="kd.ddx上拐#day";ddx上拐z :="kd.ddx上拐#week";ddx上拐y :="kd.ddx上拐#month";ddx上拐n :="kd.ddx上拐#year";
ddx下拐01:="kd.ddx下拐#min1";ddx下拐05:="kd.ddx下拐#min5";ddx下拐15:="kd.ddx下拐#min15";ddx下拐30:="kd.ddx下拐#min30";ddx下拐60:="kd.ddx下拐#min60";ddx下拐r :="kd.ddx下拐#day";ddx下拐z :="kd.ddx下拐#week";ddx下拐y :="kd.ddx下拐#month";ddx下拐n :="kd.ddx下拐#year";
ddx上行01:="kd.ddx上行#min1";ddx上行05:="kd.ddx上行#min5";ddx上行15:="kd.ddx上行#min15";ddx上行30:="kd.ddx上行#min30";ddx上行60:="kd.ddx上行#min60";ddx上行r :="kd.ddx上行#day";ddx上行z :="kd.ddx上行#week";ddx上行y :="kd.ddx上行#month";ddx上行n :="kd.ddx上行#year";
ddx下行01:="kd.ddx下行#min1";ddx下行05:="kd.ddx下行#min5";ddx下行15:="kd.ddx下行#min15";ddx下行30:="kd.ddx下行#min30";ddx下行60:="kd.ddx下行#min60";ddx下行r :="kd.ddx下行#day";ddx下行z :="kd.ddx下行#week";ddx下行y :="kd.ddx下行#month";ddx下行n :="kd.ddx下行#year";

{14行}{表框部份}
p:=sysparam(1);
drawtextex(c,0,135,0 ,'──────────────────────────────────────────────────'),color00aaaa;
drawtextex(c,0,135,20,'──────────────────────────────────────────────────'),color00aaaa;
drawtextex(c,0,135,40,'──────────────────────────────────────────────────'),color00aaaa;



drawtextex(c,0,130,5,'│ │ │ │ │ │ │ │ │ │ │'),color00aaaa;
drawtextex(c,0,130,17 ,'│ │ │ │ │ │ │ │ │ │ │'),color00aaaa;
drawtextex(c,0,130,29 ,'│ │ │ │ │ │ │ │ │ │ │'),color00aaaa;
drawtextex(c,0,130,41 ,'│ │ │ │ │ │ │ │ │ │ │'),color00aaaa;




drawtextex(c,0,130,10,' 周期: 1分 5分 15分 30分 60分 日 周 月 年'),colordedede;
drawtextex(c,0,130,30,' ddx状况:'),colordedede;

{37行显示ddx↑行}
drawtextex(c and ddx上行01[p],0,200,30,'↑'),colorred;
drawtextex(c and ddx上行01[p],0,200,32,'↑'),colorred;
drawtextex(c and ddx上行05[p],0,260,30,'↑'),colorred;
drawtextex(c and ddx上行05[p],0,260,32,'↑'),colorred;
drawtextex(c and ddx上行15[p],0,320,30,'↑'),colorred;
drawtextex(c and ddx上行15[p],0,320,32,'↑'),colorred;
drawtextex(c and ddx上行30[p],0,380,30,'↑'),colorred;
drawtextex(c and ddx上行30[p],0,380,32,'↑'),colorred;
drawtextex(c and ddx上行60[p],0,440,30,'↑'),colorred;
drawtextex(c and ddx上行60[p],0,440,32,'↑'),colorred;
drawtextex(c and ddx上行r[p],0,500,30,'↑'),colorred;
drawtextex(c and ddx上行r[p],0,500,32,'↑'),colorred;
drawtextex(c and ddx上行z[p],0,560,30,'↑'),colorred;
drawtextex(c and ddx上行z[p],0,560,32,'↑'),colorred;
drawtextex(c and ddx上行y[p],0,620,30,'↑'),colorred;
drawtextex(c and ddx上行y[p],0,620,32,'↑'),colorred;
drawtextex(c and ddx上行n[p],0,680,30,'↑'),colorred;
drawtextex(c and ddx上行n[p],0,680,32,'↑'),colorred;
{56行显示k↓行}
drawtextex(c and ddx下行01[p],0,210,30,'↓'),colorgreen;
drawtextex(c and ddx下行01[p],0,210,32,'↓'),colorgreen;
drawtextex(c and ddx下行05[p],0,270,30,'↓'),colorgreen;
drawtextex(c and ddx下行05[p],0,270,32,'↓'),colorgreen;
drawtextex(c and ddx下行15[p],0,330,30,'↓'),colorgreen;
drawtextex(c and ddx下行15[p],0,330,32,'↓'),colorgreen;
drawtextex(c and ddx下行30[p],0,390,30,'↓'),colorgreen;
drawtextex(c and ddx下行30[p],0,390,32,'↓'),colorgreen;
drawtextex(c and ddx下行60[p],0,450,30,'↓'),colorgreen;
drawtextex(c and ddx下行60[p],0,450,32,'↓'),colorgreen;
drawtextex(c and ddx下行r[p],0,510,30,'↓'),colorgreen;
drawtextex(c and ddx下行r[p],0,510,32,'↓'),colorgreen;
drawtextex(c and ddx下行z[p],0,570,30,'↓'),colorgreen;
drawtextex(c and ddx下行z[p],0,570,32,'↓'),colorgreen;
drawtextex(c and ddx下行y[p],0,630,30,'↓'),colorgreen;
drawtextex(c and ddx下行y[p],0,630,32,'↓'),colorgreen;
drawtextex(c and ddx下行n[p],0,690,30,'↓'),colorgreen;
drawtextex(c and ddx下行n[p],0,690,32,'↓'),colorgreen;
{75行显示k上拐∨}
drawtextex(c and ddx上拐01[p],0,225,30,'∨'),colorred;
drawtextex(c and ddx上拐01[p],0,225,32,'∨'),colorred;
drawtextex(c and ddx上拐05[p],0,285,30,'∨'),colorred;
drawtextex(c and ddx上拐05[p],0,285,32,'∨'),colorred;
drawtextex(c and ddx上拐15[p],0,345,30,'∨'),colorred;
drawtextex(c and ddx上拐15[p],0,345,32,'∨'),colorred;
drawtextex(c and ddx上拐30[p],0,405,30,'∨'),colorred;
drawtextex(c and ddx上拐30[p],0,405,32,'∨'),colorred;
drawtextex(c and ddx上拐60[p],0,465,30,'∨'),colorred;
drawtextex(c and ddx上拐60[p],0,465,32,'∨'),colorred;
drawtextex(c and ddx上拐r[p],0,525,30,'∨'),colorred;
drawtextex(c and ddx上拐r[p],0,525,32,'∨'),colorred;
drawtextex(c and ddx上拐z[p],0,585,30,'∨'),colorred;
drawtextex(c and ddx上拐z[p],0,585,32,'∨'),colorred;
drawtextex(c and ddx上拐y[p],0,645,30,'∨'),colorred;
drawtextex(c and ddx上拐y[p],0,645,32,'∨'),colorred;
drawtextex(c and ddx上拐n[p],0,705,30,'∨'),colorred;
drawtextex(c and ddx上拐n[p],0,705,32,'∨'),colorred;
{94行显示k下拐∧}
drawtextex(c and ddx下拐01[p],0,240,30,'∧'),colorgreen;
drawtextex(c and ddx下拐01[p],0,240,32,'∧'),colorgreen;
drawtextex(c and ddx下拐05[p],0,300,30,'∧'),colorgreen;
drawtextex(c and ddx下拐05[p],0,300,32,'∧'),colorgreen;
drawtextex(c and ddx下拐15[p],0,360,30,'∧'),colorgreen;
drawtextex(c and ddx下拐15[p],0,360,32,'∧'),colorgreen;
drawtextex(c and ddx下拐30[p],0,420,30,'∧'),colorgreen;
drawtextex(c and ddx下拐30[p],0,420,32,'∧'),colorgreen;
drawtextex(c and ddx下拐60[p],0,480,30,'∧'),colorgreen;
drawtextex(c and ddx下拐60[p],0,480,32,'∧'),colorgreen;
drawtextex(c and ddx下拐r[p],0,540,30,'∧'),colorgreen;
drawtextex(c and ddx下拐r[p],0,540,32,'∧'),colorgreen;
drawtextex(c and ddx下拐z[p],0,600,30,'∧'),colorgreen;
drawtextex(c and ddx下拐z[p],0,600,32,'∧'),colorgreen;
drawtextex(c and ddx下拐y[p],0,660,30,'∧'),colorgreen;
drawtextex(c and ddx下拐y[p],0,660,32,'∧'),colorgreen;
drawtextex(c and ddx下拐n[p],0,720,30,'∧'),colorgreen;
drawtextex(c and ddx下拐n[p],0,720,32,'∧'),colorgreen;

财:"kdj.k",linethick,colorwhite;
神:"kdj.d",linethick0,coloryellow;
q:=sysparam(3)-sysparam(2);
p:=sysparam(3);
kh:=hhv(h,q);
kl:=llv(l,q);
dh:=hhv(max(财,神),q);
dl:=llv(min(财,神),q);
bd:=(kh-kl)/(dh-dl)/3;
wk:=(kh-kl)/3;
wd:=(kh+kl-(dh+dl)*bd)/2-wk[p];
partline(1,财*bd[p]+wd[p]),linethick5,colorwhite;
partline(1,神*bd[p]+wd[p]),linethick5,coloryellow;
stickline(((close > open) or ((close = open) and (close > ref(close,1)))),low,high,0.1,0),,colorff;
stickline(((close > open) or ((close = open) and (close > ref(close,1)))),open,close,7,0),,colorff;
stickline(((close < open) or ((close = open) and (close <= ref(close,1)))),low,high,0.1,0),,colorffff00;
stickline(((close < open) or ((close = open) and (close <= ref(close,1)))),open,close,7,0),,colorffff00;
stickline(((close > open) or ((close = open) and (close > ref(close,1)))),low,high,0.1,0),,colorff;
stickline(((close > open) or ((close = open) and (close > ref(close,1)))),open,close,7,0),,colorff;
stickline(((close < open) or ((close = open) and (close <= ref(close,1)))),low,high,0.1,0),,colorffff00;
stickline(((close < open) or ((close = open) and (close <= ref(close,1)))),open,close,7,0),,colorffff00;
工作线:指数平滑移动平均(收盘价,14),precision2,coloryellow,linethick5;
lock:=条件函数(当前日期<1120923,1,0);
画分段线(指数平滑移动平均((2*收盘价+最高价+最低价)/4,6)>向前引用(指数平滑移动平均((2*收盘价+最高价+最低价)/4,6),1),指数平滑移动平均((2*收盘价+最高价+最低价)/4,5)),colorff;
画分段线(指数平滑移动平均((2*收盘价+最高价+最低价)/4,6)<向前引用(指数平滑移动平均((2*收盘价+最高价+最低价)/4,6),1),指数平滑移动平均((2*收盘价+最高价+最低价)/4,5)),colorff00;
画分段线(指数平滑移动平均((2*收盘价+最高价+最低价)/4,10)>向前引用(指数平滑移动平均((2*收盘价+最高价+最低价)/4,13),1),指数平滑移动平均((2*收盘价+最高价+最低价)/4,13)),colorff;
画分段线(指数平滑移动平均((2*收盘价+最高价+最低价)/4,10)<向前引用(指数平滑移动平均((2*收盘价+最高价+最低价)/4,13),1),指数平滑移动平均((2*收盘价+最高价+最低价)/4,13)),linethick2,colorff00;
画分段线(指数平滑移动平均((最低价+收盘价+开盘价)/3,453)>向前引用(指数平滑移动平均((最低价+收盘价+开盘价)/3,453),1),向前引用(指数平滑移动平均((最低价+收盘价+开盘价)/3,377),1)),linethick3,colorff;
画分段线(指数平滑移动平均((最低价+收盘价+开盘价)/3,453)<向前引用(指数平滑移动平均((最低价+收盘价+开盘价)/3,453),1),向前引用(指数平滑移动平均((最低价+收盘价+开盘价)/3,377),1)),colorff00,linethick8;
画分段线((指数平滑移动平均(最低价,55)+指数平滑移动平均((收盘价+最低价)/2,89))/2>向前引用((指数平滑移动平均(最低价,55)+指数平滑移动平均((收盘价+最低价)/2,89))/2,1),(指数平滑移动平均(最低价,55)+指数平滑移动平均((收盘价+最低价)/2,55))/2),点状线,colorff;
画分段线((指数平滑移动平均(最低价,55)+指数平滑移动平均((收盘价+最低价)/2,89))/2<向前引用((指数平滑移动平均(最低价,55)+指数平滑移动平均((收盘价+最低价)/2,89))/2,1),(指数平滑移动平均(最低价,55)+指数平滑移动平均((收盘价+最低价)/2,55))/2),点状线,colorff00;
画分段线((指数平滑移动平均(最低价,144)+指数平滑移动平均((收盘价+最低价)/2,233))/2>向前引用((指数平滑移动平均(最低价,144)+指数平滑移动平均((收盘价+最低价)/2,233))/2,1),(指数平滑移动平均(最低价,144)+指数平滑移动平均((收盘价+最低价)/2,144))/2),点状线,colorff;
画分段线((指数平滑移动平均(最低价,144)+指数平滑移动平均((收盘价+最低价)/2,233))/2<向前引用((指数平滑移动平均(最低价,144)+指数平滑移动平均((收盘价+最低价)/2,233))/2,1),(指数平滑移动平均(最低价,144)+指数平滑移动平均((收盘价+最低价)/2,144))/2),点状线,colorff00;
画分段线((指数平滑移动平均(最低价,233)+指数平滑移动平均((收盘价+最低价)/2,377))/2>向前引用((指数平滑移动平均(最低价,233)+指数平滑移动平均((收盘价+最低价)/2,377))/2,1),(指数平滑移动平均(最低价,233)+指数平滑移动平均((收盘价+最低价)/2,233))/2),点状线,colorff;
画分段线((指数平滑移动平均(最低价,233)+指数平滑移动平均((收盘价+最低价)/2,377))/2<向前引用((指数平滑移动平均(最低价,233)+指数平滑移动平均((收盘价+最低价)/2,377))/2,1),(指数平滑移动平均(最低价,233)+指数平滑移动平均((收盘价+最低价)/2,233))/2),点状线,colorff00;
画分段线((指数平滑移动平均(最低价,610)+指数平滑移动平均((收盘价+最低价)/2,1597))/2>向前引用((指数平滑移动平均(最低价,610)+指数平滑移动平均((收盘价+最低价)/2,1597))/2,1),(指数平滑移动平均(最低价,610)+指数平滑移动平均((收盘价+最低价)/2,610))/2),点状线,colorff;
画分段线((指数平滑移动平均(最低价,610)+指数平滑移动平均((收盘价+最低价)/2,1597))/2<向前引用((指数平滑移动平均(最低价,610)+指数平滑移动平均((收盘价+最低价)/2,1597))/2,1),(指数平滑移动平均(最低价,610)+指数平滑移动平均((收盘价+最低价)/2,610))/2),点状线,colorff00;
画分段线((指数平滑移动平均(最低价,2584)+指数平滑移动平均((收盘价+最低价)/2,4181))/2>向前引用((指数平滑移动平均(最低价,2584)+指数平滑移动平均((收盘价+最低价)/2,4181))/2,1),(指数平滑移动平均(最低价,2584)+指数平滑移动平均((收盘价+最低价)/2,2584))/2),点状线,colorff;
画分段线((指数平滑移动平均(最低价,2584)+指数平滑移动平均((收盘价+最低价)/2,4181))/2<向前引用((指数平滑移动平均(最低价,2584)+指数平滑移动平均((收盘价+最低价)/2,4181))/2,1),(指数平滑移动平均(最低价,2584)+指数平滑移动平均((收盘价+最低价)/2,2584))/2),点状线,colorff00;
画分段线((指数平滑移动平均(最低价,4181)+指数平滑移动平均((收盘价+最低价)/2,6765))/2>向前引用((指数平滑移动平均(最低价,4181)+指数平滑移动平均((收盘价+最低价)/2,6765))/2,1),(指数平滑移动平均(最低价,4181)+指数平滑移动平均((收盘价+最低价)/2,4181))/2),点状线,colorff;
画分段线((指数平滑移动平均(最低价,4181)+指数平滑移动平均((收盘价+最低价)/2,6765))/2<向前引用((指数平滑移动平均(最低价,4181)+指数平滑移动平均((收盘价+最低价)/2,6765))/2,1),(指数平滑移动平均(最低价,4181)+指数平滑移动平均((收盘价+最低价)/2,4181))/2),点状线,colorff00;
zcb1:=累加到指定值周期数(成交量 ,流通盘大小*1);{累计换手=100%的周期}
zcb2:=求和(成本分布(10),zcb1)/zcb1;{在a周期里获利10%的平均价}
zcb3:=求和(成本分布(20),zcb1)/zcb1;{在a周期里获利20%的平均价}
zcb4:=求和(成本分布(30),zcb1)/zcb1;{在a周期里获利30%的平均价}
zcb5:=求和(成本分布(40),zcb1)/zcb1;{在a周期里获利40%的平均价}
zcb6:=求和(成本分布(50),zcb1)/zcb1;{在a周期里获利50%的平均价}
庄本:(5*zcb2+4*zcb3+3*zcb4+2*zcb5+zcb6)/15,precision2,linethick3,color1199ff;{求出庄家成本}
{低位密集}

;
年线:指数平滑移动平均(收盘价,240),precision2,,colorff80ff;
zdf:=(收盘价-向前引用(收盘价,1))/向前引用(收盘价,1)*100;
画柱线(zdf>9.8,开盘价,收盘价,6,0),coloryellow;

ac:=收盘价;
转强:=加权移动平均(最高价,6);
转弱:=加权移动平均(最低价,6);
b:=收盘价*0;
for i=13+1 to 序列数据量 do begin
条件函数 ac[i]>转强[i-1] then
b[i]:=1;else
条件函数 ac[i]<转弱[i-1] then
b[i]:=-1;else
b[i]:=b[i-1];
end;
转折线:条件函数(b=-1,简单移动平均(最高价,6),简单移动平均(最低价,6)),linethick2,colorffffff;
生命线:=(指数平滑移动平均(收盘价,55)+指数平滑移动平均(收盘价,233))/2,linethick2,colorcc33ff;
道中仙:=之字转向(3,55),linethick1,colorgreen;
显示文字(交叉函数(向前引用(之字转向(3,88888888),1),之字转向(3,88888888)),最高价*0.96,'抛了吧'),colorffffff;
显示文字(交叉函数(之字转向(3,88888888),向前引用(之字转向(3,88888888),1)),最低价*1.09,'关注'), ,colorffffff;

财神红绿点
供财神买 := ema(close,5) - ema(close,8888888888);求财神买 := ema(供财神买,8888888888);
买 : 2*(供财神买-求财神买), colorstick,linethick8888;
drawgbk(close>0, colorrgb(100,3333,8888), colorrgb(100,7777,8888),8);
drawbkbmp(( ( ref(买,0)-ref(买,1)>0)),'ddx'),;
drawbkbmp(( ( ref(买,0)-ref(买,1)<0)),'ddt');

财神红绿点。
文燕骗子1:=ema(close,9999999999);
五天:=ema(close,5);
骗子文 := 五天-文燕骗子1;
骗子燕 := ema(骗子文,8888888888);
文燕骗术:2*(骗子文-骗子燕), colorstick,linethick8888;
drawgbk(close>0, colorrgb(100,3333,8888), colorrgb(100,7777,8888),8);
drawbkbmp(( ( 文燕骗术-ref(文燕骗术,1)>0)),'图片1'),;
drawbkbmp(( ( 文燕骗术-ref(文燕骗术,1)<0)),'图片2'),;（沽权天下）

财神趋势工作线

ma1:简单移动平均(收盘价,14),color80ffff;


var1:=100-((90)*(最高值(最高价,21)-收盘价))/(最高值(最高价,21)-最低值(最低价,21));
var2:=100-((90)*(最高值(最高价,21)-收盘价))/(最高值(最高价,21)-最低值(最低价,21));
var3:=100-简单移动平均(((100)*(最高值(最高价,6)-收盘价))/(最高值(最高价,6)-最低值(最低价,6)),34);
年:简单移动平均(收盘价,55),colorffffff;



画柱线((收盘价>=年) and (收盘价>=开盘价),收盘价,开盘价,7,0),color0000ff;
画柱线((收盘价>=年) and (收盘价>=开盘价),最高价,最低价,0,0),color0000ff;
画柱线((收盘价>=年) and (收盘价<开盘价),收盘价,开盘价,7,1),color0000ff;
画柱线((收盘价>=年) and (收盘价<开盘价),开盘价,最高价,0,0),color0000ff;
画柱线((收盘价>=年) and (收盘价<开盘价),收盘价,最低价,0,0),color0000ff;
画柱线((收盘价<年) and (收盘价>开盘价),收盘价,开盘价,7,1),colorffff00;
画柱线((收盘价<年) and (收盘价<=开盘价),收盘价,开盘价,7,1),colorffff00;
画柱线((收盘价<年) and (收盘价<=开盘价),最高价,最低价,0,1),colorffff00;
画柱线((收盘价<年) and (收盘价>开盘价),收盘价,最高价,0,1),colorffff00;
画柱线((收盘价<年) and (收盘价>开盘价),开盘价,最低价,0,1),colorffff00;
hh:=最高值(最高价,0);
hhh:=最高价;
aa:=上一次条件成立位置(最高价=hh[序列数据量]);
ba:=序列数据量-aa;
ja:=1;
tm1:=999999;
for i1=ba[序列数据量]+1 to 序列数据量 do begin
k1:=(hh[序列数据量]-hhh[i1])/ja;
条件函数 k1<tm1 then begin
tm1:=k1;
ts1:=ja;
end;
ja:=ja+1;
end;
a1:趋势线数值(最高价=hh[序列数据量] and aa=0,最高价,数据位置=序列数据量-aa[序列数据量]+ts1,最高价,0,0),colorffff54;
cha:=最高值(绝对值(最低价-a1),aa);
a2:a1-cha[序列数据量],colorffff54;
ai:a1-cha[序列数据量]/2,colorffff54,长虚线;

ll:=最低值(最低价,0);
lll:=最低价;
a3:=上一次条件成立位置(最低价=ll[序列数据量]);
b3:=序列数据量-a3;
j3:=1;
tm3:=999999;
for i3=b3[序列数据量]+1 to 序列数据量 do begin
k3:=(lll[i3]-ll[序列数据量])/j3;
条件函数 k3<tm3 then begin
tm3:=k3;
ts3:=j3;
end;
j3:=j3+1;
end;
b1:趋势线数值(最低价=ll[序列数据量] and a3=0,最低价,数据位置=序列数据量-a3[序列数据量]+ts3,最低价,0,0),color5454ff;
chb:=最高值(绝对值(最高价-b1),a3);
b2:b1+chb[序列数据量],color5454ff;
bi:b1+chb[序列数据量]/2,color5454ff,长虚线;input: n(21,5,100);

财神涨停副
gws:=fracpart(ref(c,1)*10);
qz:=intpart(ref(c,1)*1)/100;
买:=之字转向(3,13)>向前引用(之字转向(3,13),1) and 向前引用(之字转向(3,13),1)<向前引用(之字转向(3,13),2);
zt:=c=ref(c,1)+qz+if(gws>0.4,0.01,0) ;
xg : zt and买

财神中波
画渐变背景色(收盘价>0, rgb颜色值(1,0000,8888), rgb颜色值(100,5555,8865),3);
卖:之字转向(3,13)<向前引用(之字转向(3,13),1) and 向前引用(之字转向(3,13),1)>向前引用(之字转向(3,13),2),colorf0f000;
买:之字转向(3,13)>向前引用(之字转向(3,13),1) and 向前引用(之字转向(3,13),1)<向前引用(之字转向(3,13),2), colorred;
买1:=之字转向(3,55)>向前引用(之字转向(3,55),1) and 向前引用(之字转向(3,55),1)<向前引用(之字转向(3,55),2), colorred;
xg:买1>0 ;画柱线(xg,0,1.5,8,1),colorred;

财神资金趋势
资金:指数平滑移动平均((指数平滑移动平均(收盘价,1.5*1)-指数平滑移动平均(收盘价,1.5*88888888))/指数平滑移动平均(收盘价,1.5*88888888)*1000,3),colorffffff;
趋势:指数平滑移动平均(资金,1.5*88888888),colorffffff;
升降:2*(资金-趋势), colorffffff,linethick18;
画渐变背景色(收盘价>0, rgb颜色值(1,3333,8888), rgb颜色值(100,7777,8888),3);
小起:显示文字(交叉函数("macd.diff#week"(88888888,5,88888888)
,"macd.dea#week"(88888888,5,88888888)),500,'小起'),colorwhite;
小落:显示文字(交叉函数("macd.dea#week"(88888888,5,88888888)
,"macd.diff#week"(88888888,5,88888888)),500,'小落')colorwhite;
大起:显示文字(交叉函数("macd.diff#month"(88888888,5,88888888)
,"macd.dea#month"(88888888,5,88888888)),2000,'大起'),colorwhite;
大落:显示文字(交叉函数("macd.dea#month"(88888888,5,88888888)
,"macd.diff#month"(88888888,5,88888888)),1000,'大落'),colorwhite;
画分段线(升降>=向前引用(升降,1) and 升降>向前引用(升降,1),升降),color0096ff,linethick3;
画分段线(升降<向前引用(升降,1) and 升降<向前引用(升降,1),升降),colorgreen
,linethick3;
画分段线(升降>=向前引用(升降,1) and 升降<向前引用(升降,1),升降),color0096ff,linethick3;
画分段线(升降<向前引用(升降,1) and 升降>向前引用(升降,1),升降),colorgreen,linethick3;0,colorwhite;

指标公式下载地址

上一指标公式：两市总成交额公式 飞狐成交额指标 源码

下一指标公式：点滴VR公式 飞狐点滴指标 源码

相关飞狐公式推荐

指标公式下载注意

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

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

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

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

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

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

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

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

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

☉ 本文财神红绿点公式 飞狐红绿指标指标 源码仅供学习研究。