{美国地图中国制造}
input:p(15);
A:=P+(100-P)/2;
B:=(100-P)/2;
CC:=COST(A);
DD:=COST(B);
CMJZD:=(CC-DD)/(CC+DD)*100/2;
DRAWGBK(c>0,colorrgb(10,10,50),colorrgb(0,0,33),1);
顶:100,LINEDOT,,COLORffffff;
快车道:90,LINEDOT,COLOR6b9ade;;
天:64,LINEDOT,COLOREEEE00;
FILLRGN(天>40,天,40),COLOR916f87;
绿地:20,LINEDOT,,COLOR00EE00;
FILLRGN(绿地>0,绿地,0),COLORffffff;
摩 := SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14);
HD := HIGH-REF(HIGH,1);
LD := REF(LOW,1)-LOW;
DMP:= SUM(IF(HD>0 AND HD>LD,HD,0),14);
DMM:= SUM(IF(LD>0 AND LD>HD,LD,0),14);
PDI: DMP*180/SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14),colorfff,LINETHICK2;;
极限跟踪:(HHV(HIGH,180)-CLOSE)/(HHV(HIGH,180)-LLV(LOW,180))*120,colorfffFFF,linethick2,LINEDOT,;
FILLRGN(PDI<极限跟踪,PDI,极限跟踪),COLOR006900;
FILLRGN(PDI>极限跟踪,极限跟踪,PDI),COLOR000084;
FILLRGN(PDI>64,PDI,64),COLOR00beff;
TL10:=(1-WINNER(C/0.9))*100,COLORFFFF00,LINETHICK0;
TL20:=(1-WINNER(C/0.8))*100,COLOR00FFFF,LINETHICK0;
TL30:=(1-WINNER(C/0.7))*100,COLORBLUE,LINETHICK0;
STICKLINE(TL10>-10,100,100-TL10,3,0),COLOR999999;
STICKLINE(TL10>-10,100,100-TL10,2,0),COLORBBBBBB;
STICKLINE(TL10>-10,100,100-TL10,1,0),COLORDDDDDD;
STICKLINE(TL10>-10,100,100-TL10,0.5,0),COLORFFFFFF;
STICKLINE(TL20>-10,100,100-TL20,3,0),COLOR0022FF;
STICKLINE(TL20>-10,100,100-TL20,2,0),COLOR0066FF;
STICKLINE(TL20>-10,100,100-TL20,1,0),COLOR0099FF;
STICKLINE(TL20>-10,100,100-TL20,0.5,0),COLOR00DDFF;
STICKLINE(TL30>-10,100,100-TL30,3.3,0),COLORFF6600;
STICKLINE(TL30>-10,100,100-TL30,2.4,0),COLORFF8800;
STICKLINE(TL30>-10,100,100-TL30,1.3,0),COLORFFAA00;
STICKLINE(TL30>-10,100,100-TL30,0.6,0),COLORFFCC00;

CJ:=(H+L+2*O+3*C)/7;
DK:=INTPART(276/POW(DATATYPE+0.3,2)-1.1);
DN:=if(DK<5,5,DK);
KN:=POW(HHV(H,3.6*DN)/HHV(H,0),0.9);
短筹:SMA(SMA((PWINNER(36,0.66*CJ)+0.618*PWINNER(18,0.86*CJ))*61.8,1.2*dn,0.41*DN),2.2*DN,2.2*DN-1),linethick3,colorFFFF;
PARTLINE(MA(C,5)>REF(MA(C,5),1),短筹),COLOR311863,LINETHICK2;
拉高加仓:IF(MA(CMJZD,3)>REF(MA(CMJZD,3),3) AND  MA(C,20)>REF(MA(C,20),3),1,0),COLOR88,LINETHICK0;
拉高加仓1:STICKLINE(拉高加仓>0,0,MA(CMJZD,3)*0.33,2.7,0),COLOR000cff;
STICKLINE(拉高加仓>0,0,MA(CMJZD,3)*2.33,4.2,0),COLOR000cff;
STICKLINE(拉高加仓>0,0,MA(CMJZD,3)*2.33,3,0),COLOR000cff;
STICKLINE(拉高加仓>0,0,MA(CMJZD,3)*2.33,1.8,0),COLOR000cff;
STICKLINE(拉高加仓>0,0,MA(CMJZD,3)*2.33,0.6,0),COLOR000cff;
PARTLINE(C,40),LINEDOT,COLORGRAY;
绿:21,LINEDOT,,COLOR00EE00;