请老师帮忙修改 [博易POBO]
咨询内容:
DI17:=GETPRICE1('量比');
AMOUNT:=AVPRICE*V;
FROMOPEN:=IF(HOUR<12,60*(HOUR-9)-30+MINUTE,120+60*(HOUR-13)+MINUTE);
RCB:=(COUNT(C>0,FROMOPEN)-1-MOD(COUNT(C>0,FROMOPEN)-1,10))/10+1;
RCD:=EMA(LOG10(SMA(SUM(GETPRICE1('换手%'),FROMOPEN)*2400000/RCB,3,1)),240);
RCA:=(C/GETPRICE('AVPRICE')-(MA(C/GETPRICE('AVPRICE'),55)+MA(C/GETPRICE('AVPRICE'),21)+MA(C/GETPRICE('AVPRICE'),34))/3)/MA(C/GETPRICE('AVPRICE'),3)*1200;
RCC:=2*((EMA(C,12)-EMA(C,26))*600/GETPRICE('AVPRICE')-EMA((EMA(C,12)-EMA(C,26))*600/GETPRICE('AVPRICE'),9))*10;
RAA:=SUM(AMOUNT,40)/(AMOUNT/VOL/100)/100;
RAB:=SUM(AMOUNT,80)/(AMOUNT/VOL/100)/100;
RAC:=(CLOSE-DMA((3*H+L+O+2*C)/7,VOL/RAA))/DMA((3*H+L+O+2*C)/7,VOL/RAA)*(9000/RCD);
RAD:=(CLOSE-DMA((3*H+L+O+2*C)/7,VOL/RAB))/DMA((3*H+L+O+2*C)/7,VOL/RAB)*(9000/RCD);
RBA:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1);
JXA:=IF(RAD>0,RAD-100,-100);
JXB:=IF(RAD<0,RAD+100,100);
JXC:=IF(RAC>0,RAC-100,-100);
JXD:=IF(RAC<0,RAC+100,100);
REA:=EMA(-100*(HHV(H,34)-C)/(HHV(H,34)-LLV(L,34)),3);
REB:=EMA(100-3*SMA((LLV(L,75)-C)/(HHV(H,75)-LLV(L,75))*100,18,1)+2*SMA(SMA((LLV(L,75)-C)/(HHV(H,75)-LLV(L,75))*100,18,1),15,1)-100,3);
REC:=100*(HHV(H,55)-C)/(HHV(H,55)-LLV(C,55));
RED:=(EMA(C,500)-REF(EMA(C,500),1))/REF(EMA(C,500),1)*61800;
REE:=(REA+REB-REC+50)/135;
必卖:IF(REE>0.8,REE,NULL),NODRAW,COLORLIGHTGREEN;
必买:IF(REE<-0.8,-REE,NULL),NODRAW,COLORGREEN;
危险:IF(0<=REE AND REE<=0.8,REE,NULL),NODRAW,COLORYELLOW;
机遇:IF(REE>-0.8 AND REE<0,-REE,NULL),NODRAW,COLORBLUE;
卖:IF(C>COST(86),COST(95),NULL),NODRAW,COLORLIGHTGREEN;
买:IF(C<COST(14),COST(5),NULL),NODRAW,COLORGREEN;
点:IF(RED<-1.2 OR RED>1.2,RED*0.382,NULL),NODRAW,COLORBLUE;
趋势:=(REB*2-100)/1.2,COLORWHITE,LINETHICK2;
DRAWCOLORLINE(趋势>=REF(趋势,1),趋势,COLORMAGENTA,COLORGREEN),LINETHICK6;
LRX:=((C/(SUM(V*C,FROMOPEN)/SUM(V,FROMOPEN))-1)*61.8+(C/(SUM(V*C,0)/SUM(V,0))-1)*38.2)*((C/DI11-1)*68.2+(C/EMA(C,480)-1)*38.2);
HQV1:=(COUNT(C>0,FROMOPEN)-1-MOD(COUNT(C>0,FROMOPEN)-1,10))/10+1;
HQV2:=LOG10(SMA(SUM(GETPRICE1('换手%'),FROMOPEN)*2400000/HQV1,3,1))-1;
TS9:=IF(HQV2>REF(HQV2,1),' +',IF(HQV2=REF(HQV2,1),' =',' -'));
TSA:=IF(HQV2>3.6,'A级',IF(HQV2>2.7,'B级',IF(HQV2>1.8,'C级',IF(HQV2>0.9,'D级','E级'))));
TSB:=IF(DI17>10,'A级',IF(DI17>5,'B级',IF(DI17>1.5,'C级',IF(GETPRICE1('量比')>0.8,'D级','E级'))));
TSC:=IF(GETPRICE1('量比')-REF(GETPRICE1('量比'),1)>REF(GETPRICE1('量比')-REF(GETPRICE1('量比'),1),1),' +',IF(GETPRICE1('量比')-REF(GETPRICE1('量比'),1)=REF(GETPRICE1('量比')-REF(GETPRICE1('量比'),1),1),' =',' -'));
请老师帮忙修改
DI11:=GETPRICE1('AVPRICE');DI17:=GETPRICE1('量比');
AMOUNT:=AVPRICE*V;
FROMOPEN:=IF(HOUR<12,60*(HOUR-9)-30+MINUTE,120+60*(HOUR-13)+MINUTE);
RCB:=(COUNT(C>0,FROMOPEN)-1-MOD(COUNT(C>0,FROMOPEN)-1,10))/10+1;
RCD:=EMA(LOG10(SMA(SUM(GETPRICE1('换手%'),FROMOPEN)*2400000/RCB,3,1)),240);
RCA:=(C/GETPRICE('AVPRICE')-(MA(C/GETPRICE('AVPRICE'),55)+MA(C/GETPRICE('AVPRICE'),21)+MA(C/GETPRICE('AVPRICE'),34))/3)/MA(C/GETPRICE('AVPRICE'),3)*1200;
RCC:=2*((EMA(C,12)-EMA(C,26))*600/GETPRICE('AVPRICE')-EMA((EMA(C,12)-EMA(C,26))*600/GETPRICE('AVPRICE'),9))*10;
RAA:=SUM(AMOUNT,40)/(AMOUNT/VOL/100)/100;
RAB:=SUM(AMOUNT,80)/(AMOUNT/VOL/100)/100;
RAC:=(CLOSE-DMA((3*H+L+O+2*C)/7,VOL/RAA))/DMA((3*H+L+O+2*C)/7,VOL/RAA)*(9000/RCD);
RAD:=(CLOSE-DMA((3*H+L+O+2*C)/7,VOL/RAB))/DMA((3*H+L+O+2*C)/7,VOL/RAB)*(9000/RCD);
RBA:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1);
JXA:=IF(RAD>0,RAD-100,-100);
JXB:=IF(RAD<0,RAD+100,100);
JXC:=IF(RAC>0,RAC-100,-100);
JXD:=IF(RAC<0,RAC+100,100);
REA:=EMA(-100*(HHV(H,34)-C)/(HHV(H,34)-LLV(L,34)),3);
REB:=EMA(100-3*SMA((LLV(L,75)-C)/(HHV(H,75)-LLV(L,75))*100,18,1)+2*SMA(SMA((LLV(L,75)-C)/(HHV(H,75)-LLV(L,75))*100,18,1),15,1)-100,3);
REC:=100*(HHV(H,55)-C)/(HHV(H,55)-LLV(C,55));
RED:=(EMA(C,500)-REF(EMA(C,500),1))/REF(EMA(C,500),1)*61800;
REE:=(REA+REB-REC+50)/135;
必卖:IF(REE>0.8,REE,NULL),NODRAW,COLORLIGHTGREEN;
必买:IF(REE<-0.8,-REE,NULL),NODRAW,COLORGREEN;
危险:IF(0<=REE AND REE<=0.8,REE,NULL),NODRAW,COLORYELLOW;
机遇:IF(REE>-0.8 AND REE<0,-REE,NULL),NODRAW,COLORBLUE;
卖:IF(C>COST(86),COST(95),NULL),NODRAW,COLORLIGHTGREEN;
买:IF(C<COST(14),COST(5),NULL),NODRAW,COLORGREEN;
点:IF(RED<-1.2 OR RED>1.2,RED*0.382,NULL),NODRAW,COLORBLUE;
趋势:=(REB*2-100)/1.2,COLORWHITE,LINETHICK2;
DRAWCOLORLINE(趋势>=REF(趋势,1),趋势,COLORMAGENTA,COLORGREEN),LINETHICK6;
LRX:=((C/(SUM(V*C,FROMOPEN)/SUM(V,FROMOPEN))-1)*61.8+(C/(SUM(V*C,0)/SUM(V,0))-1)*38.2)*((C/DI11-1)*68.2+(C/EMA(C,480)-1)*38.2);
HQV1:=(COUNT(C>0,FROMOPEN)-1-MOD(COUNT(C>0,FROMOPEN)-1,10))/10+1;
HQV2:=LOG10(SMA(SUM(GETPRICE1('换手%'),FROMOPEN)*2400000/HQV1,3,1))-1;
TS9:=IF(HQV2>REF(HQV2,1),' +',IF(HQV2=REF(HQV2,1),' =',' -'));
TSA:=IF(HQV2>3.6,'A级',IF(HQV2>2.7,'B级',IF(HQV2>1.8,'C级',IF(HQV2>0.9,'D级','E级'))));
TSB:=IF(DI17>10,'A级',IF(DI17>5,'B级',IF(DI17>1.5,'C级',IF(GETPRICE1('量比')>0.8,'D级','E级'))));
TSC:=IF(GETPRICE1('量比')-REF(GETPRICE1('量比'),1)>REF(GETPRICE1('量比')-REF(GETPRICE1('量比'),1),1),' +',IF(GETPRICE1('量比')-REF(GETPRICE1('量比'),1)=REF(GETPRICE1('量比')-REF(GETPRICE1('量比'),1),1),' =',' -'));
来源:程序化99网( WWW.CXH99.COM )
博易技术人员: 股票指标无法使用期货行情,例如期货就没有换手的说法。 来源 程序化久久网
有思路,想编写各种指标公式,交易模型,选股公式,还原公式的朋友
可联系技术人员 QQ: 262069696 或微信号:cxh99cxh99 进行 有偿收费 编写!
(注:由于人数限制,QQ或微信请选择方便的一个联系我们就行,加好友时请简单备注下您的需求,否则无法通过。谢谢您!)
相关文章
-
没有相关内容