YDD:='==FANGCAI==';
DRAWTEXT(DISPSTATUS=2=BARSCOUNT(CLOSE),CLOSE,YDD),ALIGN2,color00FF00;
DRAWFLAGTEXT(CLOSE,C,'【金城指标解盘系统提示】'),color0000FF;
MA5:=MA(CLOSE,5);
MA10:=MA(CLOSE,10);
MA20:=MA(CLOSE,20);
MA60:=MA(CLOSE,60);
DRAWFLAGTEXT(MA5>REF(MA5,1)*1.01,C,'5日均线：强劲向上');
DRAWFLAGTEXT(MA5>REF(MA5,1),C,'5日均线：向上');
DRAWFLAGTEXT(MA5=REF(MA5,1),C,'5日均线：持平');
DRAWFLAGTEXT(MA5<REF(MA5,1)*0.985,C,'5日均线：快速向下');
DRAWFLAGTEXT(MA5<REF(MA5,1),C,'5日均线：向下');
DRAWFLAGTEXT(MA10>REF(MA10,1),C,'10日均线：向上');
DRAWFLAGTEXT(MA10<REF(MA10,1),C,'10日均线：向下');
DRAWFLAGTEXT(MA10=REF(MA10,1),C,'10日均线：持平');
DRAWFLAGTEXT(MA20>REF(MA20,1),C,'20日均线：向上');
DRAWFLAGTEXT(MA20<REF(MA20,1),C,'20日均线：向下');
DRAWFLAGTEXT(MA20=REF(MA20,1),C,'20日均线：持平');
DRAWFLAGTEXT(MA60>REF(MA60,1),C,'60日均线：向上');
DRAWFLAGTEXT(MA60<REF(MA60,1),C,'60日均线：向下');
DRAWFLAGTEXT(MA60=REF(MA60,1),C,'60日均线：持平');
ld:=ma(v/(h-l),4);
dmp:=abs(c-o);
dmm:=v/(h-l);
DRAWFLAGTEXT(dmm<ld and dmp<ma(dmp,4),C,'资金无入场意愿，萎缩中');
DRAWFLAGTEXT(dmm<ld and dmp>ma(dmp,4),C,'场内资金有运作行为');
DRAWFLAGTEXT(dmm>ld and dmp<ma(dmp,4),C,'多空双方激烈争夺中');
DRAWFLAGTEXT(dmm>ld and dmp>ma(dmp,4),C,'场外资金介入（或出局）意愿强烈');
pdi:=sum(max(max(h-l,abs(h-ref(c,1))),abs(l-ref(c,1))),14);
mdi:=h-ref(h,1);
adx:=ref(l,1)-l;
adxr:=sum(if(mdi>0 and mdi>adx,mdi,0),14);
typ:=sum(if(adx>0 and adx>mdi,adx,0),14);
cci:=adxr*100/pdi;
wr:=typ*100/pdi;
mtm:=ma(abs(wr-cci)/(wr+cci)*100,6);
mtmma:=(mtm+ref(mtm,6))/2;
DRAWFLAGTEXT(cross(cci,wr),C,'PDI线从下向上突破MDI线，显示有新多头进场，为买进信号');
DRAWFLAGTEXT(cross(wr,cci),C,'PDI线从上向下跌破MDI线，显示有新空头进场，为卖出信号');
DRAWFLAGTEXT(mtm>ref(mtm,1),C,'ADX值持续高于前一日，行情将维持原趋势'),colorffff00;
DRAWFLAGTEXT(mtm<ref(mtm,1) and mtm<20,C,'ADX值递减，降到20以下，且横向行进时，市场气氛为盘整');
DRAWFLAGTEXT(mtm<ref(mtm,1) and ref(mtm,1)<ref(mtm,2) and ref(mtm,2)>ref(mtm,3) and ref(mtm,3)>ref(mtm,4),C,'ADX值从上升倾向转为下降时，表明行情即将反转');
psy:=c-ref(c,6);
布林1:=ma(psy,6);
DRAWFLAGTEXT(cross(psy,布林1) and 布林1<-0.8,C,'MTM从下向上突破MTMMA，买入信号');
DRAWFLAGTEXT(cross(布林1,psy) and 布林1>0.8,C,'MTM从上向下跌破MTMMA，卖出信号');
布林2:=ref(c,1);
布林3:=sma(max(c-布林2,0),6,1)/sma(abs(c-布林2),6,1)*100;
布林4:=sma(max(c-布林2,0),12,1)/sma(abs(c-布林2),12,1)*100;
DRAWFLAGTEXT(布林3>85,C,'6日RSI超买,防止回挡');
DRAWFLAGTEXT(布林3>80,C,'6日RSI向上突破85，超买,考虑卖出');
DRAWFLAGTEXT(布林3<15,C,'6日RSI超卖,随时有可能反弹');
DRAWFLAGTEXT(布林3<15,C,'6日RSI向下跌破15，超卖，考虑买入');
DRAWFLAGTEXT(cross(布林3,15),C,'6日RSI向上突破15，买进信号');
DRAWFLAGTEXT(cross(布林3,85),C,'6日RSI向下跌破85，卖出信号');
布林5:=count(c>ref(c,1),12)/12*100;
布林6:=(ma(c,3)+ma(c,6)+ma(c,12)+ma(c,24))/4;
布林7:=布林6+3*std(布林6,10);
xx:=布林6-3*std(布林6,10);
a001:=(布林7-xx)/布林7<0.03;
a002:=(布林7-xx)/布林7>0.18;
a003:=(ma(c,60)-ma(c,5))/ma(c,60)>0.15;
a004:=(ma(c,5)-ma(c,60))/ma(c,5)>0.15;
DRAWFLAGTEXT(a001,C,'多空布林收敛中，有变盘的可能，上下自己分析');
DRAWFLAGTEXT(a003 and a002 and c>o,C,'布林上下乖离太大，有反弹的可能');
DRAWFLAGTEXT(a004 and a002 and c<o,C,'布林上下乖离太大，有回落的可能');
DRAWFLAGTEXT(h>=hhv(h,20),C,'创20天新高');
{RSI 6 12 24}
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;
RSI3:=SMA(MAX(CLOSE-LC,0),24,1)/SMA(ABS(CLOSE-LC),24,1)*100;
RSII:=SMA(MAX(CLOSE-LC,0),3,1)/SMA(ABS(CLOSE-LC),3,1)*100;
R:=FILTER(CLOSE>LLV(LOW,30)*1.01 and CLOSE<LLV(LOW,30)*1.1
and COUNT(CROSS(rsi1,rsi2),30)>=2,10)
and COUNT(REF(CLOSE,BARSLAST(REF(CROSS(rsi1,rsi2),1))+1)>CLOSE
and REF(rsi1,BARSLAST(REF(CROSS(rsi1,rsi2),1))+1)<rsi1
and CROSS(rsi1,rsi2),5)>=1 ;
A3:=BARSLAST(REF(CROSS(RSI1,RSI2),1));
B3:=REF(CLOSE,A3+1)>CLOSE and REF(RSI1,A3+1)<RSI1 and CROSS(RSI1,RSI2);
C3:=BARSLAST(REF(CROSS(RSI2,RSI1),1));
f4:=REF(CLOSE,C3+1)<CLOSE and REF(RSI1,C3+1)>RSI1 and CROSS(RSI2,RSI1);
DRAWFLAGTEXT(R,C,'RSI二次金叉');
DRAWFLAGTEXT(b3,C,'RSI底背离');
DRAWFLAGTEXT(f4 ,C,'RSI顶背离');
DRAWFLAGTEXT(rsi1<15 AND(BARSLAST(rsi1<15)>=1) ,C,
'短线指标(RSI 相对强弱指标)超卖--属买入信号');
DRAWFLAGTEXT(RSI1>85 AND(BARSLAST(RSI1>85)>=1),C,
'短线指标(RSI 相对强弱指标)超买--属卖出信号');
DRAWFLAGTEXT((((LLV(LOW,20)=LOW)AND(NOT(LLV(RSI1,20)=RSI1)))OR(COUNT(CLOSE<REF(CLOSE,1),30)>18
AND(COUNT(RSI1>REF(RSI1,1),30)>18)))AND(RSI1<20),C,
'短线指标(RSI 相对强弱指标)底背离--股价在低位时属买入信号');
DRAWFLAGTEXT((((HHV(HIGH,20)=HIGH)AND(NOT(HHV(RSI1,20)=RSI1)))OR(COUNT(CLOSE>REF(CLOSE,1),30)>18
AND(COUNT(RSI1<REF(RSI1,1),30)>18)))AND(RSI1>80) ,C,
'短线指标(RSI 相对强弱指标)顶背离--股价在高位时属卖出信号');
DRAWFLAGTEXT(CROSS(RSI1,RSI2)AND(RSI1<50),C,
'短线指标(RSI 相对强弱指标)金叉--属买入信号');
DRAWFLAGTEXT(CROSS(RSI2,RSI1)AND(RSI1>50),C,
'短线指标(RSI 相对强弱指标)死叉--属卖出信号');
DRAWFLAGTEXT(RSI1<5,C,
'短线指标(RSI 相对强弱指标)极低位--强烈买入信号');
DRAWFLAGTEXT(RSI1>93 ,C,
'短线指标(RSI 相对强弱指标)极高位--强烈卖出信号');
{PSY 心理线 12}
PSY:=COUNT(CLOSE>REF(CLOSE,1),12)/12*100;
{MTM 动力指标 6}
MTM := CLOSE-REF(CLOSE,6);
MTMMA := MA(MTM,6);
{SAR 抛物转向(Stop and Reverse) 10 2 20}
sa:=SAR(10,2,20);
{DMI 趋向指标(标准) 14 6}
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;
DRAWFLAGTEXT(CROSS(MTM,MTMMA) ,C,'（MTM动力指标）从下向上突破MTMMA，买入信号');
DRAWFLAGTEXT(CROSS(MTMMA,MTM),C,
'（MTM动力指标）从上向下跌破MTMMA，卖出信号');
DRAWFLAGTEXT((HHV(HIGH,20)=HIGH)AND(NOT(HHV(MTM,20)=MTM))AND(COUNT(CLOSE>REF(CLOSE,1),30)>18
AND(COUNT(CLOSE>REF(CLOSE,1),3)=3)) ,C,
'(MTM 动力指标)顶背离--属卖出信号');
DRAWFLAGTEXT((LLV(LOW,20)=LOW)AND(NOT(LLV(MTM,20)=MTM))AND(COUNT(CLOSE<REF(CLOSE,1),30)>18
AND(COUNT(CLOSE<REF(CLOSE,1),3)=3)),C,
'(MTM 动力指标)底背离--属买入信号。');
DRAWFLAGTEXT(PSY<10 ,C,
'(PSY 心理线指标)低位超卖区--属买入信号');
DRAWFLAGTEXT(BETWEEN(PSY,PSY>10,PSY<25),C,
'(PSY 心理线指标)超卖--属买入信号');
DRAWFLAGTEXT(PSY>75,C,
'(PSY 心理线指标)超买--属卖出信号');
DRAWFLAGTEXT(CROSS(PDI,MDI),C,
'(DMI 趋向指标)金叉,显示有新多头进场--属买入信号');
DRAWFLAGTEXT(CROSS(MDI,PDI) ,C,
'(DMI 趋向指标)死叉,显示有新空头进场--属卖出信号');
DRAWFLAGTEXT(CROSS(CLOSE,SA)AND(ABS(CLOSE-sa)/CLOSE>=0.01) ,C,
'(SAR 抛物转向指标)向上突破--属买入信号,与DMI指标同时使用更好');
DRAWFLAGTEXT(CROSS(sa,CLOSE)AND(ABS(CLOSE-sa)/CLOSE>=0.01) ,C,
'(SAR 抛物转向指标)向下突破--属卖出信号,与DMI指标同时使用更好');
{BBIBOLL 多空布林线 10 3}
BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
UPR:=BBI+3*STD(BBI,10);
DWN:=BBI-3*STD(BBI,10);
{ROC 变动速率 12 6}
ROC:=(CLOSE-REF(CLOSE,12))/REF(CLOSE,12)*100;
ROCMA:=MA(ROC,6);
{OBV 能量潮}
obv:=SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE<REF(CLOSE,1),-VOL,0)),0);
{CCI 顺势指标 14}
TYP := (HIGH + LOW + CLOSE)/3;
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
DRAWFLAGTEXT((COUNT(CLOSE<REF(CLOSE,1),30)>18 AND (COUNT(CLOSE<REF(CLOSE,1),3)=3))
AND((COUNT(OBV>REF(OBV,1),30)>18) AND (COUNT(OBV>REF(OBV,1),3)=3))
AND(COUNT(VOL>REF(VOL,1),30)>3 AND (VOL/CAPITAL<=(10/100))) ,C,
'短线指标(OBV 能量潮)显示买盘较强--属买入信号');
DRAWFLAGTEXT((COUNT(CLOSE>REF(CLOSE,1),30)>18 AND (COUNT(CLOSE>REF(CLOSE,1),3)=3))
AND ((COUNT(OBV>REF(OBV,1),30)>18)AND(COUNT(OBV>REF(OBV,1),3)=3))
AND(COUNT(VOL>REF(VOL,1),30)>3 AND(VOL/CAPITAL<=(10/100))) ,C,
'短线指标(OBV 能量潮)显示买盘逐渐加强--属买入信号');
DRAWFLAGTEXT((COUNT(CLOSE>REF(CLOSE,1),30)>18 AND(COUNT(CLOSE>REF(CLOSE,1),3)=3))
AND((COUNT(OBV<REF(OBV,1),30)>18)OR(COUNT(OBV<REF(OBV,1),3)=3)),C,
'短线指标(OBV 能量潮)显示买盘无力--属卖出信号');
DRAWFLAGTEXT(CROSS(obv,0)AND(COUNT((REF(obv,1)<0),3)=3) ,C,
'短线指标(OBV 能量潮)由负转正--属买入信号');
DRAWFLAGTEXT(CROSS(0,obv)AND(COUNT((REF(obv,1)>0),3)=3) ,C,
'短线指标(OBV 能量潮)由正转负--属卖出信号');
DRAWFLAGTEXT((HHV(HIGH,20)=HIGH)AND(NOT(HHV(obv,20)=obv)) ,C,
'短线指标(OBV 能量潮)顶背离--属卖出信号。');
DRAWFLAGTEXT((LLV(LOW,20)=LOW)AND(NOT(LLV(obv,20)=obv)) ,C,
'短线指标(OBV 能量潮)底背离--属买入信号');
DRAWFLAGTEXT((ABS(obv-REF(obv,1))/ABS(MA(obv,5))>0.07)AND(obv>REF(obv,1)) ,C,
'短线指标(能量潮)异常。若股价在高位属卖出信号，若能量线在低位长时间横向整理后出现属买入信号');
DRAWFLAGTEXT(CCI<-100 and REF(cci,1)<cci ,C,
'(CCI 顺势指标)属买入信号');
DRAWFLAGTEXT(CCI>100 and REF(cci,1)>cci,C,
'(CCI 顺势指标)属卖出信号');
DRAWFLAGTEXT(CROSS(CLOSE,UPR)AND(BARSLAST(((COUNT((UPR-DWN)<REF
((UPR-DWN),1),10)>=5)AND(REF((UPR-DWN),5)/
(UPR-DWN)>=4))OR((COUNT((UPR-DWN)<REF
((UPR-DWN),1),10)>=5)AND(((UPR-DWN)/DWN<0.03))))<=3),C,
'(BBIBOLL 多空布林线-支撑压力指标)向上突破，考虑介入');
DRAWFLAGTEXT(CROSS(DWN,CLOSE)AND(BARSLAST(((COUNT((UPR-DWN)<REF
((UPR-DWN),1),10)>=5)AND(REF((UPR-DWN),5)/
(UPR-DWN)>=4))OR((COUNT((UPR-DWN)<REF
((UPR-DWN),1),10)>=5)AND(((UPR-DWN)/DWN<0.03))))<=3) ,C,
'(BBIBOLL 多空布林线-支撑压力指标)向下突破，迅速离场');
DRAWFLAGTEXT(CROSS(ROC,0),C,
'(ROC 变动速率指标)向上突破--属买入信号');
DRAWFLAGTEXT(CROSS(0,ROC) ,C,
'(ROC 变动速率指标)向下突破--属卖出信号');
DRAWFLAGTEXT((LLV(LOW,20)=LOW)AND(NOT(COUNT(ROC<REF(ROC,1),30)>18
AND(COUNT(ROC<REF(ROC,1),3)=3))) ,C,
'(ROC 变动速率指标)显示下跌动力减弱--属买入信号');
DRAWFLAGTEXT((HHV(HIGH,20)=HIGH)AND(NOT(COUNT(ROC>REF(ROC,1),30)>18
AND(COUNT(ROC>REF(ROC,1),3)=3))) ,C,
'(ROC 变动速率指标)显示上涨动力减弱--属卖出信号');
DRAWFLAGTEXT((COUNT(CLOSE>REF(CLOSE,1),30)>18 AND(COUNT(CLOSE>REF(CLOSE,1),3)=3))
AND(COUNT(ROC>REF(ROC,1),30)>18 AND(COUNT(ROC>REF(ROC,1),3)=3)),C,
'(ROC 变动速率指标)显示短期反弹有望--属买入信号');
DRAWFLAGTEXT((COUNT(CLOSE<REF(CLOSE,1),30)>18 AND(COUNT(CLOSE<REF(CLOSE,1),3)=3))
AND(COUNT(ROC<REF(ROC,1),30)>18 AND(COUNT(ROC<REF(ROC,1),3)=3)),C,
'(ROC 变动速率指标)显示短期警惕回落--属卖出信号');
{ARBR 人气意愿指标 26}
AR := SUM(HIGH-OPEN,26)/SUM(OPEN-LOW,26)*100;
BR := SUM(MAX(0,HIGH-REF(CLOSE,1)),26)/
SUM(MAX(0,REF(CLOSE,1)-LOW),26)*100;
{W&R 威廉指标(William's %R) 14}
wr:=-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14));
{SAR 抛物转向(Stop and Reverse) 10 2 20}
sa:=SAR(10,2,20);
DRAWFLAGTEXT(AR<50,C,
'(ARBR 人气指标)超卖--属买入信号');
DRAWFLAGTEXT(AR>200,C,
'(ARBR 人气指标)超买--属卖出信号');
DRAWFLAGTEXT(((HHV(AR,10)-AR)/HHV(AR,10))>=0.5 ,C,
'(ARBR 人气指标)异常--若股价从高价下跌，属买入信号');
DRAWFLAGTEXT(((AR-LLV(AR,10))/LLV(AR,10))>=0.5 ,C,
'(ARBR 人气指标)异常--若股价从低价上升，属卖出信号');
DRAWFLAGTEXT(BR<50 ,C,
'(ARBR 意愿指标)显示股价随时反弹--考虑买入');
DRAWFLAGTEXT(BR>300,C,
'(ARBR 意愿指标)显示股价随时下挫--考虑卖出');
DRAWFLAGTEXT(CROSS(AR,BR)AND(AR<50 OR BR<50) ,C,
'(ARBR 人气意愿指标)金叉--属买入信号');
DRAWFLAGTEXT(CROSS(BR,AR)AND(AR>180 OR BR>300) ,C,
'(ARBR 人气意愿指标)死叉--属卖出信号');
DRAWFLAGTEXT(wr<-80 ,C,
'(W&R 威廉指标)超卖--即将见底，应伺机买进');
DRAWFLAGTEXT(wr>-20,C,
'(W&R 威廉指标)超买--即将见顶，应及时卖出');
{盖印}
DRAWRECTABS(0,0,30,35,rgb(250,60,80)),color000099;
DRAWRECTABS(0,30,30,45,rgb(250,250,80)),color009999;
DRAWTEXTABS(2,5,'金城'),colorFFFFFF,LINETHICK1;
DRAWTEXTABS(2,18,'特别'),colorFFFFFF,LINETHICK1;
DRAWTEXTABS(2,30,'优化'),color0000FF,LINETHICK1;
{点击看本软件截图：58股票 公式网 http://www. 58gu. com 整理} |
