修改哦 文化使用 [文华财经]
-
咨询内容:
[N,0.000000,100000.000000,225.000000]H:=HIGH;
L:=LOW;
H1:=VALUEWHEN(H>=REF(H,1)&&H>REF(H,2)&&H>REF(H,3)&&H>REF(H,4)&&H>REF(H,5)&&H>=REFX(H,1)&&H>REFX(H,2)&&H>REFX(H,3)&&H>REFX(H,4)&&H>REFX(H,5),H);
L1:=VALUEWHEN(L<=REF(L,1)&&L<REF(L,2)&&L<REF(L,3)&&L<REF(L,4)&&L<REF(L,5)&&L<=REFX(L,1)&&L<REFX(L,2)&&L<REFX(L,3)&&L<REFX(L,4)&&L<REFX(L,5),L);
H2:=BARSLAST(H>REF(H,1)&&H>REF(H,2)&&H>REF(H,3)&&H>REF(H,4)&&H>REF(H,5));
L2:=BARSLAST(L<REF(L,1)&&L<REF(L,2)&&L<REF(L,3)&&L<REF(L,4)&&L<REF(L,5));
OP:=IF(H2>L2,H1,L1);
M:=BARPOS;
K1:=VALUEWHEN(ISLASTBAR,OP);
M4:=IF(K1>=0,K1,M);
P2:=IF(M4-1=REF(M4,1),REFX(M4,1),M4);
P3:=IF(P2-1=REF(P2,1),REFX(P2,2),P2);
P4:=IF(P3-1=REF(P3,1),REFX(P3,3),P3);
P5:=IF(P4-1=REF(P4,1),REFX(P4,4),P4);
P6:=IF(P5-1=REF(P5,1),REFX(P5,5),P5);
P7:=IF(P6-1=REF(P6,1),REFX(P6,6),P6);
P8:=IF(P7-1=REF(P7,1),REFX(P7,7),P7);
P9:=IF(P8-1=REF(P8,1),REFX(P8,8),P8);
P10:=IF(P9-1=REF(P9,1),REFX(P9,9),P9);
P11:=IF(P10-1=REF(P10,1),REFX(P10,10),P10);
P12:=IF(P11-1=REF(P11,1),REFX(P11,11),P11);
P13:=IF(P12-1=REF(P12,1),REFX(P12,12),P12);
P14:=IF(P13-1=REF(P13,1),REFX(P13,13),P13);
P15:=IF(P14-1=REF(P14,1),REFX(P14,14),P14);
P16:=IF(P15-1=REF(P15,1),REFX(P15,15),P15);
P17:=IF(P16-1=REF(P16,1),REFX(P16,16),P16);
P18:=IF(P17-1=REF(P17,1),REFX(P17,17),P17);
P19:=IF(P18-1=REF(P18,1),REFX(P18,18),P18);
P20:=IF(P19-1=REF(P19,1),REFX(P19,19),P19);
P21:=IF(P20-1=REF(P20,1),REFX(P20,20),P20);
P22:=IF(P21-1=REF(P21,1),REFX(P21,21),P21);
P23:=IF(P22-1=REF(P22,1),REFX(P22,22),P22);
P24:=IF(P23-1=REF(P23,1),REFX(P23,23),P23);
P25:=IF(P24-1=REF(P24,1),REFX(P24,24),P24);
P26:=IF(P25-1=REF(P25,1),REFX(P25,25),P25);
P27:=IF(P26-1=REF(P26,1),REFX(P26,26),P26);
P28:=IF(P27-1=REF(P27,1),REFX(P27,27),P27);
P29:=IF(P28-1=REF(P28,1),REFX(P28,28),P28);
P30:=IF(P29-1=REF(P29,1),REFX(P29,29),P29);
P31:=IF(P30-1=REF(P30,1),REFX(P30,30),P30);
P32:=IF(P31-1=REF(P31,1),REFX(P31,31),P31);
P33:=IF(P32-1=REF(P32,1),REFX(P32,32),P32);
P34:=IF(P33-1=REF(P33,1),REFX(P33,33),P33);
P35:=IF(P34-1=REF(P34,1),REFX(P34,34),P34);
P36:=IF(P35-1=REF(P35,1),REFX(P35,35),P35);
P37:=IF(P36-1=REF(P36,1),REFX(P36,36),P36);
P38:=IF(P37-1=REF(P37,1),REFX(P37,37),P37);
P39:=IF(P38-1=REF(P38,1),REFX(P38,38),P38);
P40:=IF(P39-1=REF(P39,1),REFX(P39,39),P39);
P41:=IF(P40-1=REF(P40,1),REFX(P40,40),P40);
P42:=IF(P41-1=REF(P41,1),REFX(P41,41),P41);
P43:=IF(P42-1=REF(P42,1),REFX(P42,42),P42);
P44:=IF(P43-1=REF(P43,1),REFX(P43,43),P43);
P45:=IF(P44-1=REF(P44,1),REFX(P44,44),P44);
P46:=IF(P45-1=REF(P45,1),REFX(P45,45),P45);
P47:=IF(P46-1=REF(P46,1),REFX(P46,46),P46);
P48:=IF(P47-1=REF(P47,1),REFX(P47,47),P47);
P49:=IF(P48-1=REF(P48,1),REFX(P48,48),P48);
P50:=IF(P49-1=REF(P49,1),REFX(P49,49),P49);
P51:=IF(P50-1=REF(P50,1),REFX(P50,50),P50);
P52:=IF(P51-1=REF(P51,1),REFX(P51,51),P51);
P53:=IF(P52-1=REF(P52,1),REFX(P52,52),P52);
P54:=IF(P53-1=REF(P53,1),REFX(P53,53),P53);
P55:=IF(P54-1=REF(P54,1),REFX(P54,54),P54);
P56:=IF(P55-1=REF(P55,1),REFX(P55,55),P55);
P57:=IF(P56-1=REF(P56,1),REFX(P56,56),P56);
P58:=IF(P57-1=REF(P57,1),REFX(P57,57),P57);
P59:=IF(P58-1=REF(P58,1),REFX(P58,58),P58);
P60:=IF(P59-1=REF(P59,1),REFX(P59,59),P59);
P61:=IF(P60-1=REF(P60,1),REFX(P60,60),P60);
O:=IF(P61<>REF(P61,1),REFX(P61,200),P61);
F:=MOD(O*10,N)/10;
P1:=MOD(CLOSE*10,N)/10;
C:=CLOSE-P1+F;
B:=(C*10+N)/10;
A:=(C*10-N)/10;
G:=VALUEWHEN(ISLASTBAR,A);
S:=VALUEWHEN(ISLASTBAR,C);
R:=VALUEWHEN(ISLASTBAR,B);
E:=VALUEWHEN(ISLASTBAR,O);
DRAWNUMBER(G>0,G,G,0,COLORYELLOW);
DRAWNUMBER(S>0,S,S,0,COLORYELLOW);
DRAWNUMBER(R>0,R,R,0,COLORYELLOW);
DRAWNUMBER(O>0,E,E,0,COLORWHITE);
DRAWSL(O>0,C,0,1,3,COLORYELLOW);
POLYLINE(O>0,O,COLORWHITE);来源:程序化99
-
文华技术人员:
您的源码中缺少CCN的定义,给您补充上了,参考:
N:=225; CCN:=10; H1:=VALUEWHEN(H>=REF(H,1)&&H>REF(H,2)&&H>REF(H,3)&&H>REF(H,4)&&H>REF(H,5)&&H>=REFX(H,1)&&H>REFX(H,2)&&H>REFX(H,3)&&H>REFX(H,4)&&H>REFX(H,5),H); L1:=VALUEWHEN(L<=REF(L,1)&&L<REF(L,2)&&L<REF(L,3)&&L<REF(L,4)&&L<REF(L,5)&&L<=REFX(L,1)&&L<REFX(L,2)&&L<REFX(L,3)&&L<REFX(L,4)&&L<REFX(L,5),L); H2:=BARSLAST(H>REF(H,1)&&H>REF(H,2)&&H>REF(H,3)&&H>REF(H,4)&&H>REF(H,5)); L2:=BARSLAST(L<REF(L,1)&&L<REF(L,2)&&L<REF(L,3)&&L<REF(L,4)&&L<REF(L,5)); OP:=IF(H2>L2,H1,L1); M:=BARPOS; K1:=VALUEWHEN(ISLASTBAR,OP); M4:=IF(K1>=0,K1,M); P2:=IF(M4-1=REF(M4,1),REFX(M4,1),M4); P3:=IF(P2-1=REF(P2,1),REFX(P2,2),P2); P4:=IF(P3-1=REF(P3,1),REFX(P3,3),P3); P5:=IF(P4-1=REF(P4,1),REFX(P4,4),P4); P6:=IF(P5-1=REF(P5,1),REFX(P5,5),P5); P7:=IF(P6-1=REF(P6,1),REFX(P6,6),P6); P8:=IF(P7-1=REF(P7,1),REFX(P7,7),P7); P9:=IF(P8-1=REF(P8,1),REFX(P8,8),P8); P10:=IF(P9-1=REF(P9,1),REFX(P9,9),P9); P11:=IF(P10-1=REF(P10,1),REFX(P10,10),P10); P12:=IF(P11-1=REF(P11,1),REFX(P11,11),P11); P13:=IF(P12-1=REF(P12,1),REFX(P12,12),P12); P14:=IF(P13-1=REF(P13,1),REFX(P13,13),P13); P15:=IF(P14-1=REF(P14,1),REFX(P14,14),P14); P16:=IF(P15-1=REF(P15,1),REFX(P15,15),P15); P17:=IF(P16-1=REF(P16,1),REFX(P16,16),P16); P18:=IF(P17-1=REF(P17,1),REFX(P17,17),P17); P19:=IF(P18-1=REF(P18,1),REFX(P18,18),P18); P20:=IF(P19-1=REF(P19,1),REFX(P19,19),P19); P21:=IF(P20-1=REF(P20,1),REFX(P20,20),P20); P22:=IF(P21-1=REF(P21,1),REFX(P21,21),P21); P23:=IF(P22-1=REF(P22,1),REFX(P22,22),P22); P24:=IF(P23-1=REF(P23,1),REFX(P23,23),P23); P25:=IF(P24-1=REF(P24,1),REFX(P24,24),P24); P26:=IF(P25-1=REF(P25,1),REFX(P25,25),P25); P27:=IF(P26-1=REF(P26,1),REFX(P26,26),P26); P28:=IF(P27-1=REF(P27,1),REFX(P27,27),P27); P29:=IF(P28-1=REF(P28,1),REFX(P28,28),P28); P30:=IF(P29-1=REF(P29,1),REFX(P29,29),P29); P31:=IF(P30-1=REF(P30,1),REFX(P30,30),P30); P32:=IF(P31-1=REF(P31,1),REFX(P31,31),P31); P33:=IF(P32-1=REF(P32,1),REFX(P32,32),P32); P34:=IF(P33-1=REF(P33,1),REFX(P33,33),P33); P35:=IF(P34-1=REF(P34,1),REFX(P34,34),P34); P36:=IF(P35-1=REF(P35,1),REFX(P35,35),P35); P37:=IF(P36-1=REF(P36,1),REFX(P36,36),P36); P38:=IF(P37-1=REF(P37,1),REFX(P37,37),P37); P39:=IF(P38-1=REF(P38,1),REFX(P38,38),P38); P40:=IF(P39-1=REF(P39,1),REFX(P39,39),P39); P41:=IF(P40-1=REF(P40,1),REFX(P40,40),P40); P42:=IF(P41-1=REF(P41,1),REFX(P41,41),P41); P43:=IF(P42-1=REF(P42,1),REFX(P42,42),P42); P44:=IF(P43-1=REF(P43,1),REFX(P43,43),P43); P45:=IF(P44-1=REF(P44,1),REFX(P44,44),P44); P46:=IF(P45-1=REF(P45,1),REFX(P45,45),P45); P47:=IF(P46-1=REF(P46,1),REFX(P46,46),P46); P48:=IF(P47-1=REF(P47,1),REFX(P47,47),P47); P49:=IF(P48-1=REF(P48,1),REFX(P48,48),P48); P50:=IF(P49-1=REF(P49,1),REFX(P49,49),P49); P51:=IF(P50-1=REF(P50,1),REFX(P50,50),P50); P52:=IF(P51-1=REF(P51,1),REFX(P51,51),P51); P53:=IF(P52-1=REF(P52,1),REFX(P52,52),P52); P54:=IF(P53-1=REF(P53,1),REFX(P53,53),P53); P55:=IF(P54-1=REF(P54,1),REFX(P54,54),P54); P56:=IF(P55-1=REF(P55,1),REFX(P55,55),P55); P57:=IF(P56-1=REF(P56,1),REFX(P56,56),P56); P58:=IF(P57-1=REF(P57,1),REFX(P57,57),P57); P59:=IF(P58-1=REF(P58,1),REFX(P58,58),P58); P60:=IF(P59-1=REF(P59,1),REFX(P59,59),P59); P61:=IF(P60-1=REF(P60,1),REFX(P60,60),P60); OO:=IF(P61<>REF(P61,1),REFX(P61,200),P61); F:=MOD(OO*10,N)/10; P1:=MOD(CLOSE*10,N)/10; CC:=CLOSE-P1+F; B:=(CC*10+N)/10; A:=(CCN)/10; G:=VALUEWHEN(ISLASTBAR,A); S:=VALUEWHEN(ISLASTBAR,CC); R:=VALUEWHEN(ISLASTBAR,B); E:=VALUEWHEN(ISLASTBAR,OO); DRAWNUMBER(G>0,G,G,0,COLORYELLOW); DRAWNUMBER(S>0,S,S,0,COLORYELLOW); DRAWNUMBER(R>0,R,R,0,COLORYELLOW); DRAWNUMBER(OO>0,E,E,0,COLORWHITE); DRAWSL(OO>0,CC,0,1,3,COLORYELLOW); POLYLINE(OO>0,OO,COLORWHITE);
有思路,想编写各种指标公式,程序化交易模型,选股公式,预警公式的朋友
可联系技术人员 QQ: 262069696 或微信:cxhjy888 进行 有偿收费 编写!(注:由于人数限制,QQ或微信请选择方便的一个联系我们就行,谢谢您!)
相关文章
-
没有相关内容