请老师将下面引用跨周期部分更改一下,谢谢 [博易POBO]
咨询内容:
MA15:=MA(C,M1),COLORRED,LINETHICK2;
PARTLINE2(MA30,C>REF(C,M2),COLORRED,C<=REF(C,M2),COLORGREEN),LINETHICK2;
PARTLINE2(MA15,C>REF(C,M1),COLORRED,C<=REF(C,M1),COLORGREEN),LINETHICK1;
MA120:MA(C,120);
N:=BARSLAST(DATE<>REF(DATE,1))+1;
JZ1:=HHV(H,N);
HZ1:=REF(HHV(H,N),N);
QZ1:=REF(REF(HHV(H,N),N),N);
HH:=HHV(H,N-1);
JZ2:=LLV(L,N);
HZ2:=REF(LLV(L,N),N);
QZ2:=REF(REF(LLV(L,N),N),N);
LL:=LLV(L,N-1);
绿一:=HZ1=MAX(JZ1,HZ1);
绿二:=REF(C,N)>REF(O,N)&&C>MAX(HH,HZ1)&&C<HZ2;
绿三:=C<REF(L,BARSLAST(C<O)+1);
绿四:=C<HZ2;
VV:=((REF(C,1)>REF(O,1) AND H>REF(H,1) AND C<REF(L,1))) OR (REF(H,1)=HHV(H,3) AND C<REF(L,1)) OR C<REF(L,BARSLAST(C>O)) ;
红一:=HZ2=MIN(JZ2,HZ2);
红二:=REF(C,N)<REF(O,N)&&C<MIN(LL,HZ2)&&C>HZ1;
红三:=C>REF(H,BARSLAST(C<O)+1);
红四:=C>HZ1;
OO:=(REF(L,1)=LLV(L,3) AND C>REF(H,1)) OR ((REF(O,1)>REF(C,1) AND L<REF(L,1) AND C>REF(H,1))) OR C>REF(H,BARSLAST(C<O));
COUD1:=CROSS(COUNT(VV,BARSLAST(OO))=1,0.5);
COUD2:=CROSS(COUNT(OO,BARSLAST(VV))=1,0.5);
STICKLINE(COUD1,O,CLOSE,12,0),COLORBLUE;
STICKLINE(COUD2,O,CLOSE,12,0),COLORMAGENTA;
//穿线K
FF:=CROSS(C,MA30);
FF1:=CROSS(C,MA15);
HHH:=CROSS(FF,FF1);
AA:=MA(C,M1);
BB:=MA(C,M2);
EE:=L<=BB;
FF2:=H>=BB;
CC1:=AA>BB AND C<=BB;
DD1:=AA<BB AND C>=BB;
CC:=AA>BB AND C>=AA AND C>=BB AND EE;
DD:=AA<BB AND C<=AA AND C<=BB AND FF2;
A1:=L > REF(H,1);
A2:=H < REF(L,1);
A5:=LLV(H,240);
A6:=100 * (C - A5) / A5;
A7:=(C - LLV(L,528)) / (HHV(H,528) - LLV(L,528)) * 100;
A8:=(C - LLV(C,530)) / (HHV(C,530) - LLV(C,530)) * 100;
A9:=(0);
A10:=SMA(MAX(C - REF(C,1),0),34,1) / SMA(ABS(C - REF(C,1)),7,1) * 100;
A11:=SMA(MAX(C - REF(C,1),0),13,1) / SMA(ABS(C - REF(C,1)),13,1) * 100;
A12:=IF(TROUGHBARS(L,2,10,1) = 0 AND H > L + 0.04,4,0);
A13:=ZIG(C,6,1) > REF(ZIG(C,6,1),1) AND REF(ZIG(C,6,1),1) <= REF(ZIG(C,6,1),2) AND REF(ZIG(C,6,1),2) <= REF(ZIG(C,6,1),3);
A14:=ZIG(C,6,1) < REF(ZIG(C,6,1),1) AND REF(ZIG(C,6,1),1) >= REF(ZIG(C,6,1),2) AND REF(ZIG(C,6,1),2) >= REF(ZIG(C,6,1),3);
A15:=ZIG(C,22,1) > REF(ZIG(C,22,1),1) AND REF(ZIG(C,22,1),1) <= REF(ZIG(C,22,1),2) AND REF(ZIG(C,22,1),2) <= REF(ZIG(C,22,1),3);
A16:=ZIG(C,22,1) < REF(ZIG(C,22,1),1) AND REF(ZIG(C,22,1),1) >= REF(ZIG(C,22,1),2) AND REF(ZIG(C,22,1),2) >= REF(ZIG(C,22,1),3);
A17:=ZIG(C,51,1) > REF(ZIG(C,51,1),1) AND REF(ZIG(C,51,1),1) <= REF(ZIG(C,51,1),2) AND REF(ZIG(C,51,1),2) <= REF(ZIG(C,51,1),3);
A18:=ZIG(C,51,1) < REF(ZIG(C,51,1),1) AND REF(ZIG(C,51,1),1) >= REF(ZIG(C,51,1),2) AND REF(ZIG(C,51,1),2) >= REF(ZIG(C,51,1),3);
A19:=ZIG(C,72,1) > REF(ZIG(C,72,1),1) AND REF(ZIG(C,72,1),1) <= REF(ZIG(C,72,1),2) AND REF(ZIG(C,72,1),2) <= REF(ZIG(C,72,1),3);
A20:=ZIG(C,72,1) < REF(ZIG(C,72,1),1) AND REF(ZIG(C,72,1),1) >= REF(ZIG(C,72,1),2) AND REF(ZIG(C,72,1),2) >= REF(ZIG(C,72,1),3);
A21:=EMA(C,2) - EMA(C,150);
A22:=(A12);
A23:=A13 + A15 + A17 + A19;
A24:=A14 + A16 + A18 + A20;
A80:=(10);
A81:=REF(H,A80) = HHV(H,2 * A80 + 1);
A82:=BACKSET(A81,A80 + 1);
A83:=FILTER(A82,A80) AND H = HHV(H,A80 + 10);
A84:=FILTER(A82,A80) AND L = LLV(L,A80 - 10);
做多力度:=SMA((CLOSE - LLV(LOW,M1)) / (HHV(HIGH,M1) - LLV(LOW,M1)) * 100,M1,1)-8 ;
做空力度:=SMA((HHV(HIGH,M2) - CLOSE) / (HHV(HIGH,M2) - LLV(LOW,M2)) * 100,M2,1);
多空差:=做多力度-做空力度,NODRAW;
多空差1:=REF(多空差,1);
标红:=多空差>=REF(多空差,1);
标绿:=多空差<=REF(多空差,1);
AA1:=(REF(O,1) + REF(C,1)) / 2;
AA2:=(H + L + C) / 3;
AA3:=MAX(MAX(AA1,AA2),H);
AA4:=MIN(MIN(AA1,AA2),L);
AA5:=IF(AA1 < AA2,AA3 - AA4 + AA2 - AA1,AA3 - AA4);
AA6:=IF(AA1 > AA2,AA3 - AA4 + AA1 - AA2,AA3 - AA4);
AA7:=AA5 / (AA5 + AA6) * VOL * MAX(ABS(AA1 - AA2) / (AA3 - AA4),0.15) / 10000;
AA8:=AA6 / (AA5 + AA6) * VOL * MAX(ABS(AA1 - AA2) / (AA3 - AA4),0.15) / 10000;
主力:=(AA7 - AA8) * 25000,NODRAW;
MID:=MA(CLOSE,MM);
UPPER:MID + 2*STD(C,MM),COLOR333333;
LOWER:MID - 2*STD(C,MM),COLOR333333;
多空:=STKINDI('','多空差柱.多空差',0,P1);
多空1:=STKINDI('','多空差柱.多空差',0,B1);
IF 多空>0 THEN BJ:=1;
IF 多空<0 THEN BJ:=-1;
IF 多空1>0 THEN BJ:=1;
IF 多空1<0 THEN BJ:=-1;
PARTLINE(多空>0,UPPER,COLORRED),LINETHICK2;
PARTLINE(多空<0,UPPER,COLORGREEN),LINETHICK2;
PARTLINE(多空=0,UPPER,COLORBLUE),LINETHICK2;
PARTLINE(多空1>0,LOWER,COLORRED),LINETHICK1;
PARTLINE(多空1<0,LOWER,COLORGREEN),LINETHICK1;
PARTLINE(多空1=0,LOWER,COLORBLUE),LINETHICK1;
多空1:=STKINDI('',6,'多空差柱.多空差',0,B1);
数字6为需要调用的周期,数字6代表取的是日线,您可以自行调节,调节方法参数以下函数
DATAPERIOD
取当前计算的周期类型。
1-1分钟线,2-5分钟线,3-15分钟线,4-30分钟线,5-60分钟线,6-日线,7-周线,8-月线,9-年线,10-多日线,11-多分钟线,12-季线,13-3分钟线,14-走势线,15-120分钟线,16-240分钟线。
P1,B1需要您自设参数,STKINDI使用方法参照以下说明
STKINDI(Code,Period,'IDX.LINE',P1,P2,…)
引用指定品种的IDX指标的LINE输出结果。
Code为品种代码,当代码为常量时,可以动态更新该品种数据,否则只能使用本地最近保存的数据。
Period为周期类型,取值参考DATAPERIOD;
IDX为指标名称,LINE为指定输出,可以省略,默认引用第一条输出;
P1之后为指标参数,最多16个,可以省略,默认使用指标公式对应周期的参数。
当Code=''时引用当前品种,Period=0时引用当前周期类型。
例如:
STKINDI('',0,'MACD'),表示引用当前品种当前周期MACD指标的DIF输出。
STKINDI('600000.SH',6,'MA.MA1',5,20,40),表示引用浦发银行的日线MA指标的MA1输出,指标前三个参数分别为5、20、40,其余参数使用系统设置值。
来源 程序化久久网
请老师将下面引用跨周期部分更改一下,谢谢
MA30:=MA(C,M2),COLORRED,LINETHICK2;MA15:=MA(C,M1),COLORRED,LINETHICK2;
PARTLINE2(MA30,C>REF(C,M2),COLORRED,C<=REF(C,M2),COLORGREEN),LINETHICK2;
PARTLINE2(MA15,C>REF(C,M1),COLORRED,C<=REF(C,M1),COLORGREEN),LINETHICK1;
MA120:MA(C,120);
N:=BARSLAST(DATE<>REF(DATE,1))+1;
JZ1:=HHV(H,N);
HZ1:=REF(HHV(H,N),N);
QZ1:=REF(REF(HHV(H,N),N),N);
HH:=HHV(H,N-1);
JZ2:=LLV(L,N);
HZ2:=REF(LLV(L,N),N);
QZ2:=REF(REF(LLV(L,N),N),N);
LL:=LLV(L,N-1);
绿一:=HZ1=MAX(JZ1,HZ1);
绿二:=REF(C,N)>REF(O,N)&&C>MAX(HH,HZ1)&&C<HZ2;
绿三:=C<REF(L,BARSLAST(C<O)+1);
绿四:=C<HZ2;
VV:=((REF(C,1)>REF(O,1) AND H>REF(H,1) AND C<REF(L,1))) OR (REF(H,1)=HHV(H,3) AND C<REF(L,1)) OR C<REF(L,BARSLAST(C>O)) ;
红一:=HZ2=MIN(JZ2,HZ2);
红二:=REF(C,N)<REF(O,N)&&C<MIN(LL,HZ2)&&C>HZ1;
红三:=C>REF(H,BARSLAST(C<O)+1);
红四:=C>HZ1;
OO:=(REF(L,1)=LLV(L,3) AND C>REF(H,1)) OR ((REF(O,1)>REF(C,1) AND L<REF(L,1) AND C>REF(H,1))) OR C>REF(H,BARSLAST(C<O));
COUD1:=CROSS(COUNT(VV,BARSLAST(OO))=1,0.5);
COUD2:=CROSS(COUNT(OO,BARSLAST(VV))=1,0.5);
STICKLINE(COUD1,O,CLOSE,12,0),COLORBLUE;
STICKLINE(COUD2,O,CLOSE,12,0),COLORMAGENTA;
//穿线K
FF:=CROSS(C,MA30);
FF1:=CROSS(C,MA15);
HHH:=CROSS(FF,FF1);
AA:=MA(C,M1);
BB:=MA(C,M2);
EE:=L<=BB;
FF2:=H>=BB;
CC1:=AA>BB AND C<=BB;
DD1:=AA<BB AND C>=BB;
CC:=AA>BB AND C>=AA AND C>=BB AND EE;
DD:=AA<BB AND C<=AA AND C<=BB AND FF2;
A1:=L > REF(H,1);
A2:=H < REF(L,1);
A5:=LLV(H,240);
A6:=100 * (C - A5) / A5;
A7:=(C - LLV(L,528)) / (HHV(H,528) - LLV(L,528)) * 100;
A8:=(C - LLV(C,530)) / (HHV(C,530) - LLV(C,530)) * 100;
A9:=(0);
A10:=SMA(MAX(C - REF(C,1),0),34,1) / SMA(ABS(C - REF(C,1)),7,1) * 100;
A11:=SMA(MAX(C - REF(C,1),0),13,1) / SMA(ABS(C - REF(C,1)),13,1) * 100;
A12:=IF(TROUGHBARS(L,2,10,1) = 0 AND H > L + 0.04,4,0);
A13:=ZIG(C,6,1) > REF(ZIG(C,6,1),1) AND REF(ZIG(C,6,1),1) <= REF(ZIG(C,6,1),2) AND REF(ZIG(C,6,1),2) <= REF(ZIG(C,6,1),3);
A14:=ZIG(C,6,1) < REF(ZIG(C,6,1),1) AND REF(ZIG(C,6,1),1) >= REF(ZIG(C,6,1),2) AND REF(ZIG(C,6,1),2) >= REF(ZIG(C,6,1),3);
A15:=ZIG(C,22,1) > REF(ZIG(C,22,1),1) AND REF(ZIG(C,22,1),1) <= REF(ZIG(C,22,1),2) AND REF(ZIG(C,22,1),2) <= REF(ZIG(C,22,1),3);
A16:=ZIG(C,22,1) < REF(ZIG(C,22,1),1) AND REF(ZIG(C,22,1),1) >= REF(ZIG(C,22,1),2) AND REF(ZIG(C,22,1),2) >= REF(ZIG(C,22,1),3);
A17:=ZIG(C,51,1) > REF(ZIG(C,51,1),1) AND REF(ZIG(C,51,1),1) <= REF(ZIG(C,51,1),2) AND REF(ZIG(C,51,1),2) <= REF(ZIG(C,51,1),3);
A18:=ZIG(C,51,1) < REF(ZIG(C,51,1),1) AND REF(ZIG(C,51,1),1) >= REF(ZIG(C,51,1),2) AND REF(ZIG(C,51,1),2) >= REF(ZIG(C,51,1),3);
A19:=ZIG(C,72,1) > REF(ZIG(C,72,1),1) AND REF(ZIG(C,72,1),1) <= REF(ZIG(C,72,1),2) AND REF(ZIG(C,72,1),2) <= REF(ZIG(C,72,1),3);
A20:=ZIG(C,72,1) < REF(ZIG(C,72,1),1) AND REF(ZIG(C,72,1),1) >= REF(ZIG(C,72,1),2) AND REF(ZIG(C,72,1),2) >= REF(ZIG(C,72,1),3);
A21:=EMA(C,2) - EMA(C,150);
A22:=(A12);
A23:=A13 + A15 + A17 + A19;
A24:=A14 + A16 + A18 + A20;
A80:=(10);
A81:=REF(H,A80) = HHV(H,2 * A80 + 1);
A82:=BACKSET(A81,A80 + 1);
A83:=FILTER(A82,A80) AND H = HHV(H,A80 + 10);
A84:=FILTER(A82,A80) AND L = LLV(L,A80 - 10);
做多力度:=SMA((CLOSE - LLV(LOW,M1)) / (HHV(HIGH,M1) - LLV(LOW,M1)) * 100,M1,1)-8 ;
做空力度:=SMA((HHV(HIGH,M2) - CLOSE) / (HHV(HIGH,M2) - LLV(LOW,M2)) * 100,M2,1);
多空差:=做多力度-做空力度,NODRAW;
多空差1:=REF(多空差,1);
标红:=多空差>=REF(多空差,1);
标绿:=多空差<=REF(多空差,1);
AA1:=(REF(O,1) + REF(C,1)) / 2;
AA2:=(H + L + C) / 3;
AA3:=MAX(MAX(AA1,AA2),H);
AA4:=MIN(MIN(AA1,AA2),L);
AA5:=IF(AA1 < AA2,AA3 - AA4 + AA2 - AA1,AA3 - AA4);
AA6:=IF(AA1 > AA2,AA3 - AA4 + AA1 - AA2,AA3 - AA4);
AA7:=AA5 / (AA5 + AA6) * VOL * MAX(ABS(AA1 - AA2) / (AA3 - AA4),0.15) / 10000;
AA8:=AA6 / (AA5 + AA6) * VOL * MAX(ABS(AA1 - AA2) / (AA3 - AA4),0.15) / 10000;
主力:=(AA7 - AA8) * 25000,NODRAW;
MID:=MA(CLOSE,MM);
UPPER:MID + 2*STD(C,MM),COLOR333333;
LOWER:MID - 2*STD(C,MM),COLOR333333;
多空:=STKINDI('','多空差柱.多空差',0,P1);
多空1:=STKINDI('','多空差柱.多空差',0,B1);
IF 多空>0 THEN BJ:=1;
IF 多空<0 THEN BJ:=-1;
IF 多空1>0 THEN BJ:=1;
IF 多空1<0 THEN BJ:=-1;
PARTLINE(多空>0,UPPER,COLORRED),LINETHICK2;
PARTLINE(多空<0,UPPER,COLORGREEN),LINETHICK2;
PARTLINE(多空=0,UPPER,COLORBLUE),LINETHICK2;
PARTLINE(多空1>0,LOWER,COLORRED),LINETHICK1;
PARTLINE(多空1<0,LOWER,COLORGREEN),LINETHICK1;
PARTLINE(多空1=0,LOWER,COLORBLUE),LINETHICK1;
来源:程序化99网( WWW.CXH99.COM )
博易技术人员: 老师,有点迷糊,搞不懂啊,请您帮我改一下,引用15分钟多空差柱指标的多空差,显示在布林的上轨,如果多空差大于0轴用红色标示,小于0轴用绿色表示。引用5分钟多空差柱的多空差,显示在布林下轨,如果多空差大于0轴用红色标示,小于0轴用绿色表示。谢谢,不胜感激! 多空:=STKINDI('',6,'多空差柱.多空差',0,P1);多空1:=STKINDI('',6,'多空差柱.多空差',0,B1);
数字6为需要调用的周期,数字6代表取的是日线,您可以自行调节,调节方法参数以下函数
DATAPERIOD
取当前计算的周期类型。
1-1分钟线,2-5分钟线,3-15分钟线,4-30分钟线,5-60分钟线,6-日线,7-周线,8-月线,9-年线,10-多日线,11-多分钟线,12-季线,13-3分钟线,14-走势线,15-120分钟线,16-240分钟线。
P1,B1需要您自设参数,STKINDI使用方法参照以下说明
STKINDI(Code,Period,'IDX.LINE',P1,P2,…)
引用指定品种的IDX指标的LINE输出结果。
Code为品种代码,当代码为常量时,可以动态更新该品种数据,否则只能使用本地最近保存的数据。
Period为周期类型,取值参考DATAPERIOD;
IDX为指标名称,LINE为指定输出,可以省略,默认引用第一条输出;
P1之后为指标参数,最多16个,可以省略,默认使用指标公式对应周期的参数。
当Code=''时引用当前品种,Period=0时引用当前周期类型。
例如:
STKINDI('',0,'MACD'),表示引用当前品种当前周期MACD指标的DIF输出。
STKINDI('600000.SH',6,'MA.MA1',5,20,40),表示引用浦发银行的日线MA指标的MA1输出,指标前三个参数分别为5、20、40,其余参数使用系统设置值。
来源 程序化久久网
有思路,想编写各种指标公式,交易模型,选股公式,还原公式的朋友
可联系技术人员 QQ: 262069696 或微信号:cxh99cxh99 进行 有偿收费 编写!
(注:由于人数限制,QQ或微信请选择方便的一个联系我们就行,加好友时请简单备注下您的需求,否则无法通过。谢谢您!)
相关文章
-
没有相关内容