打印本文
關閉窗口
相關標簽:無未來底背離公式指標 、 買賣點指標公式無未來 、 不帶未來指標公式源碼 、 最實用無未來指標公式 、 超短線指標公式無未來 、 沒有未來纏論指標公式 、 bias指標公式無未來 、 未來空間指標公式 、 黑馬指標公式無未來 、 無未來函數指標公式 、 無未來主圖指標公式 、 箱體指標公式無未來 、
?
未來多美好定做的
?
原理解析：
源碼：
?
1input:p(10,1,30),參a(2,1,111),參b(1,1,111),參c(1,1,111),A偏移(0),B偏移(0),C偏移(0),整體偏移(0),參自定義1(0.764,-1,99999),參自定義2(0.809,-1,99999) ,參自定義3(4.191,-1,99999) ,參自定義4(4.236,-1,99999) ,參自定義5(5,-1,99999),參自定義6(6,-1,99999),參自定義7(7,-1,99999),參自定義8(8,-1,99999);
x1:=TROUGH(4,p,1);//BARPOS
x8:=TROUGHBARS(4,p,1)=0;
x11:=TROUGHBARS(4,p,參a);
x18:=TROUGHBARS(4,p,參b);
x13:=TROUGHBARS(4,p,參c);
x3:=PEAK(4,p,1);
x31:=PEAKBARS(4,p,參a);
x38:=PEAKBARS(4,p,參b);
x33:=PEAKBARS(4,p,參c);x5:=PEAKBARS(4,p,1)=0;光標位置:=SYSPARAM(1),linethick0;
cldis:=x13[SYSPARAM(1)],linethick0;
chdis:=x33[SYSPARAM(1)],linethick0;
tcl:=光標位置-cldis,linethick0;
tch:=光標位置-chdis,linethick0;bldis:=x18[SYSPARAM(1)],linethick0;
bhdis:=x38[SYSPARAM(1)],linethick0;
tbl:=光標位置-bldis,linethick0;
tbh:=光標位置-bhdis,linethick0;
aldis:=x11[SYSPARAM(1)],linethick0;
ahdis:=x31[SYSPARAM(1)],linethick0;
tal:=光標位置-aldis,linethick0;
tah:=光標位置-ahdis,linethick0;K一浪a:=IF(tcl>tch,tal+A偏移,tah+A偏移),linethick0;
K二浪b:=IF(tcl>tch,tbh+B偏移,tbl+B偏移),linethick0;
K三浪c:=IF(tcl>tch,tcl+C偏移,tch+C偏移),linethick0;
PH:=H;
PL:=L;P一浪a:IF(tcl>tch,PL[tal+A偏移],PH[tah+A偏移]),LINETHICK0;
P二浪b:IF(tcl>tch,PH[tbh+B偏移],PL[tbl+B偏移]),LINETHICK0;
P三浪c:IF(tcl>tch,PL[tcl+C偏移],PH[tch+C偏移]),LINETHICK0;
{kdisab:IF(ldis[SYSPARAM(1)]<hdis[SYSPARAM(1)],lldis-hdis,hhdis-ldis),linethick0;
kc:max(tl,th),linethick0;}drawline(barpos=K一浪a,p一浪a,barpos=K二浪b,p二浪b,0),color77FFFF,linethick1;
drawline(barpos=K二浪b,p二浪b,barpos=K三浪c,p三浪c,0),color77FFFF,linethick1;一浪長:P二浪b-P一浪a,linethick0;
//xx:=x;
//SETLBOUND(xx,k看);
{---------------------說話啊-------------------}
{☆§-------------------------------------§☆}{-------------------------------------}
if 參自定義1>-0.5 then
begin
倍數自定義1:= 參自定義1+整體偏移;
y自定義1:一浪長*倍數自定義1,linethick0;
P自定義1:=P三浪c+y自定義1,linethick0;
partline(barpos>=K三浪c,p自定義1),COLOR0000FF,LINEDOT;
DRAWTEXT(barpos=K三浪c,P自定義1,numtostr(倍數自定義1,3)+' '+numtostr(P自定義1,3)),COLOR0000FF;end;
{-------------------------------------}if 參自定義2>-0.5 then
begin
倍數自定義2:= 參自定義2+整體偏移;
y自定義2:一浪長*倍數自定義2,linethick0;
P自定義2:=P三浪c+y自定義2,linethick0;
partline(barpos>=K三浪c,p自定義2),COLOR0000FF,LINEDOT;
DRAWTEXT(barpos=K三浪c,P自定義2,numtostr(倍數自定義2,3)+' '+numtostr(P自定義2,3)),COLOR0000FF;end;{-------------------------------------}if 參自定義3>-0.5 then
begin
倍數自定義3:= 參自定義3+整體偏移;
y自定義3:一浪長*倍數自定義3,linethick0;
P自定義3:=P三浪c+y自定義3,linethick0;
partline(barpos>=K三浪c,p自定義3),COLOR0000FF,LINEDOT;
DRAWTEXT(barpos=K三浪c,P自定義3,numtostr(倍數自定義3,3)+' '+numtostr(P自定義3,3)),COLOR0000FF;end;
{-------------------------------------}if 參自定義4>-0.5 then
begin
倍數自定義4:= 參自定義4+整體偏移;
y自定義4:一浪長*倍數自定義4,linethick0;
P自定義4:=P三浪c+y自定義4,linethick0;
partline(barpos>=K三浪c,p自定義4),COLOR0000FF,LINEDOT;
DRAWTEXT(barpos=K三浪c,P自定義4,numtostr(倍數自定義4,3)+' '+numtostr(P自定義4,3)),COLOR0000FF;end;{-------------------------------------}if 參自定義5>-0.5 then
begin
倍數自定義5:= 參自定義5+整體偏移;
y自定義5:一浪長*倍數自定義5,linethick0;
P自定義5:=P三浪c+y自定義5,linethick0;
partline(barpos>=K三浪c,p自定義5),COLOR0000FF,LINEDOT;
DRAWTEXT(barpos=K三浪c,P自定義5,numtostr(倍數自定義5,3)+' '+numtostr(P自定義5,3)),COLOR0000FF;end;
{-------------------------------------}if 參自定義6>-0.5 then
begin
倍數自定義6:= 參自定義6+整體偏移;
y自定義6:一浪長*倍數自定義6,linethick0;
P自定義6:=P三浪c+y自定義6,linethick0;
partline(barpos>=K三浪c,p自定義6),COLOR0000FF,LINEDOT;
DRAWTEXT(barpos=K三浪c,P自定義6,numtostr(倍數自定義6,3)+' '+numtostr(P自定義6,3)),COLOR0000FF;end;{-------------------------------------}if 參自定義7>-0.5 then
begin
倍數自定義7:= 參自定義7+整體偏移;
y自定義7:一浪長*倍數自定義7,linethick0;
P自定義7:=P三浪c+y自定義7,linethick0;
partline(barpos>=K三浪c,p自定義7),COLOR0000FF,LINEDOT;
DRAWTEXT(barpos=K三浪c,P自定義7,numtostr(倍數自定義7,3)+' '+numtostr(P自定義7,3)),COLOR0000FF;end;{-------------------------------------}if 參自定義8>-0.5 then
begin
倍數自定義8:= 參自定義8+整體偏移;
y自定義8:一浪長*倍數自定義8,linethick0;
P自定義8:=P三浪c+y自定義8,linethick0;
partline(barpos>=K三浪c,p自定義8),COLOR0000FF,LINEDOT;
DRAWTEXT(barpos=K三浪c,P自定義8,numtostr(倍數自定義8,3)+' '+numtostr(P自定義8,3)),COLOR0000FF;end;
{§歷史影響現在，現在影響未來。§}
{-------------畫k線---------------}
{覺得k線被線阻擋，就重新畫k線}
{stickline(c>o,c,o,8,1),color5050ff;
stickline(c>o,h,c,0.5,0),color5050ff;
stickline(c>o,o,l,0.5,0),color5050ff;
stickline(c<o,o,c,8,0),colorffff50;
stickline(c<o,h,c,0.5,0),colorffff50;
stickline(c<o,o,l,0.5,0),colorffff50;} {§未來多美好 公式組§}
?
公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】
?