通达信飞扬席位之神采飞扬主图源码
通达信飞扬席位之神采飞扬主图源码
{神采飞扬}
五:MA(C,5);
十:MA(C,10);
卅:MA(C,30);
六十:MA(C,60);
百二:MA(C,120);
N:=IF(TOTALBARSCOUNT>=120,120,TOTALBARSCOUNT);
{本输出适用于锁定K线数为120,N可改为你习惯的K线数,见下图}
HH0:=HHV(H,N);
LL0:=LLV(L,N);
MM0:=CONST((HH0+LL0)*0.5);
T1:=IF(FINDSTR(EXTERNSTR(0,13),'万元'),STRCAT('敢死队席位：',EXTERNSTR(0,13)),'');
T2:=IF(FINDSTR(EXTERNSTR(0,12),'。'),STRCAT('智能诊断：',EXTERNSTR(0,12)),'');
T3:=IF(FINDSTR(EXTERNSTR(0,8),'公告'),STRCAT('年报业绩：',EXTERNSTR(0,8)),'');
T4:=IF(FINDSTR(EXTERNSTR(0,10),'，'),STRCAT('主题投资：',EXTERNSTR(0,10)),'');
T5:=IF(FINDSTR(EXTERNSTR(0,15),'-'),STRCAT('解禁日期：',EXTERNSTR(0,15)),'');
T6:=IF(FINDSTR(EXTERNSTR(0,1),'，'),STRCAT('千股千评：',EXTERNSTR(0,1)),'');
T7:=IF(FINDSTR(EXTERNSTR(0,14),'-'),STRCAT('业绩预报：',EXTERNSTR(0,14)),'');
T8:=IF(FINDSTR(EXTERNSTR(0,11),'-'),STRCAT('机构评级：',EXTERNSTR(0,11)),'');
T9:=IF(FINDSTR(EXTERNSTR(0,9),'-'),STRCAT('中报业绩：',EXTERNSTR(0,9)),'');
S01:=CONST(IF(REF(C,N-15)>MM0,1.00,-0.04));
S02:=CONST(IF(REF(C,N-15)>MM0,-1,1));
S1:=IF(FINDSTR(EXTERNSTR(0,13),'万元'),S01+(0.04*S02),S01);
S2:=IF(FINDSTR(EXTERNSTR(0,12),'。'),S1+(0.04*S02),S1);
S3:=IF(FINDSTR(EXTERNSTR(0,8),'公告'),S2+(0.04*S02),S2);
S4:=IF(FINDSTR(EXTERNSTR(0,10),'，'),S3+(0.04*S02),S3);
S5:=IF(FINDSTR(EXTERNSTR(0,15),'-'),S4+(0.04*S02),S4);
S6:=IF(FINDSTR(EXTERNSTR(0,1),'，'),S5+(0.04*S02),S5);
S7:=IF(FINDSTR(EXTERNSTR(0,14),'-'),S6+(0.04*S02),S6);
S8:=IF(FINDSTR(EXTERNSTR(0,11),'-'),S7+(0.04*S02),S7);
S9:=IF(FINDSTR(EXTERNSTR(0,9),'-'),S8+(0.04*S02),S8);
DRAWTEXT_FIX(1,0,S1,0,T1)COLOR00FFFF;
DRAWTEXT_FIX(1,0,S2,0,T2)COLORFFFFFF;
DRAWTEXT_FIX(1,0,S3,0,T3)COLORFF00FF;
DRAWTEXT_FIX(1,0,S4,0,T4)COLOR0088FF;
DRAWTEXT_FIX(1,0,S5,0,T5)COLOR00FF00;
DRAWTEXT_FIX(1,0,S6,0,T6)COLOR0000FF;
DRAWTEXT_FIX(1,0,S7,0,T7)COLOR00CCFF;
DRAWTEXT_FIX(1,0,S8,0,T8)COLORFF88FF;
DRAWTEXT_FIX(1,0,S9,0,T9)COLORBBFFFF;
