通达信吸筹/吸筹快慢线副图源码

{www.qill.cn吸筹}

VAR1:=1;
VAR2:=MA(HHV(HIGH,500),21)*VAR1;
VAR3:=MA(HHV(HIGH,240),21)*VAR1;
VAR4:=MA(HHV(HIGH,90),21)*VAR1;
VAR5:=MA(LLV(LOW,500),21)*VAR1;
VAR6:=MA(LLV(LOW,240),21)*VAR1;
VAR7:=MA(LLV(LOW,90),21)*VAR1;
VAR8:=MA((VAR5*0.96+VAR6*0.96+VAR7*0.96+VAR2*0.558+VAR3*0.558+VAR4*0.558)/6,21)*VAR1;
VAR9:=MA((VAR5*1.25+VAR6*1.23+VAR7*1.2+VAR2*0.55+VAR3*0.55+VAR4*0.65)/6,21)*VAR1;
VARA:=MA((VAR5*1.3+VAR6*1.3+VAR7*1.3+VAR2*0.68+VAR3*0.68+VAR4*0.68)/6,21)*VAR1;
VARB:=MA((VAR8*3+VAR9*2+VARA)/6*1.738,21)*VAR1;
VARC:=IF(DATE<=1341231,VARB,VARB*DAY)*VAR1;
VARD:=LOW*VAR1;
VARE:=REF(LOW,1)*VAR1;
VARF:=SMA(ABS(VARD-VARE),3,1)/SMA(MAX(VARD-VARE,0),3,1)*1*VAR1;
VAR10:=MA(IF(CLOSE*1.35<=VARC,VARF*10,VARF/10),3)*VAR1;
VAR11:=LLV(LOW,30)*VAR1;
VAR12:=HHV(VAR10,30)*VAR1;
VAR13:=1391231*VAR1;
买进0号: IF(DATE<=VAR13,MA(IF(LOW<=VAR11,(VAR10+VAR12*2)/2,0),3),1)/10*VAR1;
50,POINTDOT;
选股:IF(REF(买进0号,1)>REF(买进0号,2) AND REF(买进0号,1)>买进0号,买进0号,0);
 

==================================================================

{www.qill.cn吸筹快慢线}

N:=9;M1:=3;M2:=3;P:=9;
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
K:=SMA(RSV,M1,1);
D:=SMA(K,M2,1);
JJ:=P*(3*D-2*K);
J:=((3 * K) - (2 * D));
MAIRU:=  CROSS(K,D) AND K<20;
MAICHU:= CROSS(D,K) AND D>80;
VAR2:=REF(LOW,1);
VAR3:=SMA(ABS(LOW-VAR2),3,1)/SMA(MAX(LOW-VAR2,0),3,1)*100;
VAR4:=EMA(IF(CLOSE*1.3,VAR3*10,VAR3/10),3);
VAR5:=LLV(LOW,13);
VAR6:=HHV(VAR4,13);
VAR7:=IF(MA(CLOSE,34),1,0);
VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7;
VAR9:=IF(VAR8>100,100,VAR8);
吸筹:VAR9,LINETHICK2,COLORF00FF0;
STICKLINE(VAR9>120,0,VAR9,8,1),COLORF00FF0;
快线:(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,LINETHICK2,COLORRED;
慢线:SMA(快线,M1,1),COLORGREEN;
BB:=IF(BARSLAST(CROSS(慢线,快线))>=3 AND CROSS(快线,慢线) AND 慢线<30,20,0);
AA:=IF(BARSLAST(CROSS(快线,慢线))>=4 AND CROSS(慢线,快线) AND 快线>50,20,0);
TJ1:=吸筹>0.01;
TJ2:=CROSS(快线,慢线) AND 慢线<50;
BUY:=FILTER(TJ1 AND TJ2,5);
DRAWICON(BUY,吸筹,23);