原文地址:文华财经期货指标模型源码作者:飘云
SS:=VALUEWHEN(DATE<>REF(DATE,1),REF(SETTLE,1));
ZT:=SS*(1+0.058); DT:=SS*(1-0.058); MA5:=MA(C,5); MA20:=MA(C,20); MA67:=MA(C,67); A:=MA67-MA5; B:=MA20-MA5; ((A<0&&CROSS(MA5,MA20))||CROSS(MA5,MA67))&&TIME<1452,BK; ((A>0&&CROSS(MA20,MA5))||CROSS(MA67,MA5))&&TIME<1452,SK; ((C>MA67&&CROSS(MA20,MA5))||(C<MA67&&CROSS(MA5,MA20))||C>=ZT||C<=DT),SP; CROSS(MA67,MA5),SP; ((C>MA67&&CROSS(MA20,MA5))||(C<MA67&&CROSS(MA5,MA20))||C>=ZT||C<=DT),BP; CROSS(MA5,MA67),BP; HH:=VALUEWHEN(DATE<>REF(DATE,1),H); LL:=VALUEWHEN(DATE<>REF(DATE,1),L); NN:=BARSLAST(DATE<>REF(DATE,1)); NN>=1&&CROSS(H,HH)&&H>MA67&&H>MA5&&MA5>MA67&&COUNT(CROSS(H,HH)&&H>MA5&&H>MA67&&MA5>MA67,NN)=1,BK; NN>=1&&CROSS(LL,L)&&L>MA67&&MA5>MA67&&COUNT(CROSS(LL,L)&&L>MA67&&MA5>MA67,NN)=1,SP; NN>=1&&CROSS(LL,L)&&L<MA67&&L<MA5&&MA5<MA67&&COUNT(CROSS(LL,L)&&L<MA5&&L<MA67&&MA5<MA67,NN)=1,SK; NN>=1&&CROSS(H,HH)&&H<MA67&&MA5<MA67&&COUNT(CROSS(H,HH)&&H<MA67&&MA5<MA67,NN)=1,BP; C<=BKPRICE-400,SP; C>=SKPRICE+400,BP; TIME>=1454,BP; TIME>=1454,SP; 《超级短线》指标 源码:
H:=HIGH; L:=LOW; A:=IF(HIGH>=REF(HIGH,1)&&HIGH>=REF(HIGH,2)&&HIGH>=REF(HIGH,3) &&HIGH>=REF(HIGH,4)&&HIGH>=REF(HIGH,5),LOW,0); B:=IF(LOW<=REF(LOW,1)&&LOW<=REF(LOW,2)&&LOW<=REF(LOW,3) &&LOW<=REF(LOW,4)&&LOW<=REF(LOW,5),HIGH,888888); P1:=IF(A>REF(L,1),REF(L,1),0); P2:=IF(A>REF(L,2)&&A<=REF(L,1),REF(L,2),0); P3:=IF(A>REF(L,3)&&A<=REF(L,1)&&A<=REF(L,2),REF(L,3),0); P4:=IF(A>REF(L,4)&&A<=REF(L,1)&&A<=REF(L,2)&&A<=REF(L,3),REF(L,4),0); P5:=IF(A>REF(L,5)&&A<=REF(L,1)&&A<=REF(L,2)&&A<=REF(L,3)&&A<=REF(L,4),REF(L,5),0); P6:=IF(A>REF(L,6)&&A<=REF(L,1)&&A<=REF(L,2)&&A<=REF(L,3)&&A<=REF(L,4)&&A<=REF(L,5),REF(L,6),0); P7:=IF(A>REF(L,7)&&A<=REF(L,1)&&A<=REF(L,2)&&A<=REF(L,3)&&A<=REF(L,4)&&A<=REF(L,5)&&A<=REF(L,6),REF(L,7),0); P8:=IF(A>REF(L,8)&&A<=REF(L,1)&&A<=REF(L,2)&&A<=REF(L,3)&&A<=REF(L,4)&&A<=REF(L,5)&&A<=REF(L,6)&&A<=REF(L,7),REF(L,8),0); P9:=IF(A>REF(L,9)&&A<=REF(L,1)&&A<=REF(L,2)&&A<=REF(L,3)&&A<=REF(L,4)&&A<=REF(L,5)&&A<=REF(L,6)&&A<=REF(L,7)&&A<=REF(L,8),REF(L,9),0); P10:=IF(A>REF(L,10)&&A<=REF(L,1)&&A<=REF(L,2)&&A<=REF(L,3)&&A<=REF(L,4)&&A<=REF(L,5)&&A<=REF(L,6)&&A<=REF(L,7)&&A<=REF(L,8)&&A<=REF(L,9),REF(L,10),0); AA:=P1+P2+P3+P4+P5+P6+P7+P8+P9+P10; PP1:=IF(AA>REF(L,1),REF(L,1),0); PP2:=IF(AA>REF(L,2)&&AA<=REF(L,1),REF(L,2),0); PP3:=IF(AA>REF(L,3)&&AA<=REF(L,1)&&AA<=REF(L,2),REF(L,3),0); PP4:=IF(AA>REF(L,4)&&AA<=REF(L,1)&&AA<=REF(L,2)&&AA<=REF(L,3),REF(L,4),0); PP5:=IF(AA>REF(L,5)&&AA<=REF(L,1)&&AA<=REF(L,2)&&AA<=REF(L,3)&&AA<=REF(L,4),REF(L,5),0); PP6:=IF(AA>REF(L,6)&&AA<=REF(L,1)&&AA<=REF(L,2)&&AA<=REF(L,3)&&AA<=REF(L,4)&&AA<=REF(L,5),REF(L,6),0); PP7:=IF(AA>REF(L,7)&&AA<=REF(L,1)&&AA<=REF(L,2)&&AA<=REF(L,3)&&AA<=REF(L,4)&&AA<=REF(L,5)&&AA<=REF(L,6),REF(L,7),0); PP8:=IF(AA>REF(L,8)&&AA<=REF(L,1)&&AA<=REF(L,2)&&AA<=REF(L,3)&&AA<=REF(L,4)&&AA<=REF(L,5)&&AA<=REF(L,6)&&AA<=REF(L,7),REF(L,8),0); PP9:=IF(AA>REF(L,9)&&AA<=REF(L,1)&&AA<=REF(L,2)&&AA<=REF(L,3)&&AA<=REF(L,4)&&AA<=REF(L,5)&&AA<=REF(L,6)&&AA<=REF(L,7)&&AA<=REF(L,8),REF(L,9),0); PP10:=IF(AA>REF(L,10)&&AA<=REF(L,1)&&AA<=REF(L,2)&&AA<=REF(L,3)&&AA<=REF(L,4)&&AA<=REF(L,5)&&AA<=REF(L,6)&&AA<=REF(L,7)&&AA<=REF(L,8)&&AA<=REF(L,9),REF(L,10),0); AAA:=PP1+PP2+PP3+PP4+PP5+PP6+PP7+PP8+PP9+PP10; C:=VALUEWHEN(AAA>0,AAA); T1:=IF(B<REF(H,1),REF(H,1),0); T2:=IF(B<REF(H,2)&&B>=REF(H,1),REF(H,2),0); T3:=IF(B<REF(H,3)&&B>=REF(H,1)&&B>=REF(H,2),REF(H,3),0); T4:=IF(B<REF(H,4)&&B>=REF(H,1)&&B>=REF(H,2)&&B>=REF(H,3),REF(H,4),0); T5:=IF(B<REF(H,5)&&B>=REF(H,1)&&B>=REF(H,2)&&B>=REF(H,3)&&B>=REF(H,4),REF(H,5),0); T6:=IF(B<REF(H,6)&&B>=REF(H,1)&&B>=REF(H,2)&&B>=REF(H,3)&&B>=REF(H,4)&&B>=REF(H,5),REF(H,6),0); T7:=IF(B<REF(H,7)&&B>=REF(H,1)&&B>=REF(H,2)&&B>=REF(H,3)&&B>=REF(H,4)&&B>=REF(H,5)&&B>=REF(H,6),REF(H,7),0); T8:=IF(B<REF(H,8)&&B>=REF(H,1)&&B>=REF(H,2)&&B>=REF(H,3)&&B>=REF(H,4)&&B>=REF(H,5)&&B>=REF(H,6)&&B>=REF(H,7),REF(H,8),0); T9:=IF(B<REF(H,9)&&B>=REF(H,1)&&B>=REF(H,2)&&B>=REF(H,3)&&B>=REF(H,4)&&B>=REF(H,5)&&B>=REF(H,6)&&B>=REF(H,7)&&B>=REF(H,8),REF(H,9),0); T10:=IF(B<REF(H,10)&&B>=REF(H,1)&&B>=REF(H,2)&&B>=REF(H,3)&&B>=REF(H,4)&&B>=REF(H,5)&&B>=REF(H,6)&&B>=REF(H,7)&&B>=REF(H,8)&&B>=REF(H,9),REF(H,10),0); BB:=IF((T1+T2+T3+T4+T5+T6+T7+T8+T9+T10)=0,888888,T1+T2+T3+T4+T5+T6+T7+T8+T9+T10); TT1:=IF(BB<REF(H,1),REF(H,1),0); TT2:=IF(BB<REF(H,2)&&BB>=REF(H,1),REF(H,2),0); TT3:=IF(BB<REF(H,3)&&BB>=REF(H,1)&&BB>=REF(H,2),REF(H,3),0); TT4:=IF(BB<REF(H,4)&&BB>=REF(H,1)&&BB>=REF(H,2)&&BB>=REF(H,3),REF(H,4),0); TT5:=IF(BB<REF(H,5)&&BB>=REF(H,1)&&BB>=REF(H,2)&&BB>=REF(H,3)&&BB>=REF(H,4),REF(H,5),0); TT6:=IF(BB<REF(H,6)&&BB>=REF(H,1)&&BB>=REF(H,2)&&BB>=REF(H,3)&&BB>=REF(H,4)&&BB>=REF(H,5),REF(H,6),0); TT7:=IF(BB<REF(H,7)&&BB>=REF(H,1)&&BB>=REF(H,2)&&BB>=REF(H,3)&&BB>=REF(H,4)&&BB>=REF(H,5)&&BB>=REF(H,6),REF(H,7),0); TT8:=IF(BB<REF(H,8)&&BB>=REF(H,1)&&BB>=REF(H,2)&&BB>=REF(H,3)&&BB>=REF(H,4)&&BB>=REF(H,5)&&BB>=REF(H,6)&&BB>=REF(H,7),REF(H,8),0); TT9:=IF(BB<REF(H,9)&&BB>=REF(H,1)&&BB>=REF(H,2)&&BB>=REF(H,3)&&BB>=REF(H,4)&&BB>=REF(H,5)&&BB>=REF(H,6)&&BB>=REF(H,7)&&BB>=REF(H,8),REF(H,9),0); TT10:=IF(BB<REF(H,10)&&BB>=REF(H,1)&&BB>=REF(H,2)&&BB>=REF(H,3)&&BB>=REF(H,4)&&BB>=REF(H,5)&&BB>=REF(H,6)&&BB>=REF(H,7)&&BB>=REF(H,8)&&BB>=REF(H,9),REF(H,10),0); BBB:=TT1+TT2+TT3+TT4+TT5+TT6+TT7+TT8+TT9+TT10; D:=VALUEWHEN(BBB>0,BBB); UD:=IF(CLOSE>D&&REF(CLOSE,1)<=D,1,IF(CLOSE<C&&REF(CLOSE,1)>=C,-3,0)); K:=VALUEWHEN(UD<>0,UD); G:=IF(K=1,C,D),COLORRED; POLYLINE(LOW>0,G,COLORYELLOW); G1:=VALUEWHEN(ISLASTBAR,G); DRAWNUMBER(LOW>0,G1,G1,0,COLORYELLOW); TMP:=-K; DRAWLINE(TMP>0.00001,HIGH,TMP>0.00001,OPEN,COLORCYAN); DRAWLINE(TMP>0.00001,LOW,TMP>0.00001,CLOSE,COLORCYAN); DRAWLINE(TMP<-0.00001,HIGH,TMP<-0.00001,CLOSE,COLORRED); DRAWLINE(TMP<-0.00001,LOW,TMP<-0.00001,OPEN,COLORRED); DRAWLINE(ABS(TMP)<0.00001,LOW,ABS(TMP)<0.00001,OPEN,COLORWHITE); DRAWLINE(ABS(TMP)<0.00001,HIGH,ABS(TMP)<0.00001,OPEN,COLORWHITE); STICKLINE(TMP>0,OPEN,CLOSE,COLORCYAN,0); STICKLINE(TMP<=0,OPEN,CLOSE,COLORRED,1); 《PP》模型源码:
TB:=IF(HIGH>REF(CLOSE,1),HIGH-REF(CLOSE,1)+CLOSE-LOW,CLOSE-LOW); TS:=IF(REF(CLOSE,1)>LOW,REF(CLOSE,1)-LOW+HIGH-CLOSE,HIGH-CLOSE); VOL1:=(TB-TS)*VOL/(TB+TS)/10000; VOL0:=DMA(VOL1,0.07); VOL2:=DMA(VOL1,0.01); SHORT:=VOL0-VOL2,COLORSTICK; MA1:=MA(SHORT,N); CROSS(SHORT,MA1),BPK; CROSS(MA1,SHORT),SPK; R系统 模型源码 对于R系统模型,我个人进行了一下修改:
TR:=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW)); CROSS(ZZ,RR),SPK; 《伊凡多空》模型 源码: 《郑糖领航》模型源码: 三分钟专用 模型源码:
A:=MA(HIGH-OPEN,4); CLOSE>OPEN+A*1.8&&TIME>=0800,BK; CLOSE>OPEN+A*1.8||TIME=1457,BP; CLOSE<OPEN-A*1.8&&TIME>=0800,SK; CLOSE<OPEN-A*1.8||TIME=1457,SP; 财富铜 模型源码:
[N1,1.000000,50.000000,18.000000] UP:=REF(HHV(HIGH,N1),1); DOWN:=REF(LLV(LOW,N1),1); Y:=UP-DOWN; A:=UP*0.001/2; AUP:=UP+A; ADOWN:=DOWN-A; UP1:=IF(Y/UP<0.0045,AUP,UP); DOWN1:=IF(Y/UP<0.0045,ADOWN,DOWN); Z:=REF(HHV(HIGH,1),1); T:=REF(LLV(LOW,1),1); HIGH>UP1&&TIME>0959&&TIME<1424&&Z<>T,BK; DOWN1>LOW&&TIME>0959&&TIME<1424&&Z<>T,SK; HIGH>UP1||TIME>1456||Z=T,BP; DOWN1>LOW||TIME>1456||Z=T,SP; 《新办 》模型源码:
H:=HIGH; L:=LOW; HH1:=IF(H<REF(H,2)&&REF(H,1)<REF(H,2),REF(H,2),0); LL1:=IF(L>REF(L,2)&&REF(L,1)>REF(L,2),REF(L,2),0); HH2:=VALUEWHEN(HH1>0,HH1); LL2:=VALUEWHEN(LL1>0,LL1); K1:=IF(CLOSE>HH2,-3,IF(CLOSE<LL2,1,0)); K2:=VALUEWHEN(K1<>0,K1); G:=IF(K2=1,HH2,LL2); G1:=VALUEWHEN(ISLASTBAR,G); W1:=K2; W1>0,SPK; W1<=0,BPK; 《波段台阶》 指标 源码: 顶的人越多,发的模型越好
[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); 《盈利模式》模型源码:
H:=HIGH; L:=LOW; HH1:=IF(H<REF(H,2)&&REF(H,1)<REF(H,2),REF(H,2),0); LL1:=IF(L>REF(L,2)&&REF(L,1)>REF(L,2),REF(L,2),0); HH2:=VALUEWHEN(HH1>0,HH1); LL2:=VALUEWHEN(LL1>0,LL1); K1:=IF(CLOSE>HH2,-3,IF(CLOSE<LL2,1,0)); K2:=VALUEWHEN(K1<>0,K1); K2=1,SPK; K2=-3,BPK; 《铜钱》模型源码:
[N1,4.000000,4.000000,4.000000] [N2,8.000000,8.000000,8.000000] [N3,14.000000,16.000000,14.000000] [N4,19.000000,22.000000,20.000000] M5:=EMA2(HIGH,4); M10:=EMA2(HIGH,8); M15:=EMA2(HIGH,14); M20:=EMA2(HIGH,20); ZYZS:=IF((M5 > M15),M5,M15); DIFF:=EMA(HIGH,14) - EMA(HIGH,19); DEA:=EMA(DIFF,10); A:=2*(DIFF-DEA); ML5:=EMA2(LOW,N1); ML10:=EMA2(LOW,N2); ML15:=EMA2(LOW,14); ML20:=EMA2(LOW,20); ZL:=IF((ML5 > ML15),ML5,ML15); DL:=EMA(LOW,14) - EMA(LOW,19); DEAL:=EMA(DL,10); AL:=2*(DL-DEAL); TIME>0929&&TIME<1440&&M5>M10&&HIGH>M20&&A>0&&ZYZS=M5,BK; TIME>0929&&TIME<1440&&ML5<ML10&&LOW<ML20&&AL<0&&ZL<>ML5,SK; TIME>0909&&AL<0&&ML10<ML20,SP; TIME>0909&&A>0&&M10>M20,BP; |
|