N:=20;P:=12;

DRAWGBK(C,STRIP(RGB(10,160,0),RGB(25,15,0),1));

阻挡线:SMA(HIGH,21,2)*1.035,POINTDOT,colorFFFFFF,PRECIS2;

下档线:SMA(LOW,21,2)*0.96,POINTDOT,PRECIS2;

上:=ema(MA(HIGH,3)*1.05,30); {原句上:=FFT(MA(HIGH,3)*1.05,30);分析家无FFT,故改}

趋势:=ema(MA(LOW,3)*0.96,30); {原句趋势:=FFT(MA(LOW,3)*0.96,30);分析家无FFT,故改}

短期支撑:LLV(CLOSE,N),PRECIS2,color6803C7;

中:=ema(MA(OPEN,3)*0.99,30); {原句中:=FFT(MA(OPEN,3)*0.99,30);分析家无FFT,故改}

趋势线:=SMA(LOW,8,1);

VAR1:=(OPEN+LOW+HIGH+CLOSE)/4;

VAR2:=((CLOSE-REF(CLOSE,1))/REF(CLOSE,1))*100;

VAR3:=((CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18)))*100;

VAR4:=SMA(VAR3,9,1);

VAR5:=SMA(VAR4,3,1);

J:=3*VAR4-2*VAR5;

A2:=EMA(VAR4,3);

A3:=EMA(A2,3);

A4:=EMA(A3,3);

A5:=EMA(A4,3);

AA:=EMA(A5,6);

中期大底:LLV(LOW,30),colorCDFFBB,PRECIS2;

VAR9:=HHVBARS(HIGH,50);

VAR11:=((CLOSE-REF(OPEN,VAR9))/REF(OPEN,VAR9))*100;

DRAWTEXT((CROSS(A4,AA) AND (VAR11<(0- 23))),(LOW-0.3),''),colorFF0000;

STICKLINE((CROSS(A4,AA) AND (VAR11<(0-23))),中期大底,(中期大底-0.27),4,0),colorFFFFFF;

CG:=MA(CLOSE,19);

CD:=MA(CLOSE,2);

MA20:=MA(CLOSE,20);

MA120:=MA(CLOSE,120);

支撑:=EMA(VAR1,5);

压力一:HHV(LOW,20),PRECIS2,Color00FFFF;

压力:HHV(支撑,60),colorD8CFBB,PRECIS2;

短期底部:LLV(HIGH,30),PRECIS2,Color00FF00;

DRAWTEXT(FILTER(((((((CLOSE>CG) AND (HIGH<上)) AND (CLOSE <上)) AND ((趋势线-REF(趋势线,3))>0)) AND ((趋势-REF(趋势,1))>=0)) AND CROSS(CD,CG)),5),(LOW-0.02),'★大底成'),color4D84FF;

DRAWTEXT(FILTER(((CROSS(趋势,中期大底) AND (LOW<=中)) AND ((趋势-REF(趋势,1))>0)),3),(中期大底-0.08),'←分时拉升'),colorFF00FF;

DRAWTEXT(FILTER((CROSS(中,短期底部) AND ((趋势-REF(趋势,1))>0)),4),(中期大底-0.16),'←分时狂牛'),color430CC0;

aaa1:=ema(c,2);

bba1:=ema(aaa1,2);

aa:=ma(bba1,3);

aaa2:=ema((h+c+o)/3,18);

dd3:=aa>=aaa2 and c>aaa2;

dd4:=aa

dd5:=aa>aaa2 ;

STICKLINE((dd4 or dd5) and o<=c ,h,l,0.5,0),Color00cc99;

STICKLINE((dd4 or dd5) and o<=c ,c,o,7,0),Color00cc99;

STICKLINE((dd4 or dd5) and o>=c ,h,l,0.5,0),Color3F8C3A;

STICKLINE((dd4 or dd5) and o>=c ,c,o,7,0),Color3F8C3A;

STICKLINE((dd3 or c>aaa2) and o<=c,c,o,7,0),Colorred;

STICKLINE((dd3 or c>aaa2) and o<=c,h,l,0.5,0),Colorred;

STICKLINE((dd3 or c>aaa2) and o>=c,c,o,7,0),Colorff33ff;

STICKLINE((dd3 or c>aaa2) and o>=c,h,l,0.5,0),Colorff33ff;

STICKLINE(MA(C,13)>O and C>MA(C,13) and O

STICKLINE(MA(C,13)>O and C>MA(C,13),H,L,0.8,1),coloryellow;

上一:=(SMA(HIGH,21,2)*1.05);

DRAWTEXT((((((CLOSE<0)) AND (CLOSE上一)) AND (CLOSE<上一)),(HIGH+0.13),'←分时短线'),colorFFFFFF;

 

VARQ:=MA(CLOSE,152);         

VARW:=MA(CLOSE,194.16);

VARE:=(VARW+(2*STD(CLOSE,170)));

VARR:=(VARQ+(2*STD(CLOSE,170)));

VART:=IF((DATE>1080822),0,1);

VAR61:=EMA(HHV(HIGH,500),21);

VAR71:=EMA(HHV(HIGH,250),21);

VAR81:=EMA(HHV(HIGH,90),21);

VAR91:=EMA(LLV(LOW,500),21);

VARA1:=EMA(LLV(LOW,250),21);

VARB1:=EMA(LLV(LOW,90),21);

VARC1:=EMA(((VAR91*0.96+VARA1*0.96+VARB1*0.96+VAR61*0.558+VAR71*0.558+VAR81*0.558)/6),21);

VARD1:=EMA(((VAR91*1.25+VARA1*1.23+VARB1*1.20+VAR61*0.550+VAR71*0.550+VAR81*0.650)/6),21);

VARE1:=EMA(((VAR91*1.30+VARA1*1.30+VARB1*1.30+VAR61*0.680+VAR71*0.680+VAR81*0.680)/6),21);

VARF1:=EMA((((VARC1*3+VARD1*2+VARE1)/6)* 1.738),21);

 

VAR101:=REF(LOW,1);

VAR111:=((SMA(ABS((LOW-VAR101)),3,1)/SMA(MAX((LOW-VAR101),0),3,1))*100);

VAR121:=EMA(IF(((CLOSE*1.35)<=VARF1),(VAR111*10),(VAR111/10)),3);

VAR131:=LLV(LOW,30);

VAR141:=HHV(VAR121,30);

VAR151:=IF(MA(CLOSE,58),1,0);

VAR161:=(EMA(IF((LOW<=VAR131),((VAR121+(VAR141*2))/2),0),3)/618)*VAR151;

VAR171:=((IF((VAR161>50),50,VAR161)/20)*15)*VART;

主力吸筹:VAR171>中期大底,colorFF00FF,linethick0;

STICKLINE(VAR171>中期大底,中期大底,(中期大底-0.05),1,0),colorFF00FF;

DRAWTEXT(FILTER((((((LOW<=趋势) AND (CLOSE>趋势)) AND (VAR171>0)) AND ((趋势-REF(趋势,1))>0)) AND (CLOSE>OPEN)),5),(LOW-0.04),'←分时黑马'),color8CF800;

 

B1:=(HIGH+LOW+CLOSE)/3;

B6:=HHV(B1,4*15);

B7:=LLV(B1,4*15);

B8:=B6-B7;

飞龙顶底线:=MA(((B1-B7)/B8),2)*80;

DRAWTEXT(FILTER(((((飞龙顶底线<=1) AND (VAR171>0)) AND (LOW<=趋势)) AND (CLOSE>趋势)),3),(LOW-0.04),'←分时短抄'),colorFFFF00;

DRAWTEXT(FILTER((((LOW <= 趋势) AND (CLOSE >= 趋势)) AND ((趋势 - REF(趋势,1))>0)),8),(中期大底 - 0.08),'←分时半仓'),color87D826;

DRAWTEXT((((CROSS(中,短期底部) AND (HIGH<压力一)) AND (HIGH<上)) AND ((趋势-REF(趋势,1))>0)),LOW,'←分时必杀'),colorFFFFFF;

均五:=MA(CLOSE,4);

X7:=EMA(EMA(EMA(HIGH,9),9),9);

海底:=X7*0.92;

海底二:=X7*0.933;

海底三:=X7*0.897;

天际:=X7*1.05;

中线:=SMA(LOW,5,1);

中轨道:=MA(CLOSE,2);

DRAWTEXT(FILTER(((((HIGH>压力) AND (CLOSE<压力)) AND ((趋势-REF(趋势,1))<0)) AND (CLOSE

MA12:=MA(CLOSE,P);

MA42:=MA(CLOSE,42);

DRAWTEXT((((CROSS(中轨道,均五) AND (LOW<=海底)) AND ((均五-REF(均五,1))>0)) AND (CLOSE>=海底二)),LOW,'     底部'),Color00FFFF;

DRAWTEXT(((((CROSS(中轨道,海底) AND VAR171) AND (LOW<=海底)) AND ((MA20-REF(MA20,1))>0)) AND (CLOSE>海底)),(LOW-0.06),'小底不急'),colorBCF0AF;

DRAWTEXT(((((CROSS(中轨道,海底三) AND (CLOSE>OPEN)) AND ((CLOSE-REF(CLOSE,4))>0)) AND (LOW<=海底三)) AND (CLOSE>海底三)),LOW,'底二'),colorFF0000;

MA30:=MA(CLOSE,30);

 

V1:=HHVBARS(HIGH,100);

V2:=CROSS(MA(CLOSE,10),MA(CLOSE,30));

V3:=(V1>60 AND V2)*100;

DRAWTEXT((((((V3 AND (HIGH<上)) AND (CLOSE<压力)) AND (CLOSE>OPEN)) AND ((上-REF(上,1))>0)) AND ((趋势-REF(趋势,1))>0)),(LOW-0.04),'←量价齐升'),color8B0CFF;

DRAWTEXT(((((V3 AND (HIGH<趋势)) AND (HIGH<天际)) AND ((支撑-REF(支撑,1))>0)) AND ((MA20-REF(MA20,1))>0)),(LOW-0.03),'分时波段介入'),color5BA8FF;

DRAWTEXT(((CROSS(趋势,MA12) AND (CLOSE>OPEN)) AND ((趋势-REF(趋势,1))>0)),LOW,'★分时果断'),colorFF0000;

DRAWTEXT(FILTER(((((((((CROSS(支撑,MA12) AND ((MA12-REF(MA12,1))>0)) AND (HIGH<上)) AND (OPEN<压力一)) AND ((CLOSE-REF(CLOSE,1))>0)) AND ((MA42-REF(MA42,1))>0)) AND (支撑<压力)) AND (支撑>MA12)) AND ((趋势-REF(趋势,1))>0)),6),(LOW-0.02),'←分时回抽'),color4DFFFF;

DRAWTEXT((((LOW<=趋势) AND (CLOSE>=支撑)) AND ((MA120-REF(MA120,1))>0)),(LOW-0.35),'抄底'),colorFF0000;

DRAWTEXT(FILTER(((((((LOW<=短期底部) AND ((上-REF(上,1))>0)) AND ((上-REF(上,1))>0)) AND (CLOSE>OPEN)) AND (趋势线<=短期底部)) AND (CLOSE>=短期底部)),5),(LOW-0.03),'←分时望月'),colorA99FFF;

 

VAR22:=(CLOSE+HIGH+LOW)/3;

VAR33:=EMA(VAR22,10);

VAR44:=REF(VAR33,1);

FILLRGN(VAR33,VAR44,VAR33 > VAR44),Color0000FF;

FILLRGN(VAR44,VAR33,VAR33 < VAR44),Color00FF00;

DRAWTEXT(FILTER((((LOW<=中期大底) AND ((趋势-REF(趋势,1))>0)) AND VAR171),5),(LOW-0.03),'←●买点出现');

DRAWTEXT(((((LOW<=下档线) AND (LOW<=短期支撑)) AND (短期支撑<=下档线)) AND ((MA20-REF(MA20,1))> 0)),LOW,'←绝佳买点'),colorFF0000;

DRAWTEXT(((((CROSS(VAR33,MA20) AND (LOW<=VAR33)) AND (CLOSE>= VAR33)) AND ((趋势-REF(趋势,2))>0)) AND ((VAR33-REF(VAR33,1))>0)),LOW,'←回头望月'),colorFFFFFF;

DRAWTEXT(FILTER((((HIGH>压力) AND (CLOSE<压力)) AND (HIGH>阻挡线)),8),HIGH,'←减仓'),colorB0FA00;

 

cpbd:=f10find('☆[操盘必读]☆',1);

zxzb:=f10find('◆ 最新指标',cpbd+1);

zxsjsj:=f10find('◇万国测评制作',cpbd+1);

hydw:=f10find('◆ 行业地位 ◆',1000);

gxsj:=f10find('◇万国测评制作:',hydw);

zjsj:=f10text(gxsj,36);

hydw1:=f10find('所属行业:',hydw+1);

hydw3:=f10find('证监会行业:',hydw1+1);

hydw2:=f10find('截止日期:',hydw3+1);

IF hydw1>0 and hydw3>0 and hydw2>0  THEN

BEGIN

zjh:=f10text(hydw3,hydw2-hydw3);

hydw4:=f10find('共',hydw3+1);

js:=strtonum(f10text(hydw4+2,3)); 

sj:=f10text(hydw2,19);

mgsy:=f10find('每股收益 排名',hydw2+1);

mgsy1:=f10find('净资产收 排名',mgsy+1);

gpszh:=f10find(STKLABEL,mgsy);

f10str:=f10text(gpszh,73);

dm:=strleft(f10str,15);

每股收益排:strtonum(strright(f10str,3)),linethick0,PRECIS2,colorgray;

gpszh1:=f10find(STKLABEL,mgsy1);

f10str1:=f10text(gpszh1,73);

净利润排:strtonum(f10text(gpszh1+56,3)),linethick0,PRECIS2,colorgray;

主营收入排:strtonum(f10text(gpszh+56,3)),linethick0,precis2,colorgray;

净资产收益排:strtonum(strright(f10str1,3)),linethick0,precis2,colorgray;

综合排名值:每股收益排+净利润排+主营收入排+净资产收益排,linethick0,precis2,colorff00a0;

zytb:=f10find('主营收入同比增长',cpbd+1);

主营收入同比:strtonum(f10text(zytb+20,10)),linethick0,PRECIS2,colorgray;

jll:=f10find('净利润同比增长',zytb+1);

净利润同比:strtonum(f10text(jll+20,10)),linethick0,PRECIS2,colorgray;

jzc:=f10find('净资产收益率',jll+1);

净资产收益率:strtonum(f10text(jzc+20,10)),linethick0,precis2,colorgray;

zxsj:=f10text(zxzb,zxsjsj-5-zxzb);

gxsjy:=f10text(zxsjsj,34);

{--------图解模版---------}

DRAWTEXTABS(20,40,zxsj+'  '+gxsjy),ColorFFFFFF;

DRAWTEXTABS(20,60,'主营收入同比增长 '+主营收入同比+' ％'+'  净利润同比增长  '+净利润同比+' ％'+' 净资产收益率 '+净资产收益率+' ％'),ColorFFFFFF;

DRAWTEXTABS(20,80,sj+'  '+zjsj),ColorFFFFFF;

DRAWTEXTABS(20,100,zjh),ColorFFFFFF;

DRAWTEXTABS(20,120,'每股收益在本行业内排第 '+每股收益排+' 位 '+'  净利润金额在本行业内排第 '+净利润排+' 位'),ColorFFFFFF;

DRAWTEXTABS(20,140,'主营收入在本行业内排第 '+主营收入排+' 位 '+'  净资产收益在本行业内排第 '+净资产收益排+' 位'),ColorFFFFFF;

DRAWTEXTABS(20,160,dm+' 在本行业综合排名分值：'+综合排名值),Color00FFF8,linethick2;

DRAWTEXTABS(20,180,'机构当前评级:'+EXTRASTRING('评级')),Color00FFF8,linethick2;

END;