奇狐社區論壇
在這個頁面顯示本主題全部的 3 個文章

奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 應用交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=33)
-- 解盘模块 (http://www.chiefox.com.tw/bbs/showthread.php?threadid=1564)


由 jiat 在 2004-09-11 00:05 發表:

解盘模块

解盘模块-可把这段语句加到你的任何公式后面!

{解盘模块}
半年线:=EMA(C,148);
年线:=EMA(C,250);
EXPLAIN(C>=半年线,'股价在半年线之上'),COLORYELLOW;
EXPLAIN(C>=年线,'股价在年线之上 '),COLORYELLOW;
EXPLAIN(C<半年线,'股价在半年线之下 '),COLORCYAN ;
EXPLAIN(C<年线,'股价在年线之下 '),COLORCYAN;
EXPLAIN(半年线>=REF(半年线,1),'半年线趋势向上'),COLORYELLOW;
EXPLAIN(年线>=REF(年线,1),'年线趋势向上 '),COLORYELLOW;
EXPLAIN(半年线<REF(半年线,1),'半年线趋势向下 '),COLORCYAN ;
EXPLAIN(年线<REF(年线,1),'年线趋势向下 '),COLORCYAN;
股道卖出价预测:=(CLOSE*2.5/100+CLOSE);
股道买入价预测:=C-CLOSE*2.5/100;
EXPLAINEX(COST(50),'市场平均成本:',COST(50),2,0),COLORYELLOW;
EXPLAINEX(COST(4),'主力平均成本:',COST(4),2,0),COLORRED;
EXPLAINEX(COST(30),'控盘平均成本:',COST(30),2,0),COLORRED;
EXPLAINEX(COST(75),'拉升平均成本:',COST(75),2,0),COLORYELLOW;
EXPLAINEX(COST(95),'顶部平均成本:',COST(95),2,0),COLORYELLOW;
EXPLAINEX(COST(0.05),'底部平均成本:',COST(0.05),2,0),COLORYELLOW;
EXPLAINEX(股道卖出价预测,'股道卖出价预测:',股道卖出价预测,2,0),COLOR0099FF;
EXPLAINEX(股道买入价预测,'股道买入价预测:',股道买入价预测,2,0),COLOR0099FF;
EXPLAINEX(1,'获利盘比例=',WINNER(C)*100,2,0),COLORRED;
EXPLAINEX(1,'套牢盘比例=',100-WINNER(C)*100,2,0),COLORCYAN;
多空1:=MA((V/(H-L)),4);
多空2:=ABS(C-O);
多空3:=V/(H-L);
EXPLAIN(多空3<多空1 AND 多空2<MA(多空2,4),'资金无入场意愿,萎缩中'),COLORCYAN;
EXPLAIN(多空3<多空1 AND 多空2>MA(多空2,4),'场内资金有运作行为'),COLORYELLOW;
EXPLAIN(多空3>多空1 AND 多空2<MA(多空2,4),'多空双方激烈争夺中'),COLORYELLOW;
EXPLAIN(多空3>多空1 AND 多空2>MA(多空2,4),'场外资金介入(或出局)意愿强烈'),COLOR0099FF;
TR := SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14);
HD := HIGH-REF(HIGH,1);
LD := REF(LOW,1)-LOW;
DMP:= SUM(IF(HD>0 AND HD>LD,HD,0),14);
DMM:= SUM(IF(LD>0 AND LD>HD,LD,0),14);
PDI:= DMP*100/TR;
MDI:= DMM*100/TR;
ADX:= MA(ABS(MDI-PDI)/(MDI+PDI)*100,6);
ADXR:=(ADX+REF(ADX,6))/2;
EXPLAIN(CROSS(PDI,MDI),'PDI线从下向上突破MDI线,显示有新多头进场,为买进信号'),COLORGREEN;
EXPLAIN(CROSS(MDI,PDI),'PDI线从上向下跌破MDI线,显示有新空头进场,为卖出信号'),COLORCYAN;
EXPLAIN(ADX>REF(ADX,1),'ADX值持续高于前一日,行情将维持原趋势'),COLORYELLOW;
EXPLAIN(ADX<REF(ADX,1) AND ADX<20,'ADX值递减,降到20以下,且横向行进时,市场气氛为盘整'),COLOR0099FF;
EXPLAIN(ADX<REF(ADX,1) AND REF(ADX,1)<REF(ADX,2) and REF(ADX,2)>REF(ADX,3) AND REF(ADX,3)>REF(ADX,4),'ADX值从上升倾向转为下降时,表明行情即将反转'),COLORYELLOW;
TYP := (HIGH + LOW + CLOSE)/3;
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
EXPLAIN(cci<-180,'CCI指标底位,买入机会'),COLORGREEN;
EXPLAIN(cci>180,'CCI指标高位,卖出机会'),COLORCYAN;
EXPLAIN((V/CAPITAl)>0.075,'换手过大,小心主力出逃,短期头部'),COLORCYAN;
WR:=-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14));
EXPLAIN(WR>-20,'W&R超买,短线即将见顶,应及时卖出'),COLORCYAN;
EXPLAIN(WR<-80,'W&R超卖,短线即将见底,应伺机买进'),COLORGREEN;
MTM := CLOSE-REF(CLOSE,6);
MTMMA := MA(MTM,6);
EXPLAIN(CROSS(MTM,MTMMA) and MTMMA<-0.8,'MTM从下向上突破MTMMA,买入信号'),COLORGREEN;
EXPLAIN(CROSS(MTMMA,MTM) and MTMMA>0.8,'MTM从上向下跌破MTMMA,卖出信号'),COLORCYAN;
LC := REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100;
EXPLAIN(RSI1>85,'6日RSI超买,防止回挡'),COLORCYAN;
EXPLAIN(RSI1>80,'6日RSI向上突破85,超买,考虑卖出'),COLORCYAN;
EXPLAIN(RSI1<15,'6日RSI超卖,随时有可能反弹'),COLORYELLOW;
EXPLAIN(RSI1<15,'6日RSI向下跌破15,超卖,考虑买入'),COLORYELLOW;
EXPLAIN(CROSS(RSI1,15),'6日RSI向上突破15,买进信号'),COLORGREEN;
EXPLAIN(CROSS(RSI1,85),'6日RSI向下跌破85,卖出信号'),COLORCYAN;
PSY:=COUNT(CLOSE>REF(CLOSE,1),12)/12*100;
布林1:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
布林2:=布林1+3*STD(布林1,10);
布林3:=布林1-3*STD(布林1,10);
布林4:=(布林2-布林3)/布林2<0.03;
布林5:=(布林2-布林3)/布林2>0.18;
布林6:=(MA(C,60)-MA(C,5))/MA(C,60)>0.15;
布林7:=(MA(C,5)-MA(C,60))/MA(C,5)>0.15;
EXPLAIN(布林4,'多空布林收敛中,有变盘的可能,上下自己分析'),COLORYELLOW;
EXPLAIN(布林6 AND 布林5 AND C>o ,'布林上下乖离太大,有反弹的可能'),COLORGREEN;
EXPLAIN(布林7 AND 布林5 AND C<o ,'布林上下乖离太大,有回落的可能'),COLORCYAN;


由 mryclin 在 2004-11-04 17:02 發表:

酷 適用於幾分線?

請解惑


由 bonofc 在 2011-01-13 17:16 發表:

感謝版大分享.


全部時間均為台灣時間, 現在時間為16:58
在這個頁面顯示本主題全部的 3 個文章


Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.

簡愛洋行 製作 Copyright 2003-. All Rights Reserved.