金口玉言（非常漂亮的副图 源码）

{金口玉言}
AA:=REF(CLOSE,1);
BBB:=SMA(MAX(CLOSE-AA,0),21,1)/SMA(ABS(CLOSE-AA),21,1)*1000;
HHH:=BBB-LLV(BBB,27);
CCC:=LLV(BBB,27)-BBB;
QQ:(MA(HHH*1.5,2)*3+HHH*13)/16,COLOR445EAF,LINETHICK1;
SS:(MA(CCC*1.5,2)*3+CCC*13)/16,COLORFF9D00,LINETHICK1;
QQ0:(MA(HHH*2,2)*3+HHH*13)/16,COLOR445EAF,LINETHICK1;
SS0:(MA(CCC*2,2)*3+CCC*13)/16,COLORFF9D00,LINETHICK1;
QQ1:(MA(HHH*2.5,2)*3+HHH*13)/16,COLOR445EAF,LINETHICK1;
SS1:(MA(CCC*2.5,2)*3+CCC*13)/16,COLORFF9D00,LINETHICK1;
QQ2:(MA(HHH*3,2)*3+HHH*13)/16,COLOR445EAF,LINETHICK1;
SS2:(MA(CCC*3,2)*3+CCC*13)/16,COLORFF9D00,LINETHICK1;
QQ3:(MA(HHH*3.5,2)*3+HHH*13)/16,COLOR445EAF,LINETHICK1;
SS3:(MA(CCC*3.5,2)*3+CCC*13)/16,COLORFF9D00,LINETHICK1;
QQ4:(MA(HHH*4,2)*3+HHH*13)/16,COLOR445EAF,LINETHICK1;
SS4:(MA(CCC*4,2)*3+CCC*13)/16,COLORFF9D00,LINETHICK1;
QQ5:(MA(HHH*4.5,2)*3+HHH*13)/16,COLOR445EAF,LINETHICK1;
SS5:(MA(CCC*4.5,2)*3+CCC*13)/16,COLORFF9D00,LINETHICK1;
QQ6:(MA(HHH*5,2)*3+HHH*13)/16,COLOR445EAF,LINETHICK1;
SS6:(MA(CCC*5,2)*3+CCC*13)/16,COLORFF9D00,LINETHICK1;
QQ7:(MA(HHH*5.5,2)*3+HHH*13)/16,COLOR445EAF,LINETHICK1;
SS7:(MA(CCC*5.5,2)*3+CCC*13)/16,COLORFF9D00,LINETHICK1;
SS8:(MA(CCC*6,2)*3+CCC*13)/16,COLORFF9D00,LINETHICK1;
GG:MA(HHH,3),LINETHICK2,COLORRED;
MM:MA(CCC,3),LINETHICK2,COLORGREEN;
WW:=IF(QQ<GG ,SS,MM);
EE:=IF(SS<MM ,GG,QQ);
EE1:=IF(SS<MM-4 ,GG-3,QQ-3);
WW1:=IF(QQ<GG-4 ,SS-3,MM-3);
STICKLINE(18,0,EE1-9,1,0),COLOR37A8EE;
STICKLINE(18,WW1+12,0,1,0),COLOR6E6F6F;
0,COLORB713EA,LINETHICK2;
{多空爆破}
r:=DYNAINFO(3);
q:=DATACOUNT;
hh:=DYNAINFO(5);
LL:=DYNAINFO(6);
f:=MAX(hh-r,r-LL);
q1:=r-f*1.01;//主图下边线
q2:=r-2*f*1.0125;//副图1下边线(0位线)
q3:=r-3*f*1.014;//副图2下边线(0位线)
{有了Q1、Q2、Q3，叠加副图指标也就容易了}
//在副图1叠加RSI
//在副图2叠加kd
RSV:=((((HHV(HIGH,10) - CLOSE) / (HHV(HIGH,10) - LLV(LOW,10)))*2) - 1.25);
散户:SMA(RSV,5,1);
RSV1:=((((CLOSE - LLV(LOW,10)) / (HHV(HIGH,10) - LLV(LOW,10)))*2) - 1.05);
主力:SMA(RSV1,5,1);
准备起爆:CROSS(主力,散户);
DRAWTEXT(准备起爆,120,'爆\n破\n开\n始'),COLORRED;
{抄底葫芦}
Var1:=EMA(HHV(HIGH,500),21); 
Var2:=EMA(HHV(HIGH,250),21); 
Var3:=EMA(HHV(HIGH,90),21); 
Var4:=EMA(LLV(LOW,500),21); 
Var5:=EMA(LLV(LOW,250),21); 
Var6:=EMA(LLV(LOW,90),21);
Var7:=EMA((Var4*0.96+Var5*0.96+Var6*0.96+Var1*0.558+Var2*0.558+Var3*0.558)/6,21); 
Var8:=EMA((Var4*1.25+Var5*1.23+Var6*1.2+Var1*0.55+Var2*0.55+Var3*0.65)/6,21); 
Var9:=EMA((Var4*1.3+Var5*1.3+Var6*1.3+Var1*0.68+Var2*0.68+Var3*0.68)/6,21); 
VarA:=EMA((Var7*3+Var8*2+Var9)/6*1.738,21); 
VarB:=REF(LOW,1); 
VarC:=SMA(ABS(LOW-VarB),3,1)/SMA(MAX(LOW-VarB,0),3,1)*100; 
VarD:=EMA(IF(CLOSE*1.35<=VarA,VarC*10,VarC/10),3); 
VarE:=LLV(LOW,30); 
VarF:=HHV(VarD,30); 
Var10:=IF(MA(CLOSE,58),1,0); 
QZG: EMA(IF(LOW<=VarE,(VarD+VarF*2)/2,0),3)/618*Var10, , COLORred;
QZG2: EMA(IF(LOW<=VarE,(VarD+VarF*2)/2,0),3)/-618*Var10, , COLORyellow;
Var1:=EMA(HHV(HIGH,500),21); 
Var2:=EMA(HHV(HIGH,250),21); 
Var3:=EMA(HHV(HIGH,90),21); 
Var4:=EMA(LLV(LOW,500),21); 
Var5:=EMA(LLV(LOW,250),21); 
Var6:=EMA(LLV(LOW,90),21); 
Var7:=EMA((Var4*0.96+Var5*0.96+Var6*0.96+Var1*0.558+Var2*0.558+Var3*0.558)/6,21); 
Var8:=EMA((Var4*1.25+Var5*1.23+Var6*1.2+Var1*0.55+Var2*0.55+Var3*0.65)/6,21); 
Var9:=EMA((Var4*1.3+Var5*1.3+Var6*1.3+Var1*0.68+Var2*0.68+Var3*0.68)/6,21); 
VarA:=EMA((Var7*3+Var8*2+Var9)/6*1.738,21); 
VarB:=REF(LOW,1); 
VarC:=SMA(ABS(LOW-VarB),3,1)/SMA(MAX(LOW-VarB,0),3,1)*100; 
VarD:=EMA(IF(CLOSE*1.35<=VarA,VarC*10,VarC/10),3); 
VarE:=LLV(LOW,30); 
VarF:=HHV(VarD,30); 
Var10:=IF(MA(CLOSE,58),1,0); 
RSV:=(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100))*100;
Km:=SMA(RSV,3,1);
Kt:=SMA(Km,3,1),linethick1;
Dt:=SMA(Km,11,1),linethick1;
LOWV:=LLV(LOW,8);
HIGHV:=HHV(HIGH,8);
RSV2:=EMA((CLOSE-LOWV)/(HIGHV-LOWV)*100,3);
At:=EMA(RSV,3),colorffff00,linethick1;
Bt:=MA(At,3),colorffff00,linethick1;
VAR1j:=3;
VAR2j:=((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)));
底:=IF(CROSS(VAR2j,VAR1j),1,0),colorffffff;
STICKLINE(底,0,10,2,0),colorffffff;
{耶稣十字架}
大主力:= 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);
上帝保佑:10,LINETHICK1,COLORRED;
耶苏指路: IF(CROSS(大主力,上帝保佑),20,10),LINETHICK1,COLORYELLOW;
小心:= 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);
赐我力量: IF(CROSS(小心,10),15,0),STICK ,COLORRED ,LINETHICK1;
DRAWTEXT(赐我力量,15,'抄\n底') , COLORRED ;
DRAWTEXTEX(CLOSE,1,650,80,'★红包发来、金口就开！★'),colorFFFF;
DRAWTEXTEX(CLOSE,1,718,948,STKLABEL+''+STKNAME+''),colorwhite;