盘面量能A0:=NUMTOSTR(MA(VOL,5),2);
B0:=NUMTOSTR(MA(VOL/CAPITAL*100,5)*5,2);
TYP:=(HIGH+LOW+CLOSE)/3;
LL:=LLV(LOW,12);
HH:=HHV(HIGH,12);
WR:=TYP+TYP-LL;
WS:=TYP-(HH-TYP);
WA:=NUMTOSTR(WR,2);
WB:=NUMTOSTR(WS,2);
DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,STKNAME+'\n'+STKLABEL+'\n'+BLKNAME),ALIGN4,colorFF00;
VAR2:=HIGH-LOW;
VAR3:=ABS(OPEN-CLOSE);
VAR4:=HIGH-(IF(CLOSE>OPEN,CLOSE,OPEN));
VAR5:=(IF(CLOSE>OPEN,OPEN,CLOSE))-LOW;
VAR6:=VAR3/VAR2*VOL;
VAR7:=VAR4/VAR2*VOL;
VAR8:=VAR5/VAR2*VOL;
VAR9:=IF(VOL/CAPITAL>0.001,1,EXP(ABS(LOG(VOL/CAPITAL*100))));
VARA:=(CLOSE-MA(CLOSE,5))/MA(CLOSE,5)*100;
VARB:=MA(CLOSE,5)>MA(CLOSE,10) AND MA(CLOSE,10)>MA(CLOSE,30) AND MA(CLOSE,30)>MA(CLOSE,60);
VARC:=MA(CLOSE,5)<MA(CLOSE,10) AND MA(CLOSE,10)<MA(CLOSE,30);
多头成交:STICKLINE(CLOSE>MA(CLOSE,30),0,VOL,8,1),colorFF;
空头成交:STICKLINE(CLOSE<MA(CLOSE,30),0,VOL,8,1),colorFF00;
向上攻击量:STICKLINE(VAR6>=VAR7 AND VAR6>=VAR8 AND CLOSE>OPEN,0,VAR6,8,0),colorFF;
向下攻击量:STICKLINE(VAR6>=VAR7 AND VAR6>=VAR8 AND CLOSE<OPEN,0,VAR6,8,0),colorFF00;
上探量:STICKLINE(VAR7>VAR6 AND VAR7>VAR8,0,VAR7,8,0),colorCCCC66;
下探量:STICKLINE(VAR8>VAR6 AND VAR8>VAR7,0,VAR8,8,0),colorFF6633;
相对地量:STICKLINE(VAR9>2 AND VOL<MA(VOL,5)/2,0,VOL,2.5,0),colorFFFF;
地量:DRAWTEXT(VAR9>2 AND VOL<MA(VOL,5)/2,VOL*3,'地量'),colorFFFF;
放量:STICKLINE(VOL>MA(VOL,5)*2.5,0,VOL,2.5,0),colorFFFFFF;
逢高出货:DRAWTEXT(VAR7>VAR6 AND VARA>2 AND VAR7>VAR8 AND CLOSE>MA(CLOSE,5) AND CLOSE>MA(CLOSE,30) AND HIGH>MA(CLOSE,60) AND VOL>MA(VOL,5) AND VAR7>=MA(VOL,5),VOL,'逢高出货'),colorFF00;
逢低跟进:DRAWTEXT(VAR8>VAR6 AND VAR8>VAR7 AND VARA<-2 AND CLOSE<MA(CLOSE,30) AND VAR8<MA(VOL,5)/2 AND MA(VOL,5)<MA(VOL,10),VOL*2,'逢低跟进'),colorFF00FF;
强势参与:DRAWTEXT(VAR6>MA(VOL,5)*2 AND VAR6>=VAR7 AND VAR6>=VAR8 AND CLOSE>OPEN OR VOL>MA(VOL,5)*3 AND VARB,VOL,'强势参与'),colorCC99CC;
空头释放:DRAWTEXT(VAR6>=VAR7 AND VAR6>=VAR8 AND CLOSE<OPEN AND VAR6/VOL>0.7 AND VARC AND VAR6>MA(VOL,5),VAR6*2,'空头释放'),colorFF00;
MA5:MA(VOL,5),colorFF;
MA10:MA(VOL,10),colorFF00;
MA20:MA(VOL,20),colorFFFF;
EXPLAIN(CLOSE,'清风斜阳 QQ 82052669'),colorFFFF;
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
K:SMA(RSV,M1,1);
D:SMA(K,M2,1);
J:3*K-2*D;
PARTLINE(K>D,K),colorFF00FF;
PARTLINE(K<D,K),colorFFFF00;
PARTLINE(J>D,J),LINETHICK2,colorFF;
PARTLINE(J<D,J),LINETHICK2,colorFF00;
VAR5:=IF(CLOSE>=OPEN,VOL/((HIGH-LOW)*2-(ABS(CLOSE-OPEN)))*(HIGH-LOW),-VOL/((HIGH-LOW)*2-(ABS(CLOSE-OPEN)))*(HIGH-CLOSE+OPEN-LOW));
VAR6:=IF(CLOSE<OPEN,VOL/((HIGH-LOW)*2-(ABS(CLOSE-OPEN)))*(HIGH-OPEN+CLOSE-LOW),-VOL/((HIGH-LOW)*2-(ABS(CLOSE-OPEN)))*(HIGH-LOW));
EXPLAINEX(1,'机构日增减仓% =',VAR5/CAPITAL*100,2,0),colorFF;
EXPLAINEX(1,'散户日增减仓% =',VAR6/CAPITAL*100,2,1),colorFFFF00;
EXPLAINEX(1,'机构短期仓位% =',SUM(VAR5/CAPITAL*100,N),2,0),colorFF;
EXPLAINEX(1,'散户短期仓位% =',SUM(VAR6/CAPITAL*100,N),2,0),colorFFFF00;
MA6:MA(CLOSE,6),colorFFFFFF;
MA11:MA(CLOSE,11),colorFFFF;
POLYLINE(CLOSE,MA(CLOSE,20)),color999999;
MA30:MA(CLOSE,30),colorFF00;
POLYLINE(CLOSE,MA(CLOSE,45)),color999999;
MA60:MA(CLOSE,60),colorFF00FF;
POLYLINE(CLOSE,MA(CLOSE,90)),color999999;
MA120:MA(CLOSE,120),colorFFFF00;
POLYLINE(CLOSE,MA(CLOSE,150)),color999999;
POLYLINE(CLOSE,MA(CLOSE,180)),color999999;
POLYLINE(CLOSE,MA(CLOSE,210)),color999999;
MA250:MA(CLOSE,250),colorFF;
VK:=SQRT(VOL/CAPITAL*100*5);
STICKLINE(CLOSE>=OPEN,HIGH,LOW,0,0),colorFF;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,VK+3.8,0),colorFF;
STICKLINE(CLOSE<OPEN,HIGH,LOW,0,0),colorFF00;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,VK+3.8,0),colorFF00;
EXPLAIN(MA5>MA10 AND MA10>MA30 AND MA5>MA30,'解：短期均线排列：多方暂时占据优势'),colorFF;
EXPLAIN(MA5<MA10 AND MA10<MA30 AND MA5<MA30,'解：短期均线排列：空方暂时占据优势'),colorFF00;
EXPLAIN(MA30>MA60 AND MA30>MA120 AND MA60>MA120,'解：中期均线排列：多方暂时占据优势'),colorFF;
EXPLAIN(MA30<MA60 AND MA30<MA120 AND MA60<MA120,'解：中期均线排列：空方暂时占据优势'),colorFF00;
EXPLAIN(MA60>MA120 AND MA120>MA250 AND MA60>MA250,'解：长期均线排列：多方暂时占据优势'),colorFF;
EXPLAIN(MA60<MA120 AND MA120<MA250 AND MA60<MA250,'解：长期均线排列：空方暂时占据优势'),colorFF00;
EXPLAIN(CROSS(MA5,MA10),'解：短期均线5x10：金叉'),colorFFFF;
EXPLAIN(CROSS(MA10,MA5),'解：短期均线5x10：死叉'),color10FF10;
EXPLAIN(CROSS(CLOSE,MA120),'解：今日股价上穿半年线'),colorFFFF00;
EXPLAIN(CROSS(MA120,CLOSE),'解：今日股价跌破半年线'),color5500;
EXPLAIN(CROSS(CLOSE,MA250),'解：今日股价上穿一年线'),colorFFFF00;
EXPLAIN(CROSS(MA250,CLOSE),'解：今日股价跌破一年线'),color5500;
EXPLAIN(CROSS(CLOSE,MA60) AND CROSS(CLOSE,MA120) AND CROSS(CLOSE,MA250),'解：股价一阳上穿三线');
EXPLAIN(MA30>REF(MA30,1),'解：30日均线趋势：向上'),colorFFFF00;
EXPLAIN(MA30>REF(MA30,1) AND MA30<REF(MA30,1)*1.001,'解：30日均线趋势：走平');
EXPLAIN(MA30<REF(MA30,1),'解：30日均线趋势：向下'),color5500;
EXPLAIN(MA5>REF(MA5,1)*1.015,'解：5日均线：强劲向上'),colorFFFF00;
EXPLAIN(MA5>REF(MA5,1) AND MA5<REF(MA5,1)*1.005,'解：5日均线：方向不明');
EXPLAIN(MA5<REF(MA5,1)*0.985,'解：5日均线：快速向下'),color5500;
VAR1:=EMA(CLOSE,34)-EMA(CLOSE,5);
VAR2:=EMA(VAR1,5);
趋势:(-3)*(VAR1-VAR2),COLORSTICK;
长期趋势:EMA(VAR1,10)*(-1);
趋势;
EXPLAIN(CLOSE,'★★★★★★★★★★★'),colorFFFFFF;
EXPLAIN(趋势>0,'※※当前综合评价※※短期新趋势处于上升当中，投资者持有为主，密切关注\n'),colorFF;
EXPLAIN(趋势<0,'※※当前综合评价※※短期新趋势处于下降当中，投资者观望为主，多看少动\n'),colorFFFF;
EXPLAIN(CROSS(趋势,0),'◎◎◎考虑买入\n'),colorFF0000;
EXPLAIN(CROSS(0,趋势),'◎◎◎考虑卖出\n'),colorFF;
VAR11:=MA(VOL/(HIGH-LOW),4);
VAR33:=ABS(CLOSE-OPEN);
VAR44:=VOL/(HIGH-LOW);
EXPLAIN(VAR44<VAR11 AND VAR33<MA(VAR33,4),'资金暂时无入场意愿，量能萎缩中\n'),colorFFFF;
EXPLAIN(VAR44<VAR11 AND VAR33>MA(VAR33,4),'场内资金运作行为，谨慎操作\n'),colorFFFF;
EXPLAIN(VAR44>VAR11 AND VAR33<MA(VAR33,4),'多空双方激烈争夺中，胜负难以预料\n'),colorFF;
EXPLAIN(VAR44>VAR11 AND VAR33>MA(VAR33,4),'场外资金操作意愿强烈，密切跟踪它们的流向\n'),colorFF;
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线，显示有新多头进场，为买进信号\n'),color5500;
EXPLAIN(CROSS(MDI,PDI),'PDI线从上向下跌破MDI线，显示有新空头进场，为卖出信号\n'),colorFF;
EXPLAIN(ADX>REF(ADX,1),'平均动向值持续高于前一日，行情将维持原趋势\n'),colorFF;
EXPLAIN(ADX<REF(ADX,1) AND ADX<20,'平均动向值递减，降到20以下，且横向行进时，市场气氛为盘整\n'),colorFF0000;
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),'平均动向值从上升倾向转为下降时，表明行情即将反转\n'),color10FF10;
 |
