|
G1 Y:=(H+L)/2; AA:=REF((SMA(Y,5,1)),3); BB:=REF((SMA(Y,8,1)),5); CC:=REF((SMA(Y,13,1)),8); DD:=REF((SMA(Y,25,1)),5); MA1: AA,COLORGREN; Q:IF(MA1>REF(MA1,1),MA1,DRAWNULL),COLORRED,LINETHICK1; MA2:DD,COLOR399A2C; R2:=REF(BB,5); KU1:=IF(HIGH=HHV(HIGH,3),1,0); KD1:=IF(LOW=LLV(LOW,3),1,0); UL:=IF(REF(KU1,2)=1 AND REF(KU1,1)=0 AND KU1=0,REF(HIGH,2),REF(HIGH,2+BARSLAST(REF(KU1,2)=1 AND REF(KU1,1)=0 AND KU1=0))); DL:=IF(REF(KD1,2)=1 AND REF(KD1,1)=0 AND KD1=0,REF(LOW,2),REF(LOW,2+BARSLAST(REF(KD1,2)=1 AND REF(KD1,1)=0 AND KD1=0))); 上分形:IF(HIGH>=R2,UL,REF(UL,BARSLAST(HIGH>R2))), POINTDOT,LINETHICK3,,COLORMAGENTA; 下分形:IF(LOW<=R2,DL,REF(DL,BARSLAST(LOW<=R2))), POINTDOT,LINETHICK3,COLORYELLOW; DRAWICON(CLOSE>上分形 AND REF(CLOSE,1)<REF(上分形,1),HIGH*1.03,1); DRAWICON(CLOSE<下分形 AND REF(CLOSE,1)>REF(下分形,1),LOW*0.99,2); W1:=C=HHV(C,20); W2:=BARSLAST(W1); W3:=IF(W2>0,REF(C,W2),REF(C,W2)); W4:=CROSS(C,REF(W3,1)); 突破盘整:=W4 AND COUNT(W4,5)=1; STICKLINE(突破盘整,OPEN,CLOSE,2,0),COLORRED; G2 A:=AMOUNT/V/100;
VARA:=EMA((((A-EMA(A,13))/EMA(A,13))*(0-100)),5);
操盘线:=EMA(((VARA/10)+EMA(A,10)),3);
行情线:=EMA(A,3);
重心:=(C+0.618*REF(C,1)+0.382*REF(C,2)+0.236*REF(C,3)+0.146*REF(C,4))/2.382;
趋势线:EMA(((SLOPE(C,22)*20)+C),55),COLORYELLOW,LINETHICK1;
红升:IF(重心>=趋势线,趋势线,DRAWNULL),COLORRED,LINETHICK1;
绿降:IF(重心<趋势线,趋势线,DRAWNULL),COLOR33FF33,LINETHICK1;
{压力支撑线}
压力:MA(REF(HHV(C,40),1),2),COLORWHITE,POINTDOT;
支撑:MA(REF(LLV(C,40),1),2),COLORYELLOW,POINTDOT;
{顶底信号}
DRAWTEXT(CROSS(行情线,操盘线),L*0.98,'★B'),COLORGRAY;
JH:=SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1)),5,1)*100;
DRAWTEXT(CROSS(84,JH),H*1.02,'☆S'),COLORMAGENTA;
G-DDX 量:VOL,LINETHICK0; {预量:IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL),COLORFFFF00;}
STICKLINE(CLOSE>=REF(CLOSE,1),VOL,0,2.5.1,1),COLORRED;
STICKLINE(CLOSE< REF(CLOSE,1),VOL,0,2.5.1,1),COLORCYAN;
AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
买盘:=IF(CLOSE>OPEN,AA*(HIGH-LOW),
IF(CLOSE<OPEN,AA*((HIGH-OPEN)+(CLOSE-LOW)),VOL /2)),LINETHICK0,COLORRED;
卖盘:=IF(CLOSE>OPEN,AA*((HIGH-CLOSE)+(OPEN-LOW)),
IF(CLOSE<OPEN,AA*(HIGH-LOW),VOL /2)),LINETHICK0,COLORCYAN;
STICKLINE(买盘>0,0,买盘,1.2,0),COLORRED;
买卖%:ABS(买盘/卖盘),NODRAW,COLORWHITE; M5:=MA(买盘,5),COLORFFFFFF,LINETHICK1;
MM5:=MA(卖盘,5),COLOR00FF00,LINETHICK1;
五日均差:ABS(M5/MM5),NODRAW,COLORFFFFFF; 买盘大卖盘％:=(买盘-卖盘)/买盘*100,COLORRED;
卖盘大买盘％:=(卖盘-买盘)/卖盘*100,COLORCYAN,; 二十换:SUM(V/CAPITAL*100,20),COLORRED,POINTDOT;
量能:(AMOUNT/CLOSE)/HHV((AMOUNT/CLOSE),26)*100,COLORRED,NODRAW;
DRAWTEXT(量能 >=100,量*0.90,'*'),COLORYELLOW; M1:MA(VOL,5),COLORFFFFFF;
M2:MA(VOL,13),COLOR33FF33; G-MACD DIF:EMA(CLOSE,9)-EMA(CLOSE,18),COLOR33FF33,LINETHICK1;
Q:IF(DIF>REF(DIF,1),DIF,DRAWNULL),COLORRED,LINETHICK1;
DEA:EMA(DIF,7),LINETHICK1,COLORFFFFFF;
MACD:2*(DIF-DEA),NODRAW;
STICKLINE(MACD>=0 AND MACD>=REF(MACD,1),0,MACD,0.1,0),COLOR0000FF;
STICKLINE(MACD>=0 AND MACD< REF(MACD,1),0,MACD,0.1,0),COLORFFFF00;
STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,0.1,0),COLORFF99FF;
STICKLINE(MACD<0 AND MACD< REF(MACD,1),0,MACD,0.1,0),COLORFFFF00;
DRAWICON(CROSS(DIF,DEA),DIF*1,1);
DRAWICON(CROSS(DEA,DIF),DIF*1,2); VDIF:EMA(VOL,9)-EMA(VOL,18),COLOR33FF33,NODRAW;
VDEA:EMA(VDIF,7),COLORFFFFFF,NODRAW;
VMACD:VDIF-VDEA,COLORGREEN,NODRAW; 涨家数:INDEXADV,NODRAW,COLORLIMAGENTA ;
跌家数:INDEXDEC,NODRAW,COLORGREEN; AA:=REF(DIF,N2)=HHV(DIF,2*N2+1);
BB:=BACKSET(AA,N2+1);
CC:=FILTER(BB,N2) AND DIF=HHV(DIF,N2+1);
A1:=BARSLAST(REF(CC,1));
顶背离:=REF(CLOSE,A1+1)<CLOSE AND REF(DIF,A1+1)>DIF AND CC;
STICKLINE(顶背离,0,-0.08,5,0),COLORGREEN;
AA2:=REF(DIF,N2)=LLV(DIF,2*N2+1);
BB2:=BACKSET(AA2,N2+1);
CC2:=FILTER(BB2,N2) AND DIF=LLV(DIF,N2+1);
A2:=BARSLAST(REF(CC2,1));
底背离:=REF(CLOSE,A2+1)>CLOSE AND REF(DIF,A2+1)<DIF AND CC2;
STICKLINE(底背离,0,0.1,5,0),COLORYELLOW;
G-RSI N1=3; LC:=REF(CLOSE,1); RSI:SMA(MAX(CLOSE-LC,0),N,1)/SMA(ABS(CLOSE-LC),N1,1)*100,COLOR33FF33,LINETHICK1; QRSI:IF(RSI>REF(RSI,1),RSI,DRAWNULL),COLORRED,LINETHICK2; MA5:SMA(RSI,9,1),COLORFFFFFF; AA:=REF(RSI,N1)=HHV(RSI,2*N1+1); BB:=BACKSET(AA,N1+1); CC:=FILTER(BB,N1) AND RSI=HHV(RSI,N1+1); A1:=BARSLAST(REF(CC,1)); 顶背离:=REF(CLOSE,A1+1)<CLOSE AND REF(RSI,A1+1)>RSI AND CC; DRAWICON(顶背离,RSI*1.1,2); AA2:=REF(RSI,N1)=LLV(RSI,2*N1+1); BB2:=BACKSET(AA2,N1+1); CC2:=FILTER(BB2,N1) AND RSI=LLV(RSI,N1+1); A2:=BARSLAST(REF(CC2,1)); 底背离:=REF(CLOSE,A2+1)>CLOSE AND REF(RSI,A2+1)<RSI AND CC2; DRAWICON(底背离,RSI*0.98,1); 80,COLORWHITE,POINTDOT; 20,COLORYELLOW,POINTDOT; G-ROC N=12;M=6;X=9 VAR1:=AMO/V; V1:(VAR1-REF(VAR1,N))/REF(VAR1,N)*100,COLOR33FF33,LINETHICK1; QV1:IF(V1>REF(V1,1),V1,DRAWNULL),COLORRED,LINETHICK2; V2:MA(V1,M),COLORE99A2C,LINETHICK1; V3:EMA(V2,X),COLORFFFFFF,LINETHICK1; G-AMO M=13;M1=34;M2=55 VA:=IF(CLOSE>REF(CLOSE,1),VOL,-VOL); OBV:SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0),COLOR33FF33,LINETHICK1; Q:IF(OBV>REF(OBV,1),OBV,DRAWNULL),COLORRED,LINETHICK2; MA1:MA(OBV,M),COLORE99A2C,LINETHICK1; MA2:MA(OBV,M1),COLORFFFFFF,LINETHICK1; MA3:MA(OBV,M2),COLORYELLOW,LINETHICK1; G-VOL n:=12; A1:=SMA(AMOUNT,10,1)/10000000;
B1:=C>REF(C,1);
B2:=C<=REF(C,1); ZF:=(C-REF(C,1))/REF(C,1)*100;
DD:=SUM(IF (B1,A1*ZF,0),N);
KK:=SUM(IF (B2,A1*ZF,0),N); DF:=SMA(DD,3,1);
KF:=-1*SMA(KK,3,1);
AM:DF-KF,COLOR33FF33,LINETHICK1;
QAM:IF(AM>REF(AM,1),AM,DRAWNULL),COLORRED,LINETHICK1;
MA3:SMA(AM,3,1),COLORFFFFFF,LINETHICK1;
DRAWICON((CROSS(AM,MA3) AND AM <0.3),AM*1,1); AC:(AM-MA3)*2,NODRAW;
STICKLINE(AC>REF(AC,1),0,AC,2.2,1),COLORRED;
STICKLINE(AC<REF(AC,1),0,AC,2.2,1),COLORGREEN; G-KD Q2:=(CLOSE-LLV(LOW, 18))/(HHV(HIGH, 18)-LLV(LOW, 18))*100;
Q3:=SMA(Q2, 9, 1);
Q4:=SMA(Q3, 3, 1);
K:3*Q3-2*Q4,COLOR33FF33,LINETHICK1;
QK:IF(K>REF(K,1),K,DRAWNULL),COLORRED,LINETHICK2;
趋势线:EMA(Q3, 3),LINETHICK1,COLORFFFFFF;
DRAWTEXT(CROSS(趋势线, K) AND REF(K,1)>80, REF(K,3), 'T'),COLORRED,LINETHICK5;
逢低买: DRAWTEXT(REF(CROSS(趋势线,K),82) AND 趋势线>1.3*K,K,'R'),LINETHICK1;
买: DRAWTEXT(REF(CROSS(K,趋势线),1) AND K>1.3*趋势线,趋势线,'B'),COLORRED,LINETHICK1;
VAR3:=PEAKBARS(3,15,1)<10;
VAR5:=IF(VAR3=1,2,0);
顶:= IF(VAR5=2,2,0);
顶A:IF(顶>REF(顶,1),20,0),COLORGREEN,LINETHICK2;
金叉: CROSS(K,趋势线);
DRAWICON(金叉,K*1,1); AA:=REF(K,N2)=HHV(K,2*N2+1);
BB:=BACKSET(AA,N2+1);
CC:=FILTER(BB,N2) AND K=HHV(K,N2+1);
A1:=BARSLAST(REF(CC,1));
顶背离:=REF(CLOSE,A1+1)<CLOSE AND REF(K,A1+1)>K AND CC;
STICKLINE(顶背离,75,80,5,0),COLORGREEN;
AA2:=REF(K,N2)=LLV(K,2*N2+1);
BB2:=BACKSET(AA2,N2+1);
CC2:=FILTER(BB2,N2) AND K=LLV(K,N2+1);
A2:=BARSLAST(REF(CC2,1));
底背离:=REF(CLOSE,A2+1)>CLOSE AND REF(K,A2+1)<K AND CC2;
STICKLINE(底背离,20,30,5,0),COLORYELLOW;
G-QR LC:=REF(CLOSE,1); RSI1:=SMA(MAX(CLOSE-LC,0),14,1)/SMA(ABS(CLOSE-LC),14,1)*100; DLC:=REF(INDEXC,1); RSI2:=SMA(MAX(INDEXC-LC,0),14,1)/SMA(ABS(INDEXC-DLC),14,1)*100; AS:(RSI1/RSI2)*100,COLOR33FF33,LINETHICK1; QAS:IF(AS>REF(AS,1),AS,DRAWNULL),COLORRED,LINETHICK2; M1:EMA(AS,10),COLORE99A2C; M2:EMA(AS,20),COLORFFFFFF,LINETHICK1; 买股找我 趋势线: 3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-
2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1), COLORE99A2C;
见底信号: 10, , COLORRED;
买点准备: IF(趋势线<=10,50,0), COLORGREEN;
买入时间: IF(CROSS(趋势线,见底信号),100,0), , COLORYELLOW; 卖股找我 VAR1:=1;
VAR2:=LLV(LOW,10);
VAR3:=HHV(HIGH,25);
警戒线: P1*VAR1, , ;
减仓线: P2*VAR1, , ;
卖出线: P3*VAR1, , ;
动力线: EMA((CLOSE-VAR2)/(VAR3-VAR2)*4,4)*VAR1;
DRAWTEXT(CROSS(动力线,警戒线),2,'警惕！！ '),COLORWHITE;
DRAWTEXT(CROSS(动力线,减仓线),2.8,'逢高减磅！！！ '), ,;
DRAWTEXT(CROSS(动力线,卖出线),3.5,'出局？ '), , ;
DRAWICON(CROSS(动力线,警戒线),3,2);
DRAWICON(CROSS(动力线,减仓线),3.4,2);
DRAWICON(CROSS(动力线,卖出线),3.9,2); 排序 排序:ABS(ma(c,20)-ma(c,90))/ma(c,60); 视窗 MFI:(H-L)*100000/V,NODRAW;
A1:=MFI>=REF(MFI,1)*1.1 AND V>=REF(V,1)*1.1;
A2:=MFI<=REF(MFI,1)*0.9 AND V<=REF(V,1)*0.9; A3:=MFI>=REF(MFI,1)*1.1 AND V<=REF(V,1)*0.9;
A4:=MFI<=REF(MFI,1)*0.9 AND V>=REF(V,1)*1.1;
绿窗:IF(A1=1,0.1,0),COLORGREEN;
STICKLINE(A1,0,1,0.5,0),COLORGREEN;
衰退:IF(A2=1,0.1,0),COLOR0000FF;
STICKLINE(A2,0,1,0.5,0),COLOR0000FF;
伪装:IF(A3=1,0.1,0),COLORFF4242;
STICKLINE(A3,0,1,0.5,0),COLORFF4242;
蛰伏:IF(A4=1,0.1,0),COLORYELLOW;
STICKLINE(A4,0,1,0.5,0),COLORYELLOW; 庄影难逃 VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
成交:VOL,POINTDOT;
MFI:(H-L)*100000/V,NODRAW;
主动买盘:=IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),COLORRED,POINTDOT;
主动卖盘:=IF(CLOSE>OPEN,0-VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-VAR1*(HIGH-LOW),0-VOL/2)),COLOR00FF00,POINTDOT;
STICKLINE(VOL>0,VOL,0,2,1),COLORWHITE;
STICKLINE(主动买盘>0,0,主动买盘,2,0),COLORRED;
STICKLINE(主动卖盘<0,0,主动卖盘,2,0),COLOR00FF00;
买%:主动买盘/VOL; JM:=主动买盘+主动卖盘;
五日翻红天:COUNT(JM>0,5),COLOR33FF33,NODRAW;
十三日翻红天:COUNT(JM>0,13),COLORRED,NODRAW; 二十换:SUM(V/CAPITAL*100,20),COLOR33FF33,POINTDOT; 量能:(AMOUNT/CLOSE)/HHV((AMOUNT/CLOSE),26)*100,COLORRED,NODRAW;
DRAWTEXT(量能 >=100,成交*0.90,'*'),COLORYELLOW;
MACD日月周
DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA :=EMA(DIFF,9);
金叉:=CROSS(DIFF,DEA);
死叉:=CROSS(DEA,DIFF);
{周金叉,死叉}
周DIFF:='MACD.DIF#WEEK';
周DEA:='MACD.DEA#WEEK';
DIF周金叉:=CROSS(周DIFF,周DEA);
DIF周死叉:=CROSS(周DEA, 周DIFF);
{月金叉,死叉}
月DIFF:='MACD.DIF#MONTH';
月DEA:='MACD.DEA#MONTH';
DIF月金叉:=CROSS(月DIFF,月DEA);
DIF月死叉:=CROSS(月DEA, 月DIFF); CDA:= 周DIFF<REF(周DIFF,1) AND 周DIFF>0;
CDB:= 周DIFF>=REF(周DIFF,1) AND 周DIFF>0;
CDC:= 周DIFF>REF(周DIFF,1) AND 周DIFF<0;
CDD:= 周DIFF<=REF(周DIFF,1) AND 周DIFF<0; BDA:= 月DIFF<REF(月DIFF,1) AND 月DIFF>0;
BDB:= 月DIFF>=REF(月DIFF,1) AND 月DIFF>0;
BDC:= 月DIFF>REF(月DIFF,1) AND 月DIFF<0;
BDD:= 月DIFF<=REF(月DIFF,1) AND 月DIFF<0; ADA:=DIFF<REF(DIFF,1) AND DIFF>0;
ADB:=DIFF>=REF(DIFF,1) AND DIFF>0;
ADC:=DIFF>REF(DIFF,1) AND DIFF<0;
ADD:=DIFF<=REF(DIFF,1) AND DIFF<0; STICKLINE(CDA=1,3,2,1,0),COLOR00AAFF;{黄色段}
STICKLINE(CDB=1,3,2,1,0),COLOR0000AA; {红色段}
STICKLINE(CDC=1, 3,2,1,0),COLORAA00BB;{向上粉红}
STICKLINE(CDD=1,3,2,1,0),COLOR33FF33;
STICKLINE(DIF周金叉=1,3,2,1,0),COLORFFFFFF;
STICKLINE(DIF周死叉=1,3,2,1,0), COLORFF4242; STICKLINE(BDA=1,0,1,1,0),COLOR00AAFF;{黄色段}
STICKLINE(BDB=1 ,0,1,1,0),COLOR0000AA; {红色段}
STICKLINE(BDC=1,0,1,1,0),COLORAA00BB;{向上粉红}
STICKLINE(BDD=1,0,1,1,0),COLOR33FF33;
STICKLINE(DIF月金叉=1,0,1,1,0),COLORFFFFFF;
STICKLINE(DIF月死叉=1,0,1,1,0), COLORFF4242; STICKLINE(ADA=1,5,4,1,0),COLOR00AAFF;{黄色段}
STICKLINE(ADB=1,5,4,1,0),COLOR0000AA; {红色段}
STICKLINE(ADC=1,5,4,1,0),COLORAA00BB;{向上粉红}
STICKLINE(ADD=1,5,4,1,0),COLOR33FF33;
STICKLINE(金叉=1,5,4,1,0),COLORFFFFFF;
STICKLINE(死叉=1,5,4,1,0), COLORFF4242;
0； 价量齐升 b:=SMA((3*h+2*c+o+l)/7,10,1); w1:=-100*(HHV(Hhv(b,1),N1)-b)/(HHV(Hhv(b,1),N1)-LLV(Llv(b,1),N1)); w2:=-100*(HHV(Hhv(b,1),N2)-b)/(HHV(Hhv(b,1),N2)-LLV(Llv(b,1),N2)); w3:=-100*(HHV(Hhv(b,1),N3)-b)/(HHV(Hhv(b,1),N3)-LLV(Llv(b,1),N3)); w4:=-100*(HHV(Hhv(b,1),N4)-b)/(HHV(Hhv(b,1),N4)-LLV(Llv(b,1),N4)); 价格WR:(w1+w2+w3+w4)/4,colorgreen,linethick1; a:=SMA(vol,10,1); wr1:=-100*(HHV(Hhv(a,1),N1)-a)/(HHV(Hhv(a,1),N1)-LLV(Llv(a,1),N1)); wr2:=-100*(HHV(Hhv(a,1),N2)-a)/(HHV(Hhv(a,1),N2)-LLV(Llv(a,1),N2)); wr3:=-100*(HHV(Hhv(a,1),N3)-a)/(HHV(Hhv(a,1),N3)-LLV(Llv(a,1),N3)); wr4:=-100*(HHV(Hhv(a,1),N4)-a)/(HHV(Hhv(a,1),N4)-LLV(Llv(a,1),N4)); 量WR:(wr1+wr2+wr3+wr4)/4,coloryellow,linethick1; WR1: -100*(HHV(HIGH,55)-CLOSE)/(HHV(HIGH,55)-LLV(LOW,55)),colorred,linethick2; 多空平衡:-50,pointdot;安全线:-20,pointdot;风险区:-80,pointdot,colorcyan; 主筹散筹 主筹估算:EMA(WINNER(C)*70,3),LINETHICK2,COLORRED;
散筹估算:EMA((WINNER(C*1.1)-WINNER(C*0.9))*70,3),LINETHICK1,COLORGREEN;
筹码锁定:散筹估算-主筹估算,COLORFFBB00;
动态底部:EMA(IF(L<= LLV(L,99),SMA(ABS(L-REF(L,1)),99,1)/SMA(MAX(L-REF(L,1),0),99,1),0)*5,3),COLORYELLOW;
STICKLINE(动态底部>0,0,动态底部,4,0),COLORYELLOW;
STICKLINE(筹码锁定>0,筹码锁定,散筹估算,4,0),COLOR009900;
STICKLINE(筹码锁定<=0,0,散筹估算,4,0),COLOR009900;
STICKLINE(筹码锁定>0,0,筹码锁定,4,0),COLORFFBB00;
STICKLINE(筹码锁定<0,0,筹码锁定,4,0),COLORFFBB00;
主筹估算,LINETHICK2,COLORRED;
涨:CROSS(主筹估算,筹码锁定),COLORWHITE;
强:CROSS(主筹估算,散筹估算),COLOR00AAFF;
STICKLINE(涨,0,筹码锁定,4,0),COLORWHITE;
STICKLINE(强,0,散筹估算,4,0),COLOR00AAFF;
DRAWICON(CROSS(主筹估算,散筹估算),散筹估算,1);
DRAWICON(CROSS(主筹估算,筹码锁定),主筹估算-0.2,1);
|
