 | |  |  |
飞狐牛熊强度源码公式：
DRAWGBK((CLOSE > 0),COLORRGB(94,84,4),COLORRGB(255,255,107),1);
阳:=IF(((CLOSE > REF(CLOSE,1)) OR (REF((CLOSE < OPEN),1) AND (CLOSE = OPEN))),((VOL / CAPITAL) * 100),0);
阴:=IF(((CLOSE < REF(CLOSE,1)) OR (REF((CLOSE > OPEN),1) AND (CLOSE = OPEN))),((VOL / CAPITAL) * 100),0);
牛1:=SUM(阳,3);
红B:=SUM(阳,7);
红C:=SUM(阳,13);
红D:=SUM(阳,21);
熊1:=SUM(阴,3);
绿B:=SUM(阴,7);
绿C:=SUM(阴,13);
绿D:=SUM(阴,21);
K1:=BACKSET((BARSCOUNT(CLOSE) = SYSPARAM(1)),牛1);
K2:=BACKSET((BARSCOUNT(CLOSE) = SYSPARAM(1)),红B);
K3:=BACKSET((BARSCOUNT(CLOSE) = SYSPARAM(1)),红C);
K4:=BACKSET((BARSCOUNT(CLOSE) = SYSPARAM(1)),红D);
J1:=BACKSET((BARSCOUNT(CLOSE) = SYSPARAM(1)),熊1);
J2:=BACKSET((BARSCOUNT(CLOSE) = SYSPARAM(1)),绿B);
J3:=BACKSET((BARSCOUNT(CLOSE) = SYSPARAM(1)),绿C);
J4:=BACKSET((BARSCOUNT(CLOSE) = SYSPARAM(1)),绿D);
STICKLINE(K4,50,100,10,0),color330066;
STICKLINE(K3,50,100,10,0),color330088;
STICKLINE(K2,50,100,10,0),color3300CC;
STICKLINE(K1,50,100,10,0),colorFF;
STICKLINE(J4,0,50,10,0),color6600;
STICKLINE(J3,0,50,10,0),color8800;
STICKLINE(J2,0,50,10,0),colorCC00;
STICKLINE(J1,0,50,10,0),colorFF00;
DRAWTEXT(((K1 = 1) AND (REF(K1,1) = 0)),100,'★'),colorFFFF;
A:=(BARSCOUNT(CLOSE) = SYSPARAM(1));
牛:((牛1 + 红B) * 2),LINETHICK0,colorFF;
熊:((熊1 + 绿B) * 2),LINETHICK0,colorDD00;
牛熊强度:(ABS(((牛1 + 红B) - (熊1 + 绿B))) * 1),LINETHICK0,colorFFFFFF;
T1:=IF((牛 > 100),(牛 - (牛 - 100)),牛);
T2:=IF((熊 > 100),(熊 - (熊 - 100)),熊);
T3:=IF(((牛 - 熊) > 0),牛熊强度,(0 - 牛熊强度));
STICKLINE((A AND T1),T1,0,32,0),SHIFT4,colorFF;
DRAWICON((A AND T1),T1,12),SHIFT4;
STICKLINE((A AND T2),T2,0,18,0),SHIFT4,colorDD00;
DRAWICON((A AND T2),T2,11),SHIFT4;
STICKLINE((A AND (T3 > 0)),T3,0,12,0),SHIFT4,colorFFFFFF;
STICKLINE((A AND (T3 < 0)),ABS(T3),0,12,1),SHIFT4,colorFFFFFF;
STICKLINE((A AND (T3 > 0)),(T3 + 1),(T3 - 1),60,0),SHIFT4,colorFFFFFF;
STICKLINE((A AND (T3 < 0)),(ABS(T3) + 1),(ABS(T3) - 1),60,1),SHIFT4,color10000000;
DRAWTEXT((A AND (牛 > REF(牛,1))),85,'↑'),colorFFFFFF;
DRAWTEXT((A AND (牛 < REF(牛,1))),85,'↑'),colorFFFFFF;
DRAWTEXT((A AND (熊 > REF(熊,1))),40,'↓'),colorAA00;
DRAWTEXT((A AND (熊 < REF(熊,1))),40,'↓'),colorAA00;
DRAWNUMBER(A,80,牛,2),ALIGN2,colorFFFF;
DRAWNUMBER(A,40,熊,2),ALIGN2,colorFFFFFF;
L1:=(((CLOSE - LLV(LOW,14)) / (HHV(HIGH,14) - LLV(LOW,14))) * 100);
K:EMA(L1,7),colorFFFFFF;
D:EMA(K,14),color3399FF; |
| |  | |  |
|
