{大智慧缠论} {周期系数}
K:=IF(DATATYPE=8,4,{日}
IF(DATATYPE=9,16,{周}
IF(DATATYPE=10,32,{月}
IF(DATATYPE=11,8,{多日}
IF(DATATYPE=13,32,{季}
IF(DATATYPE=14,64,{半年}
IF(DATATYPE=12,64,{年}
IF(DATATYPE=7,2,{60F}
IF(DATATYPE=6,1,{30F}
IF(DATATYPE=5,1,{15F}
IF(DATATYPE=4,1{5F},1{1F})))))))))));
{分析家公式网ww.fxjgsw.com}
{画笔段}
ZG1:ZIG(4,3*K);
ZG:ZIG(4,6*K);
顶:=backset(zg<ref(zg,1) and ref(zg,2)<ref(zg,1),2);
底:=backset(zg>ref(zg,1) and ref(zg,2)>ref(zg,1),2);
DRAWLINE(顶,H,底,L,0),COLORGREEN,LINETHICK2;
DRAWLINE(底,L,顶,H,0),COLORRED,LINETHICK2;
{画中枢};
顶1:=backset(zg1<ref(zg1,1) and ref(zg1,2)<ref(zg1,1),2);
底1:=backset(zg1>ref(zg1,1) and ref(zg1,2)>ref(zg1,1),2);
顶1H:=ref(H,barslast(顶1)+2);
底1L:=ref(L,barslast(底1)+2);
{画中枢Begin} {以背景方式画}
{duanfx:=if(顶,1,if(底,-1,0));}
zszg:min(peak(4,3*K,1),peak(4,3*K,2)),dotline;
zszd:max(TROUGH(4,3*K,1),TROUGH(4,3*K,2)),dotline;
duanfx:=if(backset(顶,barslast(底)+120),1,if(backset(底,barslast(顶)+120),-1,0));
STICKLINE(zszg>zszd AND range(peak(4,3*K,1),peak(4,3*K,2)*(1-0.02*K),peak(4,3*K,2)*(1+0.02*K)) and duanfx=1, zszg, zszd, 10, 1),Color8E236B;
STICKLINE(zszg>zszd AND range(TROUGH(4,3*K,1),TROUGH(4,3*K,2)*(1-0.02*K),TROUGH(4,3*K,2)*(1+0.02*K)) and duanfx=-1, zszg, zszd, 10, 1), Color007700;
{画中枢END}; |
