 | |  |  |
飞狐重返德军总部源码公式：
input:N(10,1,88);流通盘:FINANCE(7),LINETHICK0;
每股净资产:FINANCE(34),LINETHICK0;
每股收益:FINANCE(33),LINETHICK0;
EXPLAIN(1,(((STKNAME + STKLABEL) + 'n所属板块') + BLKNAME));
DRAWTEXT((BARPOS = SYSPARAM(2)),HIGH,BLKNAME),ALIGN4,colorFF;
Ａ:=MA(CLOSE,5);
A1:=MA(CLOSE,20);
生命线:=MA(CLOSE,10);
取舍线:=1;
VAR1:=(((CLOSE - MA(CLOSE,30)) / MA(CLOSE,30)) * 100);
VAR2:=((CLOSE > OPEN) AND ((OPEN - LOW) > (HIGH - CLOSE)));
VAR3:=((REF(VAR1,1) < (0 - 20)) AND VAR2);
VAR4:=(((REF(VAR1,1) < (0 - 20)) AND (CLOSE > OPEN)) AND ((((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)) * 1000) > 20));
VAR5:=FILTER((VAR3 OR VAR4),3);
VAR6:=((OPEN > CLOSE) AND ((HIGH - IF((CLOSE > OPEN),CLOSE,OPEN)) > (IF((OPEN < CLOSE),OPEN,CLOSE) - LOW)));
VAR7:=((REF(VAR1,1) > ABS((0 - 20))) AND VAR6);
VAR8:=(((REF(VAR1,1) > ABS((0 - 20))) AND (CLOSE < OPEN)) AND ((((REF(CLOSE,1) - CLOSE) / REF(CLOSE,1)) * 1000) > 20));
VAR9:=FILTER((VAR7 OR VAR8),3);
VARA:=((CLOSE > OPEN) AND ((OPEN - LOW) > (HIGH - CLOSE)));
VARB:=((REF(VAR1,1) < (0 - 13)) AND VAR2);
VARC:=(((REF(VAR1,1) < (0 - 13)) AND (CLOSE > OPEN)) AND ((((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)) * 1000) > 20));
VARD:=FILTER((VARB OR VARC),3);
VARE:=((OPEN > CLOSE) AND ((HIGH - IF((CLOSE > OPEN),CLOSE,OPEN)) > (IF((OPEN < CLOSE),OPEN,CLOSE) - LOW)));
VARF:=((REF(VAR1,1) > ABS((0 - 13))) AND VAR6);
VAR10:=(((REF(VAR1,1) > ABS((0 - 13))) AND (CLOSE < OPEN)) AND ((((REF(CLOSE,1) - CLOSE) / REF(CLOSE,1)) * 1000) > 20));
VAR11:=FILTER((VARF OR VAR10),3);
VAR9:=IF(((YEAR > 2004) AND (MONTH > 9)),0,VAR9);
取舍线:=IF(((YEAR > 2004) AND (MONTH > 9)),0,取舍线);
VAR11:=IF(((YEAR > 2004) AND (MONTH > 9)),0,VAR11);
VAR11,LINETHICK0;
VAR9,LINETHICK0;
取舍线,LINETHICK0;
DRAWICON(((VAR9 * 取舍线) > 0),HIGH,2);
DRAWTEXT(((VAR11 * 取舍线) > 0),(0.99 * REF(CLOSE,1)),''),colorFFFF00;
VAR12:=BARSLAST(REF(CROSS("RSI.RSI1","RSI.RSI2"),1));
A3:=(((REF(CLOSE,(VAR12 + 1)) > CLOSE) AND (REF("RSI.RSI1",(VAR12 + 1)) < "RSI.RSI1")) AND CROSS("RSI.RSI1","RSI.RSI2"));
A3:=IF(((YEAR > 2004) AND (MONTH > 9)),0,A3);
A3,LINETHICK0;
DRAWICON(FILTER((A3 > 0),5),(LOW * 0.98),1);
DRAWTEXT(FILTER((A3 > 0),5),(LOW * 0.98),''),colorFFFF;
B3:=ISLASTBAR;
V1:=(REF(HIGH,N) = HHV(HIGH,((2 * N) + 1)));
V2:=FILTER(V1,N);
V3:=BACKSET(V2,(N + 1));
V4:=FILTER(V3,N);
V5:=(V4 OR B3);
V6:=(REF(LOW,N) = LLV(LOW,((2 * N) + 1)));
V7:=FILTER(V6,N);
V8:=BACKSET(V7,(N + 1));
V9:=FILTER(V8,N);
VA:=(V9 AND NOT(V4));
VB:=BACKSET(V5,(REF(BARSLAST(VA),1) + 1));
VC:=(VB > REF(VB,1));
VD:=BACKSET(VC,2);
VE:=(VD > REF(VD,1));
VF:=BACKSET((VE AND (COUNT(V5,(REF(BARSLAST(VA),1) + 2)) = 0)),(REF(BARSLAST(VA),1) + 2));
V10:=(VF > REF(VF,1));
V11:=BACKSET((V10 AND (COUNT(V5,(REF(BARSLAST(VA),1) + 2)) = 0)),(REF(BARSLAST(VA),1) + 2));
V12:=(V11 > REF(V11,1));
V13:=IF(V5,COUNT(VA,(REF(BARSLAST(V5),1) + 1)),0);
V14:=IF(((V13 = 1) AND V5),BARSLAST(VE),0);
V15:=IF((V5 AND (REF(LOW,BARSLAST(VE)) >= REF(LOW,BARSLAST(V10)))),BARSLAST(V10),BARSLAST(VE));
V16:=IF(((V13 = 2) AND V5),V15,0);
V17:=IF(((V13 >= 3) AND V5),IF((V5 AND (REF(LOW,V15) >= REF(LOW,BARSLAST(V12)))),BARSLAST(V12),V15),0);
V18:=((V14 + V16) + V17);
V19:=BACKSET(V5,V18);
V1A:=(V19 > REF(V19,1));
V1B:=BACKSET(V1A,2);
V1C:=(V1B > REF(V1B,1));
V1D:=(V1C OR B3);
V1E:=BACKSET(V1D,(REF(BARSLAST(V5),1) + 1));
V1F:=(V1E > REF(V1E,1));
V20:=BACKSET(V1F,2);
V21:=(V20 > REF(V20,1));
V22:=BACKSET((V21 AND (COUNT(V1D,(REF(BARSLAST(V5),1) + 2)) = 0)),(REF(BARSLAST(V5),1) + 2));
V23:=(V22 > REF(V22,1));
V24:=BACKSET((V23 AND (COUNT(V1D,(REF(BARSLAST(V5),1) + 2)) = 0)),(REF(BARSLAST(V5),1) + 2));
V25:=(V24 > REF(V24,1));
V26:=IF(V1D,COUNT(V4,(REF(BARSLAST(V1D),1) + 1)),0);
V27:=IF(((V26 = 1) AND V1D),BARSLAST(V21),0);
V28:=IF((V1D AND (REF(HIGH,BARSLAST(V21)) <= REF(HIGH,BARSLAST(V23)))),BARSLAST(V23),BARSLAST(V21));
V29:=IF(((V26 = 2) AND V1D),V28,0);
V2A:=IF(((V26 >= 3) AND V1D),IF((V1D AND (REF(HIGH,V28) <= REF(HIGH,BARSLAST(V25)))),BARSLAST(V25),V28),0);
V2B:=((V27 + V29) + V2A);
V2C:=BACKSET(V1D,V2B);
V2D:=(V2C > REF(V2C,1));
V2E:=BACKSET(V2D,2);
V2F:=(V2E > REF(V2E,1));
DRAWLINE(V1C,LOW,V2F,HIGH,0),LINETHICK1;
DRAWLINE(V2F,HIGH,V1C,LOW,0),LINETHICK1;
V30:=BACKSET(B3,(BARSLAST(V1C) + 1));
V31:=(V30 > REF(V30,1));
V32:=BACKSET(B3,(BARSLAST(V2F) + 1));
V33:=(V32 > REF(V32,1));
V34:=IF((BARSLAST(V31) < BARSLAST(V33)),V31,V33);
V35:=IF((BARSLAST(V31) < BARSLAST(V33)),LOW,HIGH);
DRAWLINE(V34,V35,B3,CLOSE,0),LINETHICK1;
V36:=BACKSET(B3,(BARSLAST(V1C) + 1));
V37:=(V36 > REF(V36,1));
V38:=BACKSET(V37,(REF(BARSLAST(V1C),1) + 2));
V39:=(V38 > REF(V38,1));
DRAWLINE(V39,LOW,V37,LOW,1),POINTDOT,LINETHICK1,colorFFFF;
V3A:=BACKSET(B3,(BARSLAST(V2F) + 1));
V3B:=(V3A > REF(V3A,1));
V3C:=BACKSET(V3B,(REF(BARSLAST(V2F),1) + 2));
V3D:=(V3C > REF(V3C,1));
DRAWLINE(V3D,HIGH,V3B,HIGH,1),POINTDOT,LINETHICK1,colorFFFF;
XX1:REF(LOW,BARSLAST(V37)),LINETHICK2,colorCCFF99;
前低线:REF(LOW,BARSLAST(V39)),LINETHICK2,colorFF00FF;
YY1:REF(HIGH,BARSLAST(V3B)),LINETHICK2,colorCCFF99;
前高线:REF(HIGH,BARSLAST(V3D)),LINETHICK2,colorFF00FF;
DRAWNUMBER(ISLASTBAR,YY1,YY1,2);
DRAWNUMBER(ISLASTBAR,XX1,XX1,2);
DRAWNUMBER(ISLASTBAR,前低线,前低线,2);
DRAWNUMBER(ISLASTBAR,前高线,前高线,2);
V3E:=(REF(HIGH,N) = HHV(HIGH,((2 * N) + 1)));
J:=FILTER(V3E,N);
JA:=BACKSET(J,(N + 1));
BB:=FILTER(JA,N);
V3E:=(BB OR ISLASTBAR);
J1:=(REF(LOW,N) = LLV(LOW,((2 * N) + 1)));
J2:=FILTER(J1,N);
JA2:=BACKSET(J2,(N + 1));
BB2:=FILTER(JA2,N);
J1:=(BB2 AND NOT(BB));
J22:=BACKSET(V3E,(REF(BARSLAST(J1),1) + 1));
EA:=(J22 > REF(J22,1));
EB:=BACKSET(EA,2);
JF:=(EB > REF(EB,1));
JJ1:=BACKSET((JF AND (COUNT(V3E,(REF(BARSLAST(J1),1) + 2)) = 0)),(REF(BARSLAST(J1),1) + 2));
JF2:=(JJ1 > REF(JJ1,1));
JJ2:=BACKSET((JF2 AND (COUNT(V3E,(REF(BARSLAST(J1),1) + 2)) = 0)),(REF(BARSLAST(J1),1) + 2));
JF3:=(JJ2 > REF(JJ2,1));
JJ3:=IF(V3E,COUNT(J1,(REF(BARSLAST(V3E),1) + 1)),0);
JS:=IF(((JJ3 = 1) AND V3E),BARSLAST(JF),0);
G1:=IF((V3E AND (REF(LOW,BARSLAST(JF)) >= REF(LOW,BARSLAST(JF2)))),BARSLAST(JF2),BARSLAST(JF));
GA:=IF(((JJ3 = 2) AND V3E),G1,0);
G2:=IF(((JJ3 >= 3) AND V3E),IF((V3E AND (REF(LOW,G1) >= REF(LOW,BARSLAST(JF3)))),BARSLAST(JF3),G1),0);
G3:=((JS + GA) + G2);
J:=BACKSET(V3E,G3);
GG:=(J > REF(J,1));
JB:=BACKSET(GG,2);
JJ:=(JB > REF(JB,1));
LD:=(JJ OR ISLASTBAR);
LD1:=BACKSET(LD,(REF(BARSLAST(V3E),1) + 1));
HEA:=(LD1 > REF(LD1,1));
HEB:=BACKSET(HEA,2);
HJF:=(HEB > REF(HEB,1));
HJJ1:=BACKSET((HJF AND (COUNT(LD,(REF(BARSLAST(V3E),1) + 2)) = 0)),(REF(BARSLAST(V3E),1) + 2));
HJF2:=(HJJ1 > REF(HJJ1,1));
HJJ2:=BACKSET((HJF2 AND (COUNT(LD,(REF(BARSLAST(V3E),1) + 2)) = 0)),(REF(BARSLAST(V3E),1) + 2));
HJF3:=(HJJ2 > REF(HJJ2,1));
HJJ3:=IF(LD,COUNT(BB,(REF(BARSLAST(LD),1) + 1)),0);
HJS:=IF(((HJJ3 = 1) AND LD),BARSLAST(HJF),0);
HG1:=IF((LD AND (REF(HIGH,BARSLAST(HJF)) <= REF(HIGH,BARSLAST(HJF2)))),BARSLAST(HJF2),BARSLAST(HJF));
HGA:=IF(((HJJ3 = 2) AND LD),HG1,0);
HG2:=IF(((HJJ3 >= 3) AND LD),IF((LD AND (REF(HIGH,HG1) <= REF(HIGH,BARSLAST(HJF3)))),BARSLAST(HJF3),HG1),0);
HG3:=((HJS + HGA) + HG2);
HGG:=BACKSET(LD,HG3);
HJA:=(HGG > REF(HGG,1));
HJB:=BACKSET(HJA,2);
HJJ:=(HJB > REF(HJB,1));
HD:=BACKSET(ISLASTBAR,(BARSLAST(JJ) + 1));
UU:=(10 * (HD > REF(HD,1)));
VV:=BACKSET(ISLASTBAR,(BARSLAST(HJJ) + 1));
UU2:=(20 * (VV > REF(VV,1)));
VV2:=REF(LOW,BARSLAST(JJ));
底1:=REF(HIGH,BARSLAST(HJJ));
STICKLINE(HJJ,底1,VV2,0,0),LINETHICK1,color660099;
DRAWLINE(JJ,LOW,HJJ,HIGH,0),LINETHICK1,color660099;
DRAWLINE(JJ,LOW,HJJ,VV2,0),LINETHICK1,color660099;
STICKLINE(JJ,底1,VV2,0,0),LINETHICK1,color666666;
DRAWLINE(HJJ,HIGH,JJ,LOW,0),LINETHICK1,color666666;
DRAWLINE(HJJ,HIGH,JJ,底1,0),LINETHICK1,color666666;
底价线:REF(LOW,BARSLAST(UU)),LINETHICK2,colorFF;
顶价线:REF(HIGH,BARSLAST(UU2)),LINETHICK2,colorFF00; |
| |  | |  |
|
