同花顺OSC振荡器未加密选股指标公式源码

同花顺OSC振荡器未加密选股指标公式源码

源码正文：

P1=5;
P2=35;
ma1:=MA((HIGH+LOW)/2,P1);
MA2:=MA((HIGH+LOW)/2,P2);
OSC:MA1-MA2,LINETHICK0;
UPO:=IF(OSC>=0,OSC,DTSCSYL);
UP: ema(UPO,P2+P1/1.618),COLORff00ff;
DNO:=IF(OSC<=0,OSC,DTSCSYL);
DN: EMA(DNO,P2+P1/1.618),COLOr009fff;
stICKLINE( OSC>=REF(OSC,1), 0, OSC, 1, 0),colorred;
STICKLINE( OSC<=REF(OSC,1), 0, OSC, 1, 0),COLORbbdD00;

同花顺自用经典MACD未加密选股指标公式源码

源码正文：

DRAWGBKLAst(C>0,STRIP(RGB(145,145,185),RGB(140,140,180),1));
N1:=10; N2:=22; M:=7.5;
dif:(ema(C,N1)-Ema(C,N2))/(1+EMA(Abs(C),512))*7.5,COLOR0000FF;
DEA:EMA(DIF,M),COLOR09FFFF;
macd:=2*(DIF-DEA),COLORSTICK;
PARTLINE(DIF,DIF>=REF(DIF,1),RGB(250,0,0),DIF<REF(DIF,1),RGB(0,0,250)),linethick1;
均衡:SMA(DIF,4,2),Color00FF00,LINETHICK1;
随行:IF(MacD< 0,MACD,0),ColorFFFFFF,LINETHICK1;
D2:=MACD;
STICKLINE(D2<REF(D2,1)AND D2>0,0,D2,5,0),Color979700;
STICKLINE(D2<REF(D2,1)AND D2>0,0,D2,4,0),ColorB5B500;
STICKLINE(D2<REF(D2,1)AND D2>0,0,D2,3,0),ColorD2D200;//兰
STICKLINE(D2<REF(D2,1)AND D2<0,0,D2,5,0),Color974B00;
STICKLINE(D2<REF(D2,1)AND D2<0,0,D2,4,0),ColorB55A00;
STICKLINE(D2<REF(D2,1)AND D2<0,0,D2,3,0),ColorD26900;//蓝
STICKLINE(D2>REF(D2,1)AND D2,0,D2,5,0),Color97004B;
STICKLINE(D2>REF(D2,1)AND D2,0,D2,4,0),ColorB5005A;
STICKLINE(D2>REF(D2,1)AND D2,0,D2,3,0),ColorD20069;//紫
STICKLINE(D2>REF(D2,1)AND D2>0,0,D2,5,0),Color970097;
STICKLINE(D2>REF(D2,1)AND D2>0,0,D2,4,0),ColorB500B5;
STICKLINE(D2>REF(D2,1)AND D2>0,0,D2,3,0),ColorD200D2;//粉
VAR1:=(EMA(C,N1)-REF(EMA(C,N1),1))/REF(EMA(C,N1),1);
VAR2:=(EMA(C,N2)-REF(EMA(C,N2),1))/REF(EMA(C,N2),1);
STICKLINE(VAR1>=VAR2 AND VAR2>0 AND C>EMA(C,N2),0,MACD,5,1),COLOR000066;
STICKLINE(VAR1>=VAR2 AND VAR2>0 AND C>EMA(C,N2),0,MACD,4,1),COLOR000077;
STICKLINE(VAR1>=VAR2 AND VAR2>0 AND C>EMA(C,N2),0,MACD,3,1),COLOR000099;
A:=MACD>0;
绿柱数:=BArslAST(A)=5;
STICKLINE(绿柱数>REF(D2,1)AND 绿柱数>=0,0,D2,5,0),COLOR00AA00;
STICKLINE(绿柱数>REF(D2,1)AND 绿柱数>=0,0,D2,4,0),COLOR00CC00;
STICKLINE(绿柱数>REF(D2,1)AND 绿柱数>=0,0,D2,3,0),COLOR00EE00;//绿柱
OSC:=100*(CLOSE-MA(CLOSE,11.5));
MaoSC:=EMA(OSC,4.5);
STICKLINE(MACD<REF(MACD,1)AND crOSS(MAOSC,OSC),0,MACD,5,0),COLORFF0000;
STICKLINE(MACD>REF(MACD,1)AND CROSS(OSC,MAOSC),0,MACD,5,0),COLOR09FFFF;