【A交易趋势系统】(分析家主图)
文章出处： 发布时间：2006-07-17
【A交易趋势系统】(分析家主图)
{A交易趋势系统 分析家}
{☆功能开关}
INPUT:K1(1,0,1),K2(1,0,1),K3(3,0,3),K4(1,0,1),K5(1,0,1);
{☆背景设置}
DRAWGBKLAST(v>1,STRIP(RGB(90,90,90),RGB(00,0,0),0));
partline(c*2-ref(c,3),c>0),MOVE3,color008888;
partline(ref(c,1)*2-ref(c,4),c>0),MOVE2,color008800;
partline(ref(c,2)*2-ref(c,5),c>0),MOVE1,Color00007D;
{大盘相关}
TS0:=BARSSINCE(C);
TS1:=BARSLAST(BARSSINCE(BACKSET(BARSTATUS=2,60+1))=0);
TS:=IF(TS0<60,TS0,TS1);{上市时间短于参数N，调整叠加的基准日}
BL:=REF(IndexC/C,TS);{确定基准日压缩比率}
FC:=C*BL/BL;
FIndexC:=IndexC/BL;{按比率压缩大盘指数，以便跟个股收盘比较}
PARTLINE(FIndexC,K5=1),COLORWHITE;
相似度:INTPART(BETA2(FC,FIndexC,60)*100)/100,LINETHICK0;
AA:=REF(H,4)=HHV(H,2*4+1);
AAA:=FILTER(AA,4);
BB:=BACKSET(AAA,4+1);
CC1:=FILTER(BB,4);
CC:=CC1 OR BARSTATUS=2;
AA2:=REF(L,4)=LLV(L,2*4+1);
AAA2:=FILTER(AA2,4);
BB2:=BACKSET(AAA2,4+1);
CC22:=FILTER(BB2,4);
CC2:=CC22 AND NOT(CC1);
EA:=BACKSET(CC,REF(BARSLAST(CC2),1)+1);
EB:=EA>REF(EA,1); EE:=BACKSET(EB,2);
FF1:=EE>REF(EE,1);
EE2:=BACKSET(FF1 AND COUNT(CC,REF(BARSLAST(CC2),1)+2)=0,REF(BARSLAST(CC2),1)+2);
FF2:=EE2>REF(EE2,1);
EE3:=BACKSET(FF2 AND COUNT(CC,REF(BARSLAST(CC2),1)+2)=0,REF(BARSLAST(CC2),1)+2);
FF3:=EE3>REF(EE3,1);
JS:=IF(CC,COUNT(CC2,REF(BARSLAST(CC),1)+1),0);
G1:=IF(JS=1 AND CC,BARSLAST(FF1),0);
GA:=IF(CC AND REF(L,BARSLAST(FF1))>=REF(L,BARSLAST(FF2)),BARSLAST(FF2),BARSLAST(FF1));
G2:=IF(JS=2 AND CC,GA,0);
G3:=IF(JS>=3 AND CC,IF(CC AND REF(L,GA)>=REF(L,BARSLAST(FF3)),BARSLAST(FF3),GA),0);
GG:=G1+G2+G3;
JA:=BACKSET(CC,GG); JB:=JA>REF(JA,1); JJ:=BACKSET(JB,2);
QLD:=JJ>REF(JJ,1);
LD1:=QLD OR BARSTATUS=2;
hEA:=BACKSET(LD1,REF(BARSLAST(CC),1)+1);
hEB:=hEA>REF(hEA,1); hEE:=BACKSET(hEB,2);
hFF1:=hEE>REF(hEE,1);
hEE2:=BACKSET(hFF1 AND COUNT(LD1,REF(BARSLAST(CC),1)+2)=0,REF(BARSLAST(CC),1)+2);
hFF2:=hEE2>REF(hEE2,1);
hEE3:=BACKSET(hFF2 AND COUNT(LD1,REF(BARSLAST(CC),1)+2)=0,REF(BARSLAST(CC),1)+2);
hFF3:=hEE3>REF(hEE3,1);
hJS:=IF(LD1,COUNT(CC1,REF(BARSLAST(LD1),1)+1),0);
hG1:=IF(hJS=1 AND LD1,BARSLAST(hFF1),0);
hGA:=IF(LD1 AND REF(H,BARSLAST(hFF1))<=REF(H,BARSLAST(hFF2)),BARSLAST(hFF2),BARSLAST(hFF1));
hG2:=IF(hJS=2 AND LD1,hGA,0);
hG3:=IF(hJS>=3 AND LD1,IF(LD1 AND REF(H,hGA)<=REF(H,BARSLAST(hFF3)),BARSLAST(hFF3),hGA),0);
hGG:=hG1+hG2+hG3;
hJA:=BACKSET(LD1,hGG); hJB:=hJA>REF(hJA,1); hJJ:=BACKSET(hJB,2);
QHD:=hJJ>REF(hJJ,1);
{刺刀射线}
X1:=BACKSET(BARSTATUS=2,BARSLAST(QLD)+1);
X2:=X1>REF(X1,1);
Y1:=BACKSET(BARSTATUS=2,BARSLAST(QHD)+1);
Y2:=Y1>REF(Y1,1);
QZ1:=IF(BARSLAST(X2)<BARSLAST(Y2),X2,Y2);
QZ2:=IF(BARSLAST(X2)<BARSLAST(Y2),L,H);
{低点连线}
UU:=BACKSET(BARSTATUS=2,BARSLAST(QLD)+1);
QVV:=UU>REF(UU,1);
WW:=BACKSET(QVV,REF(BARSLAST(QLD),1)+2);
QXX:=WW>REF(WW,1);
{高点连线}
UU2:=BACKSET(BARSTATUS=2,BARSLAST(QHD)+1);
QVV2:=UU2>REF(UU2,1);
WW2:=BACKSET(QVV2,REF(BARSLAST(QHD),1)+2);
QXX2:=WW2>REF(WW2,1);
{稳健右侧交易}
BA1:=MA(C,13);
QZX:=REF(BA1,13/2+1);
{转向K线}
A:=(C-REF(C,1))/REF(C,1)*100;
DA1:=BARSLAST(A>3);
QA2:=IF(DA1>0,1,0);
{生命线}
QLIFE:=(EMA(CLOSE,60)+EMA(CLOSE,90))/2;
{下降阻击线}
Var1:=(2*CLOSE+HIGH+LOW)/4;
QSNOOK:=EMA(Var1,99)*0.91;
{不计K线}
QYY:=H>REF(H,1) AND L<REF(L,1);{//孕育线}
QHB:=H<REF(H,1) AND L>REF(L,1);{//怀抱线}
{趋势箱体}
DQDB:=LLV(L,4);
CQDB:=LLV(L,19);
DQGD:=HHV(H,4);
CQGD:=HHV(H,19);
{圈叉靶心}
QJC:=CROSS("MACD.DIFF#WEEK"(10,6,3),"MACD.DEA#WEEK"(10,6,3));
QHZ:=2*("MACD.DIFF#WEEK"(10,6,3)-"MACD.DEA#WEEK"(10,6,3));
QZKD:=CROSS("KDJ.K#WEEK","KDJ.D#WEEK") and "KDJ.D#WEEK"<30;
{//------【数值显示】}
{支撑压力}
H1:IF(K2=1,REF(H,BARSLAST(QVV2)),C),COLORFF66FF,POINTDOT,LINETHICK1;
H2:IF(K2=1,REF(H,BARSLAST(QXX2)),C),COLORFF66FF,POINTDOT,LINETHICK1;
L1:IF(K2=1,REF(L,BARSLAST(QVV)),C),COLOR99FF66,POINTDOT,LINETHICK1;
L2:IF(K2=1,REF(L,BARSLAST(QXX)),C),COLOR99FF66,POINTDOT,LINETHICK1;
{//------【图解模板】}
{上下影线}
STICKLINE(C>REF(C,1),L,H,0.1,0),COLORRED;
STICKLINE(C<=REF(C,1),L,H,0.1,0),COLORCYAN;
{下跌实体}
STICKLINE(C<QZX,C,O,8,0 ),COLOR008800;
STICKLINE(C<QZX,C,O,7,0 ),COLOR009900;
STICKLINE(C<QZX,C,O,6,0 ),COLOR00AA00;
STICKLINE(C<QZX,C,O,5,0 ),COLOR00BB00;
STICKLINE(C<QZX,C,O,4,0 ),COLOR00CC00;
STICKLINE(C<QZX,C,O,3,0 ),COLOR00DD00;
STICKLINE(C<QZX,C,O,2,0 ),COLOR00EE00;
STICKLINE(C<QZX,C,O,1,0 ),COLOR00FF00;
{上涨实体}
STICKLINE(C>=QZX,C,O,8,0),COLORFF00FF;
STICKLINE(C>=QZX,C,O,7,0),COLORFF22FF;
STICKLINE(C>=QZX,C,O,6,0),COLORFF44FF;
STICKLINE(C>=QZX,C,O,5,0),COLORFF66FF;
STICKLINE(C>=QZX,C,O,4,0),COLORFF88FF;
STICKLINE(C>=QZX,C,O,3,0),COLORFF99FF;
STICKLINE(C>=QZX,C,O,2,0),COLORFFAAFF;
STICKLINE(C>=QZX,C,O,1,0),COLORFFBBFF;
{三分盘整}
STICKLINE(((H>QSNOOK AND L<QSNOOK) OR (H>QLIFE AND L<QLIFE)) AND (K3=1 OR K3=3),C,O,8,0 ),COLOR777777;
STICKLINE(((H>QSNOOK AND L<QSNOOK) OR (H>QLIFE AND L<QLIFE)) AND (K3=1 OR K3=3),C,O,7,0 ),COLOR888888;
STICKLINE(((H>QSNOOK AND L<QSNOOK) OR (H>QLIFE AND L<QLIFE)) AND (K3=1 OR K3=3),C,O,6,0 ),COLOR999999;
STICKLINE(((H>QSNOOK AND L<QSNOOK) OR (H>QLIFE AND L<QLIFE)) AND (K3=1 OR K3=3),C,O,5,0 ),COLORAAAAAA;
STICKLINE(((H>QSNOOK AND L<QSNOOK) OR (H>QLIFE AND L<QLIFE)) AND (K3=1 OR K3=3),C,O,4,0 ),COLORBBBBBB;
STICKLINE(((H>QSNOOK AND L<QSNOOK) OR (H>QLIFE AND L<QLIFE)) AND (K3=1 OR K3=3),C,O,3,0 ),COLORCCCCCC;
STICKLINE(((H>QSNOOK AND L<QSNOOK) OR (H>QLIFE AND L<QLIFE)) AND (K3=1 OR K3=3),C,O,2,0 ),COLORDDDDDD;
STICKLINE(((H>QSNOOK AND L<QSNOOK) OR (H>QLIFE AND L<QLIFE)) AND (K3=1 OR K3=3),C,O,1,0 ),COLOREEEEEE;
{不计K线}
{//STICKLINE((QYY=1 OR QHB=1) AND (K3=2 OR K3=3),H*1.01,L*0.99,10,1),COLORDDDDDD;}
STICKLINE((QYY=1 OR QHB=1) AND (K3=2 OR K3=3),C,O,8,0 ),COLORFF0000;
STICKLINE((QYY=1 OR QHB=1) AND (K3=2 OR K3=3),C,O,7,0 ),COLORFF2200;
STICKLINE((QYY=1 OR QHB=1) AND (K3=2 OR K3=3),C,O,6,0 ),COLORFF4400;
STICKLINE((QYY=1 OR QHB=1) AND (K3=2 OR K3=3),C,O,5,0 ),COLORFF6600;
STICKLINE((QYY=1 OR QHB=1) AND (K3=2 OR K3=3),C,O,4,0 ),COLORFF8800;
STICKLINE((QYY=1 OR QHB=1) AND (K3=2 OR K3=3),C,O,3,0 ),COLORFFAA00;
STICKLINE((QYY=1 OR QHB=1) AND (K3=2 OR K3=3),C,O,2,0 ),COLORFFBB00;
STICKLINE((QYY=1 OR QHB=1) AND (K3=2 OR K3=3),C,O,1,0 ),COLORFFCC00;
{转向K线}
STICKLINE(C>=QZX AND QA2=0,H,L,0,0),COLOR00EEFF;
STICKLINE(C>=QZX AND QA2=0,O,C,8,0),COLOR0000FF;
STICKLINE(C>=QZX AND QA2=0,O,C,7,0),COLOR0022FF;
STICKLINE(C>=QZX AND QA2=0,O,C,6,0),COLOR0044FF;
STICKLINE(C>=QZX AND QA2=0,O,C,5,0),COLOR0066FF;
STICKLINE(C>=QZX AND QA2=0,O,C,4,0),COLOR0088FF;
STICKLINE(C>=QZX AND QA2=0,O,C,3,0),COLOR00AAFF;
STICKLINE(C>=QZX AND QA2=0,O,C,2,0),COLOR00CCFF;
STICKLINE(C>=QZX AND QA2=0,O,C,1,0),COLOR00EEFF;
{趋势描写}
DRAWTEXT((DQDB-CQDB)>(CQGD-DQGD) AND K1=1 AND BARSTATUS=2,DQDB,'趋势↑'),COLORMAGENTA;
PARTLINE(DQDB,(DQDB-CQDB)>(CQGD-DQGD) AND K1=1),COLORMAGENTA;
DRAWTEXT((DQDB-CQDB)<(CQGD-DQGD) AND K1=1 AND BARSTATUS=2,DQGD,'趋势↓'),COLORCYAN;
PARTLINE(DQGD,(DQDB-CQDB)<(CQGD-DQGD) AND K1=1),COLORCYAN;
{箱体描写}
PARTLINE(CQDB,DQDB=CQDB AND CQDB=REF(CQDB,1) AND K1=1),linethick2,COLORYELLOW;
DRAWTEXT(DQDB=CQDB AND CQDB=REF(CQDB,1) AND K1=1 AND BARSTATUS=2,CQDB,'筑底↑'),COLORYELLOW;
PARTLINE(CQGD,DQGD=CQGD AND CQGD=REF(CQGD,1) AND K1=1),linethick2,COLORGREEN;
DRAWTEXT(DQGD=CQGD AND CQGD=REF(CQGD,1) AND K1=1 AND BARSTATUS=2,CQGD,'铸顶↓'),COLORGREEN;
{刺刀射线}
DRAWLINE(QZ1 AND K2=1,QZ2,BARSTATUS=2,C,0),COLORFF9900,POINTDOT;
{低点连线}
DRAWLINE(QXX AND K2=1,L,QVV,L,1),COLORYELLOW,POINTDOT;
{高点连线}
DRAWLINE(QXX2 AND K2=1,H,QVV2,H,1),COLORYELLOW,POINTDOT;
{初始原点}
DRAWICON(QHD AND QXX2 AND K2=1,H*1.006,9),ALIGN1;
DRAWICON(QLD AND QXX AND K2=1,L*1.006,10),ALIGN1;
{圈叉靶心}
DRAWICON(QJC AND QHZ>0 AND REF(QHZ,1)<0,L*0.99,4),ALIGN0;
DRAWICON(QZKD,L*0.98,6),ALIGN0;
{时间之窗}
QSSWB:=BARSLAST( REF(ZIG(3,19),1)<REF(ZIG(3,19),2));
QXDWB:=BARSLAST(ZIG(3, 19)>REF(ZIG(3,19),1));
DRAWTEXT(QSSWB=2 AND K4=1,l*0.98,'3'),COLOR0000FF;
DRAWTEXT(QSSWB=4 AND K4=1,h*1.02,'5'),COLOR9966FF;
DRAWTEXT(QSSWB=7 AND K4=1,l*0.98,'8'),COLOR00FFFF;
DRAWTEXT(QSSWB=12 AND K4=1,h*1.02,'13'),COLORFF33FF;
DRAWTEXT(QSSWB=20 AND K4=1,l*0.98,'21'),COLOR0066FF;
DRAWTEXT(QSSWB=33 AND K4=1,h*1.02,'34'),COLORFFFF00;
DRAWTEXT(QSSWB=54 AND K4=1,l*0.98,'55'),COLOR006600;
DRAWTEXT(QSSWB=88 AND K4=1,h*1.02,'89'),COLOR00FF00;
DRAWTEXT(QSSWB=143 AND K4=1,l*0.98,'144'),COLORCCFFFF;{//上升舞步}
DRAWTEXT(QXDWB=3 AND K4=1,l*0.98,'3'),COLOR0000FF;
DRAWTEXT(QXDWB=5 AND K4=1,h*1.02,'5'),COLOR9966FF;
DRAWTEXT(QXDWB=8 AND K4=1,l*0.98,'8'),COLOR00FFFF;
DRAWTEXT(QXDWB=13 AND K4=1,h*1.02,'13'),COLORFF33FF;
DRAWTEXT(QXDWB=21 AND K4=1,l*0.98,'21'),COLOR0066FF;
DRAWTEXT(QXDWB=34 AND K4=1,h*1.02,'34'),COLORFFFF00;
DRAWTEXT(QXDWB=55 AND K4=1,l*0.98,'55'),COLOR006600;
DRAWTEXT(QXDWB=89 AND K4=1,h*1.02,'89'),COLOR00FF00;
DRAWTEXT(QXDWB=144 AND K4=1,l*0.98,'144'),COLORCCFFFF;{//下跌舞步}
{明日K线}
MRZY:=INTPART((((REF(H,1)-REF(L,1))*8/10)+C)*100)/100;
MRZS:=INTPART((C-((REF(H,1)-REF(L,1))*8/20))*100)/100;{//止赢止损}
DRAWTEXT(C>O AND BARSTATUS=2,MRZY,' ￣￣'),COLORMAGENTA;
DRAWTEXT(C>O AND BARSTATUS=2,MRZS,' ￣￣'),COLORMAGENTA;
DRAWTEXT(C<=O AND BARSTATUS=2,MRZY,' ￣￣'),COLORCYAN;
DRAWTEXT(C<=O AND BARSTATUS=2,MRZS,' ￣￣'),COLORCYAN;
============================================================
【B资金流向】与【C投资风险】(分析家 )
{泡哥右侧交易系统之 B资金流向分析 分析家 }
{☆背景设置}
DRAWGBKLAST(v>1,STRIP(RGB(00,0,0),RGB(90,90,90),0));
{☆资金流向}
{//——————【参数定义】}
ZLCM:=EMA(WINNER(CLOSE)*70,3);{//主力筹码估算}
SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3);{//散户筹码估算}
ZSHTL:=SHCM/(ZLCM+SHCM)*100;{//散户套牢筹码比率}
ZZLKP:=ZLCM/(ZLCM+SHCM)*100;{//主力控盘筹码比率}
ZCMZL:=MA(ZLCM+SHCM,13);{//市场筹码总量}
ZZNTS:=BARSLAST(ZSHTL<90 AND REF(ZSHTL,1)>90);{//走牛天数}
ZSHJJ:=EMA(ZSHTL,89);{//散户警戒}
ZZLJJ:=EMA(ZZLKP,89);{//主力警戒}
ZJLRQD:=INTPART(ZZLKP-ZZLJJ);{//资金流入强度}
SH8:=EMA(ZSHTL,8);
DKB:=IF(ZZLKP-REF(ZZLKP,1)>ZSHTL-REF(ZSHTL,1),1,0);
{//——————【数值显示】}
散户套牢系数:INTPART(ZSHTL),LINETHICK0,COLORWHITE;
主力控盘系数:INTPART(ZZLKP),LINETHICK0,COLORCYAN;
资金流入强度:ZJLRQD,LINETHICK0,COLORRED;
市场筹码总量:INTPART(ZCMZL),LINETHICK0,COLORGREEN;
{//——————【图解模板】}
{神秘黑洞}
FILLRGN(ZSHTL,0,REF(ZSHTL,1)>90 AND ZSHTL<90),COLOR9966FF;
{散户套牢筹码}
STICKLINE(C>0,ZSHTL,ZZLKP,0,0),COLOREEEEEE;
{散户筹码警戒}
STICKLINE(ZSHJJ>REF(ZSHJJ,1),ZSHTL,ZSHJJ,1,0),COLORaaaaaa;
{散户线}
PARTLINE(ZSHTL,C>0),POINTDOT,COLORYELLOW;
{主力控盘筹码}
STICKLINE(C>0,ZZLKP,0,7,0),COLORBLUE;
{铸顶风险区}
STICKLINE(ZZLKP>75,ZZLKP,0,7,0),COLORFFFFFF;
{主力筹码警戒}
STICKLINE(ZZLJJ>REF(ZZLJJ,1),ZZLKP,ZZLJJ,7,0),COLORRED;
{筑底散兵坑}
STICKLINE(ZSHTL>=90,ZZLKP,0,7,0),COLOR66FFCC;
{筹码总量}
PARTLINE(ZCMZL,C>0),COLORGREEN;
{筹码总量上升}
PARTLINE(ZCMZL,ZCMZL>REF(ZCMZL,1)),COLOR0066FF;
{增量资金}
DRAWTEXT(ZCMZL>REF(ZCMZL,1) AND SH8<REF(SH8,1) AND BARSTATUS=2,ZCMZL,'←增量资金');
{//------【解盘分析】}
TJTS:=BARSTATUS=2;
DRAWTEXT(TJTS and C>0,130,'资金流向分析 '),LINETHICK6,Coloryellow,ALIGN2;
DRAWTEXT(TJTS and C>0,130,' '+STKLABEL+' '+STKNAME+' '),LINETHICK6,ColorFFFF80,ALIGN2;
DRAWTEXT(TJTS and C>0,128,' '+ '走牛天数判断：'+' '+NUMTOSTRN( ZZNTS,0 )+' '),LINETHICK3,ColorFFFF80,ALIGN2;
{主力动向监控}
DRAWTEXT(TJTS and ZCMZL>REF(ZCMZL,1) AND DKB=1,110,'主力动向监控：主力增仓 '),COLORRED,ALIGN2;
DRAWTEXT(TJTS and ZCMZL>REF(ZCMZL,1) AND DKB=0,110,'主力动向监控：主力减仓 '),COLORMAGENTA,ALIGN2;
DRAWTEXT(TJTS and ZCMZL=REF(ZCMZL,1),110,'主力动向监控：多空平衡 '),COLORGRAY,ALIGN2;
DRAWTEXT(TJTS and ZCMZL<REF(ZCMZL,1) AND DKB=1,110,'主力动向监控：主力回补 '),COLORFF9933,ALIGN2;
DRAWTEXT(TJTS and ZCMZL<REF(ZCMZL,1) AND DKB=0,110,'主力动向监控：主力出逃 '),COLORGREEN,ALIGN2;
{特别信号提示}
DRAWTEXT(TJTS and ZSHTL>90,100,'特别信号提示：筑底散兵坑 '),COLOR66FFCC,ALIGN2;
DRAWTEXT(TJTS and ZZLKP>75,100,'特别信号提示：铸顶风险区 '),COLORCYAN,ALIGN2;
DRAWTEXT(TJTS and CROSS(ZCMZL,ZZLJJ) AND ZZLKP>ZZLJJ AND ZZLKP>10 AND ZZLJJ>REF(ZZLJJ,1) AND ZCMZL>REF(ZCMZL,1),100,'特别信号提示：穿越主力 '),COLORRED,ALIGN2;
DRAWTEXT(TJTS and CROSS(ZCMZL,ZZLKP) AND ZZLKP>ZZLJJ AND ZZLKP<ZSHTL AND ZZLKP>10 AND ZZLJJ>REF(ZZLJJ,1) AND ZCMZL>REF(ZCMZL,1),100,'特别信号提示：穿越主力 '),COLORYELLOW,ALIGN2;
DRAWTEXT(TJTS and CROSS(ZCMZL,ZSHTL) AND ZSHTL>ZZLKP AND ZCMZL>REF(ZCMZL,1),100,'特别信号提示：穿越散户 '),COLORGREEN,ALIGN2;
DRAWTEXT(TJTS and CROSS(ZCMZL,100) AND ZCMZL>REF(ZCMZL,1),100,'特别信号提示：全盘穿越 '),COLOR3399FF,ALIGN2;
DRAWTEXT(TJTS and REF(ZSHTL,1)>90 AND ZSHTL<90,100,'特别信号提示：神秘黑洞 '),COLOR9966FF,ALIGN2;
==========================================================
============================================================
{泡哥右侧交易系统之C投资风险控制 分析家}
{☆背景设置}
{DRAWGBK(C=C,COLORRGB(130,130,130),COLORRGB(30,30,30),1);}
DRAWGBKLAST(v>1,STRIP(RGB(130,130,130),RGB(30,30,30),0));
{☆精确风险}
{//------【参数定义】}
RSV:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
K1:=SMA(RSV,10,1);
D1:=SMA(K1,5,1);
KK:=INTPART(K1);
DD:=INTPART(D1);
TFXXS:=KK+DD;{//变异KD风险系数}
TGLD:=MOD(TFXXS,10);{//踏浪涨停概率点}
TGLXS:=(TFXXS-REF(TFXXS,1))*10;{//变异KD乖离系数}
TYCFX:=TFXXS+TGLXS;{//变异KD预测风险}
{//------【数值显示】}
风险系数:TFXXS,LINETHICK0,COLORYELLOW;
乖离系数:TGLXS,LINETHICK0,COLORGREEN;
预测风险:TYCFX,LINETHICK0,COLORCYAN;
{//------【图解模板】}
{级别拐点}
VERTLINE(TGLXS>0 AND 100+TGLXS<TYCFX AND 100+REF(TGLXS,1)>=REF(TYCFX,1),1),COLORYELLOW;
VERTLINE(TGLXS<0 AND 100+TGLXS>=TYCFX AND 100+REF(TGLXS,1)<REF(TYCFX,1),1),COLORYELLOW;
{乖离系数}
STICKLINE(TGLXS>0,100,100+TGLXS,8,0),COLOR000088;
STICKLINE(TGLXS>0,100,100+TGLXS,7,0),COLOR000099;
STICKLINE(TGLXS>0,100,100+TGLXS,6,0),COLOR0000AA;
STICKLINE(TGLXS>0,100,100+TGLXS,5,0),COLOR0000BB;
STICKLINE(TGLXS>0,100,100+TGLXS,4,0),COLOR0000CC;
STICKLINE(TGLXS>0,100,100+TGLXS,3,0),COLOR0000DD;
STICKLINE(TGLXS>0,100,100+TGLXS,2,0),COLOR0000EE;
STICKLINE(TGLXS>0,100,100+TGLXS,1,0),COLOR0000FF;{//红柱}
STICKLINE(TGLXS<0,100,100+TGLXS,8,0),COLOR008800;
STICKLINE(TGLXS<0,100,100+TGLXS,7,0),COLOR009900;
STICKLINE(TGLXS<0,100,100+TGLXS,6,0),COLOR00AA00;
STICKLINE(TGLXS<0,100,100+TGLXS,5,0),COLOR00BB00;
STICKLINE(TGLXS<0,100,100+TGLXS,4,0),COLOR00CC00;
STICKLINE(TGLXS<0,100,100+TGLXS,3,0),COLOR00DD00;
STICKLINE(TGLXS<0,100,100+TGLXS,2,0),COLOR00EE00;
STICKLINE(TGLXS<0,100,100+TGLXS,1,0),COLOR00FF00;{//绿柱}
STICKLINE(TGLXS=0 AND REF(TGLXS,1)>=0,100,100+TGLXS,8,0),COLORRED;
STICKLINE(TGLXS=0 AND REF(TGLXS,1)<0,100,100+TGLXS,8,0),COLORGREEN;
{风险系数}
PARTLINE(TFXXS,TFXXS<160 AND TFXXS>50),LINETHICK2,COLORFF66FF;
PARTLINE(TFXXS,TFXXS>50 AND TFXXS<160 AND TFXXS<REF(TFXXS,1)),LINETHICK2,COLORWHITE;
PARTLINE(TFXXS,TFXXS<=50),LINETHICK2,COLORYELLOW;
PARTLINE(TFXXS,TFXXS>=160),LINETHICK2,COLORBLUE;
{预测风险}
PARTLINE(TYCFX,C>0),COLORCYAN;
{//------【解盘分析】}
DRAWTEXT(BARSTATUS=2 and TFXXS<=50,50,'操作风险提示：买入风险'),COLORYELLOW,ALIGN2;
DRAWTEXT(BARSTATUS=2 and TFXXS>=160,50,'操作风险提示：卖出风险'),COLORCYAN,ALIGN2;
DRAWTEXT(BARSTATUS=2 and TFXXS>50 AND TFXXS<160 AND TFXXS>=REF(TFXXS,1) AND TFXXS<=100,50,'操作风险提示：追涨博弈'),COLORRED,ALIGN2;
DRAWTEXT(BARSTATUS=2 and TFXXS>50 AND TFXXS<160 AND TFXXS>=REF(TFXXS,1) AND TFXXS>100,50,'操作风险提示：稳健持股'),COLORMAGENTA,ALIGN2;
DRAWTEXT(BARSTATUS=2 and TFXXS>50 AND TFXXS<160 AND TFXXS<REF(TFXXS,1) AND TFXXS>100,50,'操作风险提示：盘跌减仓'),COLORWHITE,ALIGN2;
DRAWTEXT(BARSTATUS=2 and TFXXS>50 AND TFXXS<160 AND TFXXS<REF(TFXXS,1) AND TFXXS<=100,50,'操作风险提示：杀跌空仓'),COLORGREEN,ALIGN2