VAR2:=LLV(LOW,33);
VAR3:=HHV(HIGH,21);
VAR4:=EMA((CLOSE-VAR2)/(VAR3-VAR2)*100,20)*0.998;
短線通道:20,COLORGREEN;
短線頂部:85,COLORFF00FF;
強弱分界:50,COLOR00FFFF;
DRAWTEXT(FILTER(CLOSE>0,100),15,'安全區(qū)'),COLORWHITE;
短線:EMA(0.667*REF(VAR4,1)+0.333*VAR4,1);
STICKLINE(短線>=REF(短線,1),短線+0.5,短線-1,6,0),COLORRED,LINETHICK2;
STICKLINE(短線<REF(短線,1),短線+0.5,短線-1,6,0),COLOR00FF00;
STICKLINE(短線通道>短線,短線通道,短線,7,0),COLOR00FFFF,
LINETHICK3;
DRAWTEXT(CROSS(短線,短線通道) ,短線+1,'買不虧'),COLORFF00FF;
XG:CROSS(短線,短線通道)*40;
R1:=(CLOSE-LLV(LOW,90))/(HHV(HIGH,90)-LLV(LOW,90))*200;
R2:=EMA((CLOSE-(LLV(LOW,5)))/((HHV(HIGH,5))-(LLV(LOW,5)))*100,4)*2;
R3:=EMA(0.618*REF(R2,1)+0.382*R2,2);
R4:=POW(MA(CLOSE,5),2)+MA(CLOSE,5);
R5:=POW(MA(LOW,5),2)+MA(LOW,5);
R6:=POW(MA(HIGH,5),2)+MA(HIGH,5);
R7:=(R4-LLV(R5,64))/(HHV(R6,64)-LLV(R5,64))*150+65-10;
R8:=SMA((SMA(R7,3,1)*1.5-100),3,1);
R9:=3*(SMA(R7,3,1)*1.5-100)-2*R8;
R10:=(HIGH+LOW+CLOSE*2)/4;
R11:=(R10-(EMA(R10,13)))*100/(STD(R10,13));
R12:=EMA((EMA(R11,5)),13)+200-100;
R13:=(SMA(R1,3,1))+R2+(SMA(R7,3,1)*1.5-100)+R12;
R14:=(SMA((SMA(R1,3,1)),3,1))+R3+R8+(EMA(R12,10));
R15:=(3*(SMA(R1,3,1))-2*(SMA((SMA(R1,3,1)),3,1)))+(3*R12-2*(EMA(R12,10)))+
R9+(3*R12-2*(EMA(R12,10)));
R16:=(HIGH+LOW+CLOSE)/3;
R17:=(R16-MA(R16,34))/(0.015*AVEDEV(R16,34));
R18:=(HIGH+LOW+CLOSE+R16)/4;
R19:=(R18-(EMA(R18,24)))/(STD(R18,24))*100;
R20:=(R16-MA(R16,24))/(0.015*AVEDEV(R16,24));
R21:=(((EMA(R19,5))+R20+R17)/3+165)/4;
R22:=(R13+R14+R15*30)/32/5-15;
A1:=EMA(EMA(CLOSE,13),13);
A2:=(A1-REF(A1,1))/REF(A1,1)*6400;
A3:=100*WINNER(CLOSE*0.95);
買賣: EMA(((R21+R22)/2/1.1),1),COLORRED,LINETHICK2;
確認:MA(買賣,3),COLORWHITE,LINETHICK2;
AR1:=EMA(OPEN,7);
AR2:=EMA(AR1,21);
AR3:=CROSS(AR1,AR2);
AR5:=EMA(SMA((CLOSE-LLV(LOW,20))/(HHV(HIGH,16)-LLV(LOW,20))*100,8,1),3);
短買:IF(TROUGHBARS(1,6,1)=0 AND HIGH>LOW+0,50,20),COLORLIBLUE;
短賣:IF(PEAKBARS(2,9,1)=1,50,80),COLORMAGENTA;
中買 : IF(TROUGHBARS(3,18,1)=0 AND HIGH>LOW+0.1,20,0),COLORLIMAGENTA,LINETHICK2;
中賣: IF(PEAKBARS(2,15,1)=0,80,100),COLORRED;
全買: (ZIG(3,35)>REF(ZIG(3,35),1) AND REF(ZIG(3,35),1)<REF(ZIG(3,35),2))
*90,STICK,COLORRED,LINETHICK3;
全賣: (ZIG(3,35)<REF(ZIG(3,35),1) AND REF(ZIG(3,35),1)>REF(ZIG(3,35),2))
*90,STICK,COLORGREEN,LINETHICK3;
中線:50,COLORWHITE;
{紅柱抄底}
BIAS1:=(C-MA(C,6))/MA(C,6)*100;
BIAS2:=(C-MA(C,12))/MA(C,12)*100;
BIAS3:=(C-MA(C,24))/MA(C,24)*100;
BIAS:=(BIAS1+2*BIAS2+3*BIAS3)/6;
乖離:=MA(BIAS,3);
STICKLINE(CROSS(BIAS,乖離) AND 乖離<-9.5,60,0,2,0),COLORRED;
{MACD,KDJ共振選股公式 }
主力進入:=IF(CLOSE/REF(CLOSE,1)>1.010 AND HIGH/CLOSE<1.010 AND IF(CLOSE>REF(CLOSE,1),88,0)>0, 1, 0);
XG11:主力進入*8,COLORRED;
DIF:=(EMA(CLOSE,12)-EMA(CLOSE,26))*100;
DEA:=EMA(DIF,9);
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,9,1);
D:=SMA(K,9,1);
B4:(CROSS(DIF,DEA) AND CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)))*40;