请老师帮我把分时庄高公式中的“庄”出现时做个选股公式，谢谢！ 源码：VAR1:=EMA(EMA(CLOSE,13),13); 控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000; STICKLINE(控盘<0,控盘,0,1,1),COLOR00FF00; STICKLINE(控盘>REF(控盘,1) AND 控盘<0,控盘,0,1,1),COLORFF00FF; 无庄控盘:=控盘<0; STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,1,1),COLOR0000FF; 有庄控盘:=控盘>REF(控盘,1) AND 控盘>0; VAR2:=100*WINNER(CLOSE*0.95); STICKLINE(控盘0,控盘,0,1,1),COLORFFFF00; 主力出货:=控盘0; STICKLINE(VAR2>50 AND COST(85)0,控盘,0,1,1),COLOR00FFFF; 高度控盘: VAR2>50 AND COST(85)0,ColorFF00FF,LINETHICK2; A10:=CROSS(控盘,0); 控盘B:=FILTER(IF(A10,1,0),5); {控盘买卖条件} STJ01:=控盘0.5; STJ02:=控盘>0; BTJ2:=控盘>REF(控盘,1) AND 控盘<-0.2; BTJ22:=控盘>REF(控盘,1) AND 控盘<0 ; {分时价格原码} jj:=DYNAINFO(11);{波段买卖原码}P:=55;S:=8;M1:=3;能量:(EMA(CLOSE,S)-EMA(C,P))*10,LINETHICK2,COLOR0000FF;空头:EMA(能量,M1),COLOR00FF00;{股价与均线偏离买卖条件}BTJ1:=(CLOSE-JJ)/JJ<-0.005;BTJ11:=(CLOSE-JJ)/JJ<-0.03;BTJ12:=ref(LAST(JJ>=REF(JJ,1)),1)>=4 AND (CLOSE-JJ)/JJ<0.005; STJ1:=(C-JJ)/JJ>0.005; {波段买卖条件} BTJ3:=CROSS(能量,空头) AND 能量<-0.3; BTJ32:=CROSS(能量,空头) AND 能量<-0.1; STJ31:=CROSS(空头,能量); STJ32:=CROSS(空头,能量) AND 能量>1.618; {以下为信号};A:=8; BTJ81:=FILTER(BTJ1 AND BTJ2 AND BTJ3,A); BTJ811:=FILTER(BTJ11 AND BTJ2 AND BTJ3,A); BTJ82:=FILTER(BTJ12 AND BTJ22 AND BTJ32,A); 时长:=if(HOUR>=9 AND HOUR<14 ,1,0);no numeric noise key 1004 有庄:btj811 and time>15 and 时长,ColorFF8000,STICK,LINETHICK3; DRAWICON(BTJ811 AND TIME>5 and 时长,0,9),ALIGN1;{有庄}; DRAWTEXT(BTJ811 AND TIME>5 and 时长,1.5,'庄'),Color00FFFF,ALIGN1; STJ81:=FILTER(STJ1 AND STJ01 AND STJ31,A); STJ82:=FILTER(STJ02 AND STJ32 ,A); STJ83:=STJ81 AND STJ82; DRAWTEXT(STJ83,空头,'卖'),ColorFFFFFF,ALIGN1; {量价新高} T:=BARSCOUNT(CLOSE); 分钟数:=IF(TIME0/60-570<=130,TIME0/60-570,TIME0/60-660); AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN)); 主买:=IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSEOPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE0 AND 价新高>REF(价新高,1) AND 量新高>REF(量新高,1) AND 净流入>0,Color00FFFF,STICK,linethick3;
公式模块：
P:=55;S:=8;M1:=3;
能量:=(EMA(CLOSE,S)-EMA(C,P))*10; VAR1:=EMA(EMA(CLOSE,13),13); 空头:=EMA(能量,M1); 控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000; BTJ2:=控盘>REF(控盘,1) AND 控盘<-0.2; JJ:=DYNAINFO(11); BTJ11:=(CLOSE-JJ)/JJ<-0.03; BTJ3:=crOSS(能量,空头) AND 能量<-0.3; A:=8; BTJ811:=FILTER(BTJ11 AND BTJ2 AND BTJ3,A); 时长:=IF(HOUR>=9 AND HOUR<14 ,1,0);{9点至 14点} BTJ811 AND TIME>5 AND 时长;
