$3倍做多生物技術ETF-Direxion (LABU.US)$ 飛流直下三千尺 疑是銀河落九天!止損不悔才算跳出韭菜田!
已翻譯
4
1
VKP:=IF(AMOUNT=0,(C+L+H+O)/4,AMOUNT/VOL);
RR:=VKP;
D1:=20;
SMD:=5;
WIDTH:=1.5;
RCCI:=(RR-MA(RR,D1))*100/(WIDTH*STDP(RR,D1));
VD:=120;
RV:=(VOL-LLV(VOL,VD))*100/(HHV(VOL,VD)-LLV(VOL,VD));
RVB:=RV*2-100;
VM:=EMA(RVB,SMD);
CCI:RCCI,COLORFF9300,NODRAW;
V%:RV,COLORFFFB00,NODRAW;
T:100,COLORLICYAN,DOTLINE;
M:0,COLORWHITE,DOTLINE;
G:-100,COLORLICYAN,DOTLINE;
X:=VKP;
Y:=REF(X,1);
STICKLINE(C>=O AND X>=Y,-100,RVB,0.2,0),COLORRED;
STICKLINE(C<O AND X>=Y,-100,RVB,0.2,0),COLORLIRED;
STICK...
RR:=VKP;
D1:=20;
SMD:=5;
WIDTH:=1.5;
RCCI:=(RR-MA(RR,D1))*100/(WIDTH*STDP(RR,D1));
VD:=120;
RV:=(VOL-LLV(VOL,VD))*100/(HHV(VOL,VD)-LLV(VOL,VD));
RVB:=RV*2-100;
VM:=EMA(RVB,SMD);
CCI:RCCI,COLORFF9300,NODRAW;
V%:RV,COLORFFFB00,NODRAW;
T:100,COLORLICYAN,DOTLINE;
M:0,COLORWHITE,DOTLINE;
G:-100,COLORLICYAN,DOTLINE;
X:=VKP;
Y:=REF(X,1);
STICKLINE(C>=O AND X>=Y,-100,RVB,0.2,0),COLORRED;
STICKLINE(C<O AND X>=Y,-100,RVB,0.2,0),COLORLIRED;
STICK...
專欄 我寫的交易分析主圖程式
VKP:=如果(成交量=0, (收盤價+最低價+最高價+開盤價)/4, 成交量/成交量);
{—-改進HEIKEN ASHI K線—}
XC:=(C+L+H+O)/4;
XO:=TMA(REF(XC,1), 0.5,0.5);
XH:=MAX(H,MAX(XC,XO));
XL:=MIN(L,MIN(XC,XO));
{—-改進HEIKEN ASHI K線—}
RR:=VKP;
D1:=20;
M1等於2倍RR的加權移動平均值的加權移動平均值減去RR的D1四捨五入後的開根號的加權移動平均值;
VM1:=EMA(RR,144);
VM2:=EMA(RR,169);
SR:= SAR(4,2,20);
NR:=CONST(C);
HL:=CONST(IF(XC≧XO,H,L));
C:C,白色,線條粗1;
C%: (NR-C)*100/C,白色,不繪製;
P: VKP,藍色,不繪製;
PH%: (VKP-M1)*100/VKP,藍色,不繪製;
H:M1,COLORL...
{—-改進HEIKEN ASHI K線—}
XC:=(C+L+H+O)/4;
XO:=TMA(REF(XC,1), 0.5,0.5);
XH:=MAX(H,MAX(XC,XO));
XL:=MIN(L,MIN(XC,XO));
{—-改進HEIKEN ASHI K線—}
RR:=VKP;
D1:=20;
M1等於2倍RR的加權移動平均值的加權移動平均值減去RR的D1四捨五入後的開根號的加權移動平均值;
VM1:=EMA(RR,144);
VM2:=EMA(RR,169);
SR:= SAR(4,2,20);
NR:=CONST(C);
HL:=CONST(IF(XC≧XO,H,L));
C:C,白色,線條粗1;
C%: (NR-C)*100/C,白色,不繪製;
P: VKP,藍色,不繪製;
PH%: (VKP-M1)*100/VKP,藍色,不繪製;
H:M1,COLORL...
已翻譯
專欄 我寫的OBV量能分析程式
VKP:=如果(成交量=0, (收盤價+最低價+最高價+開盤價)/4, 成交量/成交量);
{- - - -OBV結束- - - -}
SR:=VKP-REF(VKP,1);
如果AMOUNT大於0,則為AMOUNT,否則為VOL;
如果SR大於0,則為OBR乘以SR的正負號,否則為OBR;
{- - - -OBV結束- - - -}
RR等於OBV;
D1:=20;
M1等於2倍RR的加權移動平均值的加權移動平均值減去RR的D1四捨五入後的開根號的加權移動平均值;
NR是RR的常數;
R為RR,顏色為FF9300,不顯示;
R%:(NR-RR)*100/RR,COLORFF9300,NODRAW;
H:M1,COLORLIMAGENTA,NODRAW;
RH%:(RR-M1)*100/RR,COLORLIMAGENTA,NODRAW;
O1:=M1;
O1,COLORLIMAGENTA,LINETHICK2;
IF(O1>=REF(O1,1),O1,DRAWNULL),COLORMAGENTA,LINETHICK2;
O...
{- - - -OBV結束- - - -}
SR:=VKP-REF(VKP,1);
如果AMOUNT大於0,則為AMOUNT,否則為VOL;
如果SR大於0,則為OBR乘以SR的正負號,否則為OBR;
{- - - -OBV結束- - - -}
RR等於OBV;
D1:=20;
M1等於2倍RR的加權移動平均值的加權移動平均值減去RR的D1四捨五入後的開根號的加權移動平均值;
NR是RR的常數;
R為RR,顏色為FF9300,不顯示;
R%:(NR-RR)*100/RR,COLORFF9300,NODRAW;
H:M1,COLORLIMAGENTA,NODRAW;
RH%:(RR-M1)*100/RR,COLORLIMAGENTA,NODRAW;
O1:=M1;
O1,COLORLIMAGENTA,LINETHICK2;
IF(O1>=REF(O1,1),O1,DRAWNULL),COLORMAGENTA,LINETHICK2;
O...
已翻譯
{RSI and vol}
KD:=IF(PERIOD=14,2,IF(PERIOD=13,4,IF(PERIOD=4,7,IF(PERIOD=18,3,1))));
VDP:=IF(TOTALAMOUNT=0,IF(AMOUNT=0,(C+L+H)/3,AMOUNT/VOL),TOTALAMOUNT/TOTALVOL);
RR:=VDP;
D1:=20*KD;
LC:=RR-REF(RR,1)
TEMP1:=MAX(RR-REF(RR,1),0);
TEMP2:=ABS(RR-REF(RR,1));
RSI1S:=WMA(2*WMA(TEMP1,ROUND(D1/2))-WMA(TEMP1,D1),ROUND(SQRT(D1)))*100/WMA(2*WMA(TEMP2,ROUND(D1/2))-WMA(TEMP2,D1),ROUND(SQRT(D1)));
VD:=60*KD;
RV:=(VOL-LLV(VOL,VD))*100/(HHV(VOL,VD)-LLV(VOL,VD));
RVB:=RV;
VMD:=5*KD;
VM:=MA(RV,V...
KD:=IF(PERIOD=14,2,IF(PERIOD=13,4,IF(PERIOD=4,7,IF(PERIOD=18,3,1))));
VDP:=IF(TOTALAMOUNT=0,IF(AMOUNT=0,(C+L+H)/3,AMOUNT/VOL),TOTALAMOUNT/TOTALVOL);
RR:=VDP;
D1:=20*KD;
LC:=RR-REF(RR,1)
TEMP1:=MAX(RR-REF(RR,1),0);
TEMP2:=ABS(RR-REF(RR,1));
RSI1S:=WMA(2*WMA(TEMP1,ROUND(D1/2))-WMA(TEMP1,D1),ROUND(SQRT(D1)))*100/WMA(2*WMA(TEMP2,ROUND(D1/2))-WMA(TEMP2,D1),ROUND(SQRT(D1)));
VD:=60*KD;
RV:=(VOL-LLV(VOL,VD))*100/(HHV(VOL,VD)-LLV(VOL,VD));
RVB:=RV;
VMD:=5*KD;
VM:=MA(RV,V...
專欄 我写的VWAP
{VWAP}
RVWAP:=IF(TOTALAMOUNT=0,IF(AMOUNT=0,(C+L+H)/3,AMOUNT/VOL),TOTALAMOUNT/TOTALVOL);
VWAP:RVWAP,COLORBLUE,NODRAW;
O0:=RVWAP;
O0,COLORBLUE,LINETHICK2;
O0,COLORFF9300,POINTDOT,LINETHICK1;
IF(O0>=REF(O0,1) ,O0,DRAWNULL),COLORFFFB00,POINTDOT,LINETHICK1;
RVWAP:=IF(TOTALAMOUNT=0,IF(AMOUNT=0,(C+L+H)/3,AMOUNT/VOL),TOTALAMOUNT/TOTALVOL);
VWAP:RVWAP,COLORBLUE,NODRAW;
O0:=RVWAP;
O0,COLORBLUE,LINETHICK2;
O0,COLORFF9300,POINTDOT,LINETHICK1;
IF(O0>=REF(O0,1) ,O0,DRAWNULL),COLORFFFB00,POINTDOT,LINETHICK1;
專欄 我寫的CCI指標
{- - -CCI - - - }
R:=C;
D:=20;
WIDTH:=2;
CCI:=(R-MA(R,D))*100/(WIDTH*STDP(R,D));
{- - - CCI END - - -}
使用體驗:CCI和布林線都運用了統計學的標準理論來設計,試圖實現超買與超賣的量化分析,從而找到頂與底位置。但事實上從實際圖表可見總是頂了還繼續頂,底了還可以再底,往往也被機構利用騙線。而且設計中用到一簡單平均線,延時反應真實情況是必然存在的,所以不建議使用。因爲相信所謂底,往往會讓人深套很難翻身。
R:=C;
D:=20;
WIDTH:=2;
CCI:=(R-MA(R,D))*100/(WIDTH*STDP(R,D));
{- - - CCI END - - -}
使用體驗:CCI和布林線都運用了統計學的標準理論來設計,試圖實現超買與超賣的量化分析,從而找到頂與底位置。但事實上從實際圖表可見總是頂了還繼續頂,底了還可以再底,往往也被機構利用騙線。而且設計中用到一簡單平均線,延時反應真實情況是必然存在的,所以不建議使用。因爲相信所謂底,往往會讓人深套很難翻身。
已翻譯
{— HMA 赫尔移动均线—}
HD:=20;
R:=C;
HMA:=WMA(2*WMA(R,ROUND(HD/2))-WMA(R,HD),ROUND(SQRT(HD)));
{- - - HMA END- - -}
体验:HMA赫尔移动均线确实有最大限度地克服了其它类均线的延迟问题。同时采用20,60,240日作周期分析趋势比较理想。但牛熊分界线的量化还是采用120天的简单平均线MA更准确些。
HD:=20;
R:=C;
HMA:=WMA(2*WMA(R,ROUND(HD/2))-WMA(R,HD),ROUND(SQRT(HD)));
{- - - HMA END- - -}
体验:HMA赫尔移动均线确实有最大限度地克服了其它类均线的延迟问题。同时采用20,60,240日作周期分析趋势比较理想。但牛熊分界线的量化还是采用120天的简单平均线MA更准确些。
3
1
專欄 我写的OBV指标代码
{- - - OBV - - - - - - - -}
X:=(C+H+L+O)/4;
OBV:=TMA(VOL*SIGN(X-REF(X,1)),1,1);
{- - - -OBV END - - - -}
体验:由于软件系统能提供的成交量不是整个交易市场的总成交量,其量化的可靠性存在问题。再加上X的变化与实践量能的变化是否一致也是值的存疑。还是不用好。
X:=(C+H+L+O)/4;
OBV:=TMA(VOL*SIGN(X-REF(X,1)),1,1);
{- - - -OBV END - - - -}
体验:由于软件系统能提供的成交量不是整个交易市场的总成交量,其量化的可靠性存在问题。再加上X的变化与实践量能的变化是否一致也是值的存疑。还是不用好。
{—-HEIKEN ASHI K線—}
XC:=(C+H+L+O)/4;
XO:=TMA(REF(XC,1),0.5,0.5);
XH:=MAX(H,MAX(XC,XO));
XL:=MIN(L,MIN(XC,XO));
DRAWKLINE(XH,XO,XL,XC);
{—-HEIKEN ASHI K線—}
體驗:MOOM中XC:=(C+H+L+O)/4; 但由於機構利用盤前盤後拉昇股價,操控開盤價,影響的股價變化趨勢的量化效果,所以不用開盤價。這個K線採用作爲輔助分析還量可以的。
XC:=(C+H+L+O)/4;
XO:=TMA(REF(XC,1),0.5,0.5);
XH:=MAX(H,MAX(XC,XO));
XL:=MIN(L,MIN(XC,XO));
DRAWKLINE(XH,XO,XL,XC);
{—-HEIKEN ASHI K線—}
體驗:MOOM中XC:=(C+H+L+O)/4; 但由於機構利用盤前盤後拉昇股價,操控開盤價,影響的股價變化趨勢的量化效果,所以不用開盤價。這個K線採用作爲輔助分析還量可以的。
已翻譯
2