N1:=21;DA1:=IF(130>TOTALBARSCOUNT,TOTALBARSCOUNT,130);DA:=IF(CURRBARSCOUNT>DA1,0,DA1);HI:=REFDATE(HHV(H,DA),DATE);LO:=REFDATE(LLV(L,DA),DATE);C1:=IF(CURRBARSCOUNT<=DA,C,DRAWNULL);GZ:=EXP(LN(HI/LO)/10);CTA1:=SUM(IF(C1>=(HI/GZ),V,0),DA);CTA2:=SUM(IF(C1>=(HI/POW(GZ,2)) AND C1<(HI/GZ),V,0),DA);CTA3:=SUM(IF(C1>=(HI/POW(GZ,3)) AND C1<(HI/POW(GZ,2)),V,0),DA);CTA4:=SUM(IF(C1>=(HI/POW(GZ,4)) AND C1<(HI/POW(GZ,3)),V,0),DA);CTA5:=SUM(IF(C1>=(HI/POW(GZ,5)) AND C1<(HI/POW(GZ,4)),V,0),DA);CTA6:=SUM(IF(C1>=(HI/POW(GZ,6)) AND C1<(HI/POW(GZ,5)),V,0),DA);CTA7:=SUM(IF(C1>=(HI/POW(GZ,7)) AND C1<(HI/POW(GZ,6)),V,0),DA);CTA8:=SUM(IF(C1>=(HI/POW(GZ,8)) AND C1<(HI/POW(GZ,7)),V,0),DA);CTA9:=SUM(IF(C1>=(LO*GZ) AND C1<LO*POW(GZ,2),V,0),DA);CTA10:=SUM(IF(C1>=LO AND C1<LO*GZ,V,0),DA);L1:=REFDATE(HHV(CTA1,DA),DATE);L2:=REFDATE(HHV(CTA2,DA),DATE);L3:=REFDATE(HHV(CTA3,DA),DATE);L4:=REFDATE(HHV(CTA4,DA),DATE);L5:=REFDATE(HHV(CTA5,DA),DATE);L6:=REFDATE(HHV(CTA6,DA),DATE);L7:=REFDATE(HHV(CTA7,DA),DATE);L8:=REFDATE(HHV(CTA8,DA),DATE);L9:=REFDATE(HHV(CTA9,DA),DATE);L10:=REFDATE(HHV(CTA10,DA),DATE);SS:=(L1+L2+L3+L4+L5+L6+L7+L8+L9+L10);DRAWTEXT_FIX(C>O,0.01,0.1,0,'商科'),COLORRED;ZT:C/REF(C,1)>1.094 AND H=C;STICKLINE(ZT,C,O,3.0,0),COLORYELLOW;W5:COST(5),DOTLINE;W95:COST(95),DOTLINE;C2:W95-W5,NODRAW;获利筹码:CONST(WINNER(C)*100),NODRAW;ZG:=HHV(H,598);BZ:C2/ZG*100,NODRAW;JZ:BZ<20 AND CROSS(C,COST(90)) AND C/REF(C,1)>1.0618;DRAWICON(JZ,L*0.989,38);GJ:=HHV(H,N1),COLORRED,POINTDOT;ZTS:BARSLAST(GJ<>REF(GJ,1))>=6,NODRAW;TJ1:=BARSLAST(GJ=REF(GJ,1));HX:H>IF(ZTS=1,REF(GJ,1),DRAWNULL),NODRAW;AA1:=REF(GJ,N1)=HHV(GJ,2*N1+1);BB1:=FILTER(AA1,N1);CC1:=BACKSET(BB1,N1+1);DD1:=FILTER(CC1,N1),NODRAW;{高点}前期高点:=REF(GJ,BARSLAST(DD1)),COLORFF00FF,DOTLINE;PT:STICKLINE(C>0,前期高点,前期高点,1,0),COLORRED;PL1:=(CROSS(C,REF(前期高点,1))OR L<前期高点 AND C>前期高点) AND C/REF(C,1)>=1.098 AND C=H,NODRAW;STICKLINE(PL1,(C+O)/2,C,3,0),COLORRED;A1:MCST;S升:IF(A1>=REF(A1,1),A1,DRAWNULL),LINETHICK2 COLORYELLOW;S降:IF(A1<REF(A1,1),A1,DRAWNULL),LINETHICK2,COLORLICYAN;MR:CROSS(C,A1) AND ZT,NODRAW;DRAWICON(MR,L*0.999,15);MCST:=DMA(AMOUNT/(100*VOL),VOL/CAPITAL);股东占流通比:FINVALUE(244)/FINVALUE(239);{十大流通股东/流通}换手衰减系数:1/(1-股东占流通比),NODRAW;HL:=(COST(97)-COST(3))/10;CTD1:=WINNER(COST(3)+HL*1)-WINNER(COST(3)+HL*0);CTD2:=WINNER(COST(3)+HL*2)-WINNER(COST(3)+HL*1);CTD3:=WINNER(COST(3)+HL*3)-WINNER(COST(3)+HL*2);CTD4:=WINNER(COST(3)+HL*4)-WINNER(COST(3)+HL*3);CTD5:=WINNER(COST(3)+HL*5)-WINNER(COST(3)+HL*4);CTD6:=WINNER(COST(3)+HL*6)-WINNER(COST(3)+HL*5);CTD7:=WINNER(COST(3)+HL*7)-WINNER(COST(3)+HL*6);CTD8:=WINNER(COST(3)+HL*8)-WINNER(COST(3)+HL*7);CTD9:=WINNER(COST(3)+HL*9)-WINNER(COST(3)+HL*8);CTD10:=WINNER(COST(3)+HL*10)-WINNER(COST(3)+HL*9);MXCTD:=MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(CTD1,CTD2),CTD3),CTD4),CTD5),CTD6),CTD7),CTD8),CTD9),CTD10);峰价上:=IF(CTD10>=MXCTD,COST(3)+HL*10,IF(CTD9>=MXCTD,COST(3)+HL*9,IF(CTD8>=MXCTD,COST(3)+HL*8,IF(CTD7>=MXCTD,COST(3)+HL*7,IF(CTD6>=MXCTD,COST(3)+HL*6,IF(CTD5>=MXCTD,COST(3)+HL*5,IF(CTD4>=MXCTD,COST(3)+HL*4,IF(CTD3>=MXCTD,COST(3)+HL*3,IF(CTD2>=MXCTD,COST(3)+HL*2,IF(CTD1>=MXCTD,COST(3)+HL*1,0)))))))))),COLORWHITE;峰价下:=峰价上-HL,COLORWHITE;峰价中:=峰价上-HL*0.5,COLORMAGENTA;峰量:MXCTD*100,NODRAW;CB:=COST(60)> REF(COST(60),1);XG:=REF(C,1)<峰价中 AND CROSS(C,峰价中) AND CB;DRAWICON(XG,峰价中,1);CTC_36:=COST(1);CTC_37:=COST(10);CTC_38:=COST(20);CTC_39:=COST(30);CTC_40:=COST(40);CTC_41:=COST(50);CTC_42:=COST(60);CTC_43:=COST(70);CTC_44:=COST(80);CTC_45:=COST(90);CTC_46:=COST(99);CTC_47:=COST(5);CTC_48:=COST(15);CTC_49:=COST(25);CTC_50:=COST(35);CTC_51:=COST(45);CTC_52:=COST(55);CTC_53:=COST(65);CTC_54:=COST(75);CTC_55:=COST(85);CTC_56:=COST(95);CTC_57:=CTC_47-CTC_36;CTC_58:=CTC_37-CTC_47;CTC_59:=CTC_48-CTC_37;CTC_60:=CTC_38-CTC_48;CTC_61:=CTC_49-CTC_38;CTC_62:=CTC_39-CTC_49;CTC_63:=CTC_50-CTC_39;CTC_64:=CTC_40-CTC_50;CTC_65:=CTC_51-CTC_40;CTC_66:=CTC_41-CTC_51;CTC_67:=CTC_52-CTC_41;CTC_68:=CTC_42-CTC_52;CTC_69:=CTC_53-CTC_42;CTC_70:=CTC_43-CTC_53;CTC_71:=CTC_54-CTC_43;CTC_72:=CTC_44-CTC_54;CTC_73:=CTC_55-CTC_44;CTC_74:=CTC_45-CTC_55;CTC_75:=CTC_56-CTC_45;CTC_76:=CTC_46-CTC_56;CTC_77:=MIN(CTC_57,MIN(CTC_58,MIN(CTC_59,MIN(CTC_60,MIN(CTC_61,MIN(CTC_62,MIN(CTC_63,MIN(CTC_64,MIN(CTC_65,MIN(CTC_66,MIN(CTC_67,MIN(CTC_68,MIN(CTC_69,MIN(CTC_70,MIN(CTC_71,MIN(CTC_72,MIN(CTC_73,MIN(CTC_74,MIN(CTC_75,CTC_76)))))))))))))))))));CTC_78:=IF(CTC_57=CTC_77,(CTC_47+CTC_36)/2,IF(CTC_58=CTC_77,(CTC_47+CTC_37)/2,IF(CTC_59=CTC_77,(CTC_48+CTC_37)/2,IF(CTC_60=CTC_77,(CTC_48+CTC_38)/2,IF(CTC_61=CTC_77,(CTC_49+CTC_38)/2,IF(CTC_62=CTC_77,(CTC_49+CTC_39)/2,IF(CTC_63=CTC_77,(CTC_50+CTC_39)/2,IF(CTC_64=CTC_77,(CTC_50+CTC_40)/2,IF(CTC_65=CTC_77,(CTC_51+CTC_40)/2,IF(CTC_66=CTC_77,(CTC_51+CTC_41)/2,IF(CTC_67=CTC_77,(CTC_52+CTC_41)/2,IF(CTC_68=CTC_77,(CTC_52+CTC_42)/2,IF(CTC_69=CTC_77,(CTC_53+CTC_42)/2,IF(CTC_70=CTC_77,(CTC_53+CTC_43)/2,IF(CTC_71=CTC_77,(CTC_54+CTC_43)/2,IF(CTC_72=CTC_77,(CTC_54+CTC_44)/2,IF(CTC_73=CTC_77,(CTC_55+CTC_44)/2,IF(CTC_74=CTC_77,(CTC_55+CTC_45)/2,IF(CTC_75=CTC_77,(CTC_56+CTC_45)/2,(CTC_56+CTC_46)/2)))))))))))))))))));筹码峰线:CTC_78,NODRAW,COLOR00EEEE;STICKLINE(ISLASTBAR,筹码峰线,筹码峰线*1.001,60,0),COLORWHITE,COLORLIMAGENTA;筹码单峰密集:IF(CROSS(C,筹码峰线),1,0 );DRAWICON(筹码单峰密集 AND ZT,L*0.98,9);N日平台:=30;CTC_1:=VOL/REF(MA(VOL,5),1);CTC_2:=(CLOSE/REF(CLOSE,1)-1)*100;CTC_3:=CLOSE=HHV(CLOSE,N日平台);CTC_4:=BARSLAST(FILTER(CROSS(0.9,CTC_3),2))+1;平台高点:=REF(CLOSE,CTC_4);CTC_7:=IF(FINDHIGHBARS(平台高点,1,20,1)>=10,1,0);CTC_8:=CROSS(CLOSE,平台高点);平台突破:IF(CTC_8>0 AND CTC_1>1 AND CTC_2>=3 AND CTC_7>0,1,0);DRAWICON(平台突破 ,L*0.98,9);