分时主图 
{时间设置} 
LTA:=FINANCE(7)+300000000; 
GB:=2*IF(FINANCE(7)<100000000000,FLOOR(ABS((FINANCE(7)/1000000000-1))),FLOOR(ABS((FINANCE(7)/1000000000-1)))/10),NODRAW ; 
C1:=CLOSE; 
V1:=TIME; 
A1:=COUNT(BARSCOUNT(C)=1 AND TIME<102000 ,0 ); 
T:=IF(V1<130000,(FLOOR(V1/10000)-9.5)*60+(FLOOR(V1/100)-100*FLOOR(V1/10000)), 
(FLOOR(V1/10000)-11)*60+(FLOOR(V1/100)-100*FLOOR(V1/10000))),NODRAW; 
成交额:AMOUNT,NODRAW; 
大额线:=50*3+300*GB,COLOR00FFFF; 
VV2:=SUM(AMOUNT,T),NODRAW; 
初正1:=IF(T=1 AND DYNAINFO(4)>=DYNAINFO(3),VV2,0); 
初负1:=IF(T=1 AND DYNAINFO(4)<DYNAINFO(3),VV2,0); 
初正2:=CONST(SUM(IF(T=1,初正1,0),T)),NODRAW; 
初负2:=CONST(SUM(IF(T=1,初负1,0),T)),NODRAW; 
初正:=CONST(SUM(IF(初正1>大额线 AND T=1,初正1,0),T)),NODRAW; 
初负:=CONST(SUM(IF(初负1>大额线 AND T=1,初负1,0),T)),NODRAW; 
T00:=IF(C1>REF(C1,1),0.9,-0.9); 
T01:=IF(C1<REF(C1,1),-0.9,0.9); 
T02:=T00+T01; 
TT1:=BARSLAST(CROSS(T02,0)); 
TT2:=BARSLAST(CROSS(0,T02)); 
TT:=IF(T02=1.8,1,IF(T02=-1.8,-1,0)); 
正V1:=IF(TT=1 OR (TT=0 AND TT1>TT2),成交额,0); 
负V1:=IF(TT=-1 OR (TT=0 AND TT1<TT2),成交额,0); 
正总1:=初正1+SUM(正V1,T),NODRAW,COLOR0000FF; 
负总1:=初负1+SUM(负V1,T),NODRAW,COLOR00FF00; 
总:=(正总1+负总1)+初正2+初负2,NODRAW; 
正V:=IF(正V1>大额线,正V1,0); 
负V:=IF(负V1>大额线,负V1,0); 
正总:初正+SUM(正V,T),NODRAW,COLOR0000FF; 
负总:初负+SUM(负V,T),NODRAW,COLOR00FF00; 
差%:(正总-负总)/总*100,COLOR00FF00,NODRAW; 
TTA:=INTPART(2*T/5); 
KP30:=T<240; 
KPGD:=H=HHV(H,0) AND KP30; 
GDSJ:=BARSLAST(KPGD); 
{强弱界} 
MMA30:=EMA(CLOSE,30); 
强弱界定:=EMA(CLOSE,900); 
DRAWBAND(MMA30,RGB(100,0,0),强弱界定,RGB(0,255,0)); 
DRAWICON(CROSS(MMA30,强弱界定),H,1); 
CC:=CLOSE,COLORWHITE,LINETHICK2; 
VAR7:=SMA(CC,6.18,1); 
VAR8:=SMA(VAR7,3.14,1); 
RCC:=DYNAINFO(3); 
S2:=SMA(C,3,1); 
S6:=SMA(C,5,1); 
DK:=4*(S2-S6); 
KK:=1; 
{暗轨} 
{AA1:=PLOYLINE(CLOSE<COST(50) AND T>5,COST(20)); 
BB1:=PLOYLINE(CLOSE<COST(50) AND T>5,COST(80)); 
DRAWBAND(BB1,RGB(50,50,50),AA1,DRAWNULL); 
{CYC} 
VAR1:=AMOUNT/VOL/100; 
VAR2:=(3*HIGH+LOW+OPEN+2*CLOSE)/7; 
VAR3:=SUM(AMOUNT,5)/VAR1/100; 
VAR4:=SUM(AMOUNT,13)/VAR1/100; 
VAR5:=SUM(AMOUNT,34)/VAR1/100; 
CYC5:=DMA(VAR2,VOL/VAR3); 
CYC13:=DMA(VAR2,VOL/VAR4); 
CYC34:=DMA(VAR2,VOL/VAR5); 
DRAWBAND(CYC5,RGB(00,50,50),CYC13,DRAWNULL); 
DRAWBAND(CYC13,RGB(00,150,150),CYC34,DRAWNULL); 
{分时MACD} 
昨收:=DYNAINFO(3); 
HH:=DYNAINFO(5); 
LL:=DYNAINFO(6); 
FK:=MAX(HH-昨收,昨收-LL)*0.1; 
ZS:=昨收-FK*3.2; 
Q1:=昨收-FK*3.22; 
Q2:=昨收-2*FK*3.22; 
Q3:=昨收-3*FK*3.2; 
MA5:=MA(CLOSE,5); 
MA10:=MA(CLOSE,10); 
MA20:=MA(CLOSE,20); 
MA30:=MA(CLOSE,30); 
DIF:=(EMA(CLOSE,13) - EMA(CLOSE,24)); 
DEA:=(EMA(DIF,6)); 
MACD:=5*(DIF-DEA); 
STICKLINE(MACD>=0 AND MACD>=REF(MACD,1),RCC*KK,MACD*4+RCC*KK,3,0),COLOR3333FF,LINETHICK3; 
STICKLINE(MACD>=0 AND MACD< REF(MACD,1),RCC*KK,MACD*4+RCC*KK,3,0),COLOR00D400,LINETHICK3; 
STICKLINE(MACD<0 AND MACD>=REF(MACD,1),RCC*KK,MACD*4+RCC*KK,3,0),COLOR757500,LINETHICK3; 
STICKLINE(MACD<0 AND MACD< REF(MACD,1),RCC*KK,MACD*4+RCC*KK,3,0),COLOR00D400,LINETHICK3; 
STICKLINE(DK>0,RCC*KK,RCC*KK+DK,0,1),COLOR3333FF; 
STICKLINE(DK<0,RCC*KK,RCC*KK+DK,0,1),COLOR51FF51; 
{多头MACD} 
DIFF:=EMA(CLOSE,240)-EMA(CLOSE,240)*100; 
DEAA:=EMA(DIFF,18); 
多头MACD:=(-3*(DIFF-DEAA))*20,NODRAW; 
ZD:=HHV(多头MACD,0); 
ZX:=LLV(多头MACD,0); 
CZ:=(Q2-Q3)/6; 
FDM:=MAX(ABS(ZD),ABS(ZX))*1.5; 
RB:=(Q2+Q3)/2+2*(Q2-Q3)/3/FDM*多头MACD; 
STICKLINE(多头MACD>0,RB,(Q2+Q3)/2,2,1),LINETHICK1,COLOR3333FF; 
STICKLINE(多头MACD<0,RB,(Q2+Q3)/2,2,1),LINETHICK1,COLOR00DD00; 
{火焰山及底部信号} 
FAA:=WINNER(CLOSE+CLOSE*15/100)*100; 
FBB:=WINNER(CLOSE+CLOSE*0/100)*100; 
FCC:=FAA-FBB; 
FDD:=(WINNER(CLOSE-CLOSE*0.1/100)-WINNER(CLOSE-CLOSE*15/100))*100; 
FEE:=FCC<3 AND FDD<0.5 AND OPEN!=LOW; 
FA1:=DYNAINFO(6); 
FA2:=IF(LOW>FA1,0,IF(HIGH<FA1,1,(FA1-LOW+0.01)/(HIGH-LOW+0.01))); 
FA3:=VOL/WINNER(LOW); 
FA4:=REF(HHV(CLOSE,120),1); 
FA5:=REF(LLV(CLOSE,120),1); 
FA6:=100*(CLOSE-FA5)/(FA4-FA5); 
FA7:=FA2>0 OR FA2=1; 
FA8:=FA7 AND FA3/REF(FA3,3)>=3 AND FA6<80; 
FA9:=REF(FA8,1) OR REF(FA8,2) OR REF(FA8,3) OR REF(FA8,4); 
FA10:=FA8 AND FA9; 
FA11:=IF(FILTER(FA8,3),5,0); 
FA12:=IF(FILTER(FA10,3) OR FEE,10,0); 
EEEE:=(RCC-ZS)/5; 
FVAR1:=REF(LOW,1);  
FVAR2:=SMA(ABS(LOW-FVAR1),13,1)/SMA(MAX(LOW-FVAR1,0),13,1);  
FVAR3:=EMA(FVAR2,13); 
FVAR4:=LLV(LOW,34); 
FVAR51:=EMA(IF(LOW<=FVAR4,FVAR3,0),3); 
FVAR5:=IF(FVAR51>20,20,FVAR51); 
DRAWTEXT(FA11,(Q2+Q3)/2*1.02,'★进'),COLORFFFFFF; 
DRAWTEXT(FA12,(Q2+Q3)/2*1.03,',★加'),COLORFFFFFF; 
主力进场:STICKLINE(FVAR5>REF(FVAR5,1),(Q2+Q3)/2,(Q2+Q3)/2+FVAR5*EEEE,10,0 ),COLORRED; 
洗盘:IF(FVAR5<REF(FVAR5,1),FVAR5,0),COLORGREEN,NODRAW; 
STICKLINE(FVAR5<REF(FVAR5,1),(Q2+Q3)/2,(Q2+Q3)/2+FVAR5*EEEE,5,1),COLORGREEN; 
FVAR6:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((CLOSE- 
LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1); 
FVAR7:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((OPEN-LLV 
(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1); 
FVAR8:=FVAR6<REF(FVAR7,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1); 
DRAWTEXT(FVAR8 AND COUNT(FVAR8,30)=1,(Q2+Q3)/2+3*EEEE,'★关注'),COLORFF24FF; 
JCCOUNT:=COUNT(CROSS(DIF,DEA),BARSLAST(DEA>=0)); 
二次金叉:=CROSS(DIF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1; 
STICKLINE(二次金叉,(Q2+Q3)/2,(Q2+Q3)/2*1.01,4,0),COLORFF00FF; 
DRAWTEXT(二次金叉,(Q2+Q3)/2*1.01,'★二金'),COLORYELLOW; 
HHH:=MA(CLOSE,10); 
GGG:=MA(CLOSE,12); 
上:=EMA((MA(HIGH,3) * 1.05),30); 
下:=EMA((MA(LOW,3) * 0.96),30); 
决战:STICKLINE((((CROSS(DIF,DEA) AND ((下 - REF(下,1)) > 0)) AND (MACD >= REF(MACD,1))) AND  
(DIF < 0)),(Q2+Q3)/2,(Q2+Q3)/2*1.01,1,0),COLOR0000FF; 
DRAWTEXT((((CROSS(DIF,DEA) AND ((下 - REF(下,1)) > 0)) AND (MACD >= REF(MACD,1))) AND (DIF  
<= 0)),(Q2+Q3)/2*1.01,'★金叉'),COLORFFFFFF; 
{两个主要买进信号} 
RSV:=((CLOSE-LLV(LOW,240))/(HHV(HIGH,240)-LLV(LOW,240))*200-100); 
K:=SMA(SMA(RSV,18,1),3,1); 
D:=MA(EMA(K,18),3); 
短买:=CROSS(K,D) AND K>0 AND  CLOSE<DYNAINFO(3)*1.07; 
DRAWTEXT(短买,(Q2+Q3)/2+(Q2-Q3)/1,'★短买'),COLORFFFFFF; 
YY:=SMA(VOL,30,1); 
量1:=(YY-LLV(LLV(YY,1),30))/(HHV(HHV(YY,1),30)-LLV(LLV(YY,1),30)); 
量:=(YY-LLV(LLV(YY,1),30))/(HHV(HHV(YY,1),30)-LLV(LLV(YY,1),30))>0.92; 
短横:=((HHV(CLOSE,TTA)-LLV(CLOSE,TTA))/CLOSE)<0.04; 
横后上涨:=(CLOSE/DYNAINFO(3))>=1.02=0  AND 短横 AND 量  AND CROSS(C,(MA(C*V,TTA)/MA(V,TTA) + AVEDEV(C,TTA)*2)); 
上涨:=FILTER((CROSS(横后上涨,0)AND 量 AND T>60 
OR (T>60  AND CLOSE<DYNAINFO(3)*1.04  AND (量1<0.5 OR 量1=1) AND BARSLAST(CROSS(C,(MA(C*V,TTA)/MA(V,TTA) + AVEDEV(C,TTA)*2)))<3  
AND CROSS(C,MA(HHV(C,TTA),1)))),30); 
DRAWTEXT(上涨,(Q2+Q3)/2+(Q2-Q3)/1,'★涨'),COLORRED; 
HHHH:REF(H,GDSJ),COLORFFFFFF,POINTDOT,LINETHICK1; 
过顶:IF(CROSS(C,HHHH),1,0),COLOR00FF00,POINTDOT,NODRAW; 
冲高:IF(FILTER(CROSS(C,HHHH*1.01),15),1,0),COLOR00FFFF,POINTDOT,NODRAW; 
DRAWBAND(VAR7,RGB(255,255,0),VAR8,RGB(0,255,255)); 
DRA  |