很好用的通吃岛公式全套和大家分享(通用源码)
{新通吃1号}{副图}
C0:=(HIGH+LOW+CLOSE)/(3);
A1:=HHV(C0,7);
A2:=LLV(C0,7);
A3:=A1-A2;
A4:=(EMA((C0-A2)/(A3),2))*(100);
B1:=HHV(C0,14);
B2:=LLV(C0,14);
B3:=B1-B2;
B4:=(EMA((C0-B2)/(B3),2))*(100);
C1:=HHV(C0,28);
C2:=LLV(C0,28);
C3:=C1-C2;
C4:=(EMA((C0-C2)/(C3),2))*(100);
D1:=HHV(C0,34);
D2:=LLV(C0,34);
D3:=D1-D2;
D4:=(EMA((C0-D2)/(D3),2))*(100);
E1:=HHV(C0,56);
E2:=LLV(C0,56);
E3:=E1-E2;
E4:=(EMA((C0-E2)/(E3),2))*(100);
F1:=HHV(C0,77);
F2:=LLV(C0,77);
F3:=F1-F2;
F4:=(EMA((C0-F2)/(F3),2))*(100);
VAR2:=LLV(LOW,10);
VAR3:=HHV(HIGH,25);
动力线:=(30)*(EMA(((CLOSE-VAR2)/(VAR3-VAR2))*(4),4));
爱赢:A4,CoLorFF3333;
三万英尺:B4,CoLorFF6666;
搏庄:C4,CoLorFF9933;
三兵:D4,CoLorAAAAAA;
北帝:E4,CoLorDDDDDD;
韦小宝:F4,CoLorFFFFFF;
天娇:((100)*(HHV(HIGH,20)-CLOSE))/(HHV(HIGH,20)-LLV(LOW,20)),CoLor333300;
底:10,CoLor0000FF;
买入:IF(CROSS(韦小宝,底) AND (天娇<70),30,0),CoLor00FFFF;
{通吃岛2号}{主图}
STICKLINE((CLOSE>0),2000,0,10,0),CoLor808080;
重心:=(CLOSE+(0.618)*(REF(CLOSE,1))+(0.382)*(REF(CLOSE,2))+(0.236)*(REF(CLOSE,3))+(0.146)*(REF(CLOSE,4)))/(2.382);
平衡:=EMA((SLOPE(重心,22))*(20)+重心,55);
STICKLINE((OPEN>=CLOSE) AND (重心>=平衡),HIGH,LOW,1,0),CoLor0055AA;
STICKLINE((OPEN>=CLOSE) AND (重心>=平衡),CLOSE,OPEN,8,0),CoLor0055AA;
STICKLINE((OPEN>=CLOSE) AND (重心>=平衡),CLOSE,OPEN,5,0),CoLor0077CC;
STICKLINE((OPEN>=CLOSE) AND (重心>=平衡),CLOSE,OPEN,2,0),CoLor00BBFF;
STICKLINE((OPEN<CLOSE) AND (重心>=平衡),HIGH,LOW,1,0),CoLor0000FF;
STICKLINE((OPEN<CLOSE) AND (重心>=平衡),CLOSE,OPEN,8,0),CoLor000099;
STICKLINE((OPEN<CLOSE) AND (重心>=平衡),CLOSE,OPEN,7,0),CoLor0000CC;
STICKLINE((OPEN<CLOSE) AND (重心>=平衡),CLOSE,OPEN,5,0),CoLor0000FF;
STICKLINE((OPEN<CLOSE) AND (重心>=平衡),CLOSE,OPEN,2,0),CoLor0033FF;
STICKLINE((OPEN>=CLOSE) AND (重心<平衡),HIGH,LOW,1,0),CoLor00EE00;
STICKLINE((OPEN>=CLOSE) AND (重心<平衡),CLOSE,OPEN,8,0),CoLor006600;
STICKLINE((OPEN>=CLOSE) AND (重心<平衡),CLOSE,OPEN,4,0),CoLor009900;
STICKLINE((OPEN>=CLOSE) AND (重心<平衡),CLOSE,OPEN,2,0),CoLor00EE00;
STICKLINE((OPEN<CLOSE) AND (重心<平衡),HIGH,LOW,1,0),CoLorFF9900;
STICKLINE((OPEN<CLOSE) AND (重心<平衡),CLOSE,OPEN,8,0),CoLorFF8800;
STICKLINE((OPEN<CLOSE) AND (重心<平衡),CLOSE,OPEN,8,0),CoLorFF9900;
STICKLINE((OPEN<CLOSE) AND (重心<平衡),CLOSE,OPEN,7,0),CoLorFFAA00;
STICKLINE((OPEN<CLOSE) AND (重心<平衡),CLOSE,OPEN,6,0),CoLorFFBB00;
STICKLINE((OPEN<CLOSE) AND (重心<平衡),CLOSE,OPEN,5,0),CoLorFFCC00;
STICKLINE((OPEN<CLOSE) AND (重心<平衡),CLOSE,OPEN,3,0),CoLorFFDD00;
STICKLINE((OPEN<CLOSE) AND (重心<平衡),CLOSE,OPEN,1,0),CoLorFFEE00;
MA60:MA(CLOSE,60),Linethick1,CoLorFFFFFF;
MA120:MA(CLOSE,120),Linethick1,CoLorFF0000;
MA250:MA(CLOSE,250),Linethick1,CoLor0000FF;
快速:EMA((SLOPE(EMA(CLOSE,15),10))*(15)+CLOSE,5),Linethick1,CoLor00FFFF;
VARC:=EMA(快速,3);
均速:EMA(VARC,3),Linethick1,CoLor8080FF;
慢速:EMA(均速,3),Linethick1,CoLor00FF00;
X1:=(CLOSE+LOW+HIGH)/(3);
X2:=EMA(X1,6);
X3:=EMA(X2,5);
STICKLINE((X2>=X3),X2,X3,4,0),CoLor00FFFF;
关键价:(CLOSE+(0.618)*(REF(CLOSE,1))+(0.382)*(REF(CLOSE,2))+(0.236)*(REF(CLOSE,3))+(0.146)*(REF(CLOSE,4)))/(2.382),Linethick2,CoLorFF00FF;
KS:=((CLOSE-MA(CLOSE,17))/(MA(CLOSE,17)))*((-100));
RKS:=REF(KS,1);
MLS:=((RKS)/(KS)>=1.23) AND (RKS>=8) AND ((CLOSE)/(REF(CLOSE,1))>=1.02);
跌:STICKLINE((KS>=17),(LOW)*(0.95),(LOW)*(0.98),6,1),Linethick2,CoLorFFFFFF;
弹:STICKLINE((MLS=1),(LOW)*(0.95),(LOW)*(0.98),6,1),Linethick2,CoLorFF00FF;
STICKLINE((KS>=34),(LOW)*(0.95),(LOW)*(0.98),8,1),Linethick2,CoLorFFFFFF;
卖娃:DRAWICON(FILTER(CROSS(85,((SMA(MAX(CLOSE-REF(CLOSE,1),0),7,1))/(SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)))*(100)),4),(HIGH)*(1.01),2),CoLorFFFFFF;
AA:=IF((CLOSE>=REF(CLOSE,3)),1,0);
BB:=IF((CLOSE>=REF(CLOSE,5)),1,0);
CC:=IF((CLOSE>=REF(CLOSE,7)),1,0);
DD:=IF((CLOSE>=REF(CLOSE,8)),1,0);
EE:=IF((CLOSE>=REF(CLOSE,13)),1,0);
FF:=IF((CLOSE>=REF(CLOSE,21)),1,0);
GZ2:=AA+BB+CC+DD+EE+FF;
KK:=REF(GZ2,1)+REF(GZ2,2)+REF(GZ2,3)+REF(GZ2,4);
KKK:=(KK)/(4);
DRAWICON((KKK=0) AND (GZ2>0) AND (CLOSE>REF(CLOSE,1)),(LOW)*(0.994),1),CoLorFFFF00;
DRAWTEXT((KKK=0) AND (GZ2>0) AND (CLOSE>REF(CLOSE,1)),(LOW)*(0.95),'通吃'),CoLor1EBFE1;
通吃岛新3号}{主图}
{N:1,200,26;N1:1,60,12;M:1,40,9;}
STICKLINE((CLOSE>0),75,0,10,0),CoLor808080;
VAR4:=(LOW+HIGH+CLOSE)/(3);
操作:=MA(VAR4,1);
压力线:HHV(操作,13),Linethick1,CoLorBEBCE2;
STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,5,0),CoLorFF6C00;
STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,4,0),CoLorFF7B00;
STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,3,0),CoLorFF9C00;
STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,2,0),CoLorFFBE00;
STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,2.5,0),CoLorFFCC00;
STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,1.5,0),CoLorFFFF00;
STICKLINE((CLOSE>=OPEN),CLOSE,OPEN,6,0),CoLor070084;
STICKLINE((CLOSE>=OPEN),CLOSE,OPEN,5,0),CoLor0000A3;
STICKLINE((CLOSE>=OPEN),CLOSE,OPEN,4,0),CoLor0000B7;
STICKLINE((CLOSE>=OPEN),CLOSE,OPEN,3,0),CoLor0000CD;
STICKLINE((CLOSE>=OPEN),CLOSE,OPEN,2,0),CoLor0000E9;
STICKLINE((CLOSE>=OPEN),CLOSE,OPEN,2,0),CoLor0754E9;
STICKLINE((CLOSE>=OPEN),CLOSE,OPEN,1.5,0),CoLor076EF3;
STICKLINE((CLOSE>=OPEN),CLOSE,OPEN,1,0),CoLor077BF3;
STICKLINE((CLOSE>OPEN),OPEN,LOW,1,0),CoLor0726CA;
STICKLINE((CLOSE>OPEN),CLOSE,HIGH,1,0),CoLor0726CA;
STICKLINE((OPEN>CLOSE),CLOSE,LOW,1,0),CoLorDE9100;
STICKLINE((OPEN>CLOSE),OPEN,HIGH,1,0),CoLorDE9100;
KS:=((CLOSE-MA(CLOSE,17))/(MA(CLOSE,17)))*((-100));
RKS:=REF(KS,1);
MLS:=((RKS)/(KS)>=1.23) AND (RKS>=8) AND ((CLOSE)/(REF(CLOSE,1))>=1.02);
反反弹:STICKLINE((MLS=1),OPEN,LOW,6,1),Linethick2,CoLorFF00FF;
AA:=(REF(HIGH,9)=HHV(HIGH,(2)*(9)+1));
BA:=FILTER(AA,3);
DA:=BACKSET(BA,9+1);
HD:=FILTER(DA,9);
STICKLINE(REF(HD,1),REF(HIGH,1),REF(HIGH,1),15,0),Linethick4,CoLor008000;
A1:=((SUM(AMOUNT,3))/(SUM(VOL,3)))/(100);
A2:=((SUM(AMOUNT,8))/(SUM(VOL,8)))/(100);
A3:=((SUM(AMOUNT,21))/(SUM(VOL,21)))/(100);
DIFF:=EMA(CLOSE,N1)-EMA(CLOSE,N);
DEA:=EMA(DIFF,M);
MACD:=(2)*(DIFF-DEA);
V1:=CLOSE-(A1+MA(CLOSE,3))/(2);
V2:=CLOSE-(A2+MA(CLOSE,8))/(2);
V3:=CLOSE-(A3+MA(CLOSE,21))/(2);
VA1:=CLOSE+V3-V1+MACD;
VA4:=CLOSE+V2-V1+MACD;
通吃神箭:EMA(VA1,5),Linethick2,CoLor00FFFF;
三万英尺:EMA(CLOSE,234),Linethick3,CoLor0000FF;
FF:=EMA(CLOSE,3);
MA15:=EMA(CLOSE,21);
STICKLINE((MA15>REF(MA15,1)),MA15,MA15,9,0),Linethick2,CoLor0000FF;
STICKLINE((MA15<REF(MA15,1)),MA15,MA15,9,0),Linethick2,CoLor00FF00;
DRAWTEXT(CROSS(FF,MA15),LOW,'上拐点'),CoLor00FFFF;
DRAWTEXT(CROSS(MA15,FF),HIGH,'下拐点'),CoLorFF0000;
搏庄:7,CoLorAADDCC;
A:=(INTPART((CLOSE)/(0.913)))*(0.913);
A+0.913,POINTDOT,Linethick1,CoLorFFFFFF;
B:=(INTPART((CLOSE)/(3.652)))*(3.652);
B
|