以下是通达信普天同庆吸拉派落指标特别版源码
通达信普天同庆吸拉派落指标特别版源码：
DRAWGBK(O C,RGB(0,58,58),RGB(0,58,58),0,'1000',0);
吸:XLPL.NOTEXT吸,COLORLIRED,LINETHICK3;
拉:XLPL.NOTEXT拉,COLORRED,LINETHICK3;
派:XLPL.NOTEXT派,COLORGREEN,LINETHICK3;
落:XLPL.NOTEXT落,COLORWHITE,LINETHICK3;
Var1:=(HIGH+LOW+OPEN+2*CLOSE)/5;
鼓:100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34));
锣:100*SUM(maX(0,HIGH-REF(Var1,1)),26)/SUM(MAX(0,REF(Var1,1)-LOW),26);
地:8;
天:192;
AAA:=REFDATE(HHV(H,130),DATE);
BBB:=REFDATE(LLV(L,130),DATE);
DRAWBAND(AAA,RGB(0,80,80),BBB,RGB(00,00,00));
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
DKX:(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+16*REF(MID,4)
+15*REF(MID,5)+14*REF(MID,6)+13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)
+10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)
+5*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17)
+2*REF(MID,18)+REF(MID,20))/210;
DKMA:MA(DKX,6);
DRAWBAND(DKX,RGB(128,128,0),DKMA,RGB(0,0,128));
{红}
STICKLINE(C O,C,O,3,0),COLOR000077;
STICKLINE(C O,C,O,2,0),COLOR000099;
STICKLINE(C O,C,O,1,0),COLOR0000BB;
STICKLINE(C O,H,L,0,0),COLOR0000FF;
{绿}
STICKLINE(C O,C,O,3,0),COLOR007700;
STICKLINE(C O,C,O,2,0),COLOR009900;
STICKLINE(C O,C,O,1,0),COLOR00BB00;
STICKLINE(C O,H,L,0,0),COLOR00FF00;
套牢盘％:=100*(1-WINNER(C));
获利盘％:=100*WINNER(C);
集中度90％:=(COST(95)-COST(5))/(COST(100))*100;
集中度70％:=(COST(85)-COST(15))/(COST(100))*100;
平均:=COST(50);
成本:=COST(4);
短期压力:=HHV(H,20);
短期支撑:=LLV(L,20);
PT:=REF(HIGH,1)-REF(LOW,1);
中价:=(H+L+C)/3;
近高:=2*中价-LOW;
近低:=2*中价-HIGH;
最高:=中价+PT;
最低:=中价-PT;
T1:=CONST(IF(获利盘％,1,0));
T2:=CONST(IF(套牢盘％,1,0));
T3:=CONST(IF(集中度90％,1,0));
T4:=CONST(IF(集中度70％,1,0));
T5:=CONST(IF(平均成本,1,0));
T6:=CONST(IF(主力成本,1,0));
T7:=CONST(IF(短期压力,1,0));
T8:=CONST(IF(短期支撑,1,0));
T9:=CONST(IF(中价,1,0));
T10:=CONST(IF(近高,1,0));
T11:=CONST(IF(近低,1,0));
T12:=CONST(IF(最高,1,0));
T13:=CONST(IF(最低,1,0));
TS1:=IF(T1=1,0+0.03,0);
TS2:=IF(T2=1,TS1+0.03,TS1);
TS3:=IF(T3=1,TS2+0.05,TS2);
TS4:=IF(T4=1,TS3+0.03,TS3);
TS5:=IF(T5=1,0+0.03,0);
TS6:=IF(T6=1,TS5+0.03,TS5);
TS7:=IF(T7=1,TS6+0.05,TS6);
TS8:=IF(T8=1,TS7+0.03,TS7);
TS9:=IF(T9=1,0+0.03,0);
TS10:=IF(T10=1,TS9+0.05,TS9);
TS11:=IF(T11=1,TS10+0.03,TS10);
TS12:=IF(T12=1,TS11+0.05,TS11);
TS13:=IF(T13=1,TS12+0.03,TS12);
N1:=115;
N2:=80;
N3:=45;
DRAWTEXT(T1=1ANDCURRBARSCOUNT=N1ANDPERIOD=5,AAA-(AAA*TS1),'【获利盘％】'),COLORRED;
DRAWTEXT(T2=1ANDCURRBARSCOUNT=N1ANDPERIOD=5,AAA-(AAA*TS2),'【套牢盘％】'),COLOR00FF00;
DRAWTEXT(T3=1ANDCURRBARSCOUNT=N1ANDPERIOD=5,AAA-(AAA*TS3),'【90％成本集中度】'),COLORYELLOW;
DRAWTEXT(T4=1ANDCURRBARSCOUNT=N1ANDPERIOD=5,AAA-(AAA*TS4),'【70％成本集中度】'),COLOR008FFF;
DRAWTEXT(T5=1ANDCURRBARSCOUNT=N2ANDPERIOD=5,AAA-(AAA*TS5),'【平均成本】'),COLORFF99FF;
DRAWTEXT(T6=1ANDCURRBARSCOUNT=N2ANDPERIOD=5,AAA-(AAA*TS6),'【主力成本】'),COLORFF00FF;
DRAWTEXT(T7=1ANDCURRBARSCOUNT=N2ANDPERIOD=5,AAA-(AAA*TS7),'【短期压力】'),COLORFFFFBF;
DRAWTEXT(T8=1ANDCURRBARSCOUNT=N2ANDPERIOD=5,AAA-(AAA*TS8),'【短期支撑】'),COLORF0F000;
DRAWTEXT(T9=1ANDCURRBARSCOUNT=N3ANDPERIOD=5,AAA-(AAA*TS9),'【中价】'),COLORWHITE;
DRAWTEXT(T10=1ANDCURRBARSCOUNT=N3ANDPERIOD=5,AAA-(AAA*TS10),'【近高】'),COLORFFFFBF;
DRAWTEXT(T11=1ANDCURRBARSCOUNT=N3ANDPERIOD=5,AAA-(AAA*TS11),'【近低】'),COLORF0F000;
DRAWTEXT(T12=1ANDCURRBARSCOUNT=N3ANDPERIOD=5,AAA-(AAA*TS12),'【最高】'),COLORFF99FF;
DRAWTEXT(T13=1ANDCURRBARSCOUNT=N3ANDPERIOD=5,AAA-(AAA*TS13),'【最低】'),COLORFF00FF;
DRAWNUMBER(T1=1ANDCURRBARSCOUNT=N1-12ANDPERIOD=5,AAA-(AAA*TS1),CONST(获利盘％)),COLORRED;
DRAWNUMBER(T2=1ANDCURRBARSCOUNT=N1-12ANDPERIOD=5,AAA-(AAA*TS2),CONST(套牢盘％)),COLOR00FF00;
DRAWNUMBER(T3=1ANDCURRBARSCOUNT=N1-18ANDPERIOD=5,AAA-(AAA*TS3),CONST(集中度90％)),COLORYELLOW;
DRAWNUMBER(T4=1ANDCURRBARSCOUNT=N1-18ANDPERIOD=5,AAA-(AAA*TS4),CONST(集中度70％)),COLOR008FFF;
DRAWNUMBER(T5=1ANDCURRBARSCOUNT=N2-12ANDPERIOD=5,AAA-(AAA*TS5),CONST(平均成本)),COLORFF99FF;
DRAWNUMBER(T6=1ANDCURRBARSCOUNT=N2-12ANDPERIOD=5,AAA-(AAA*TS6),CONST(主力成本)),COLORFF00FF;
DRAWNUMBER(T7=1ANDCURRBARSCOUNT=N2-12ANDPERIOD=5,AAA-(AAA*TS7),CONST(短期压力)),COLORFFFFBF;
DRAWNUMBER(T8=1ANDCURRBARSCOUNT=N2-12ANDPERIOD=5,AAA-(AAA*TS8),CONST(短期支撑)),COLORF0F000;
DRAWNUMBER(T9=1ANDCURRBARSCOUNT=N3-9ANDPERIOD=5,AAA-(AAA*TS9),CONST(中价)),COLORWHITE;
DRAWNUMBER(T10=1ANDCURRBARSCOUNT=N3-9ANDPERIOD=5,AAA-(AAA*TS10),CONST(近高)),COLORFFFFBF;
DRAWNUMBER(T11=1ANDCURRBARSCOUNT=N3-9ANDPERIOD=5,AAA-(AAA*TS11),CONST(近低)),COLORF0F000;
DRAWNUMBER(T12=1ANDCURRBARSCOUNT=N3-9ANDPERIOD=5,AAA-(AAA*TS12),CONST(最高)),COLORFF99FF;
DRAWNUMBER(T13=1ANDCURRBARSCOUNT=N3-9ANDPERIOD=5,AAA-(AAA*TS13),CONST(最低)),COLORFF00FF;
HH0:=CONST(HHV(H,75));
LL0:=CONST(LLV(L,75));
MM0:=CONST((HH0+LL0)/2);
HL0:=CONST(IF(CONST(C) =MM0,LL0-(HH0-LL0)*0.2,HH0+(HH0-LL0)*0.2));
HH1:=IF(CONST(C) MM0,HH0*1.01,HL0);
LL1:=IF(CONST(C) =MM0,LL0*0.99,HL0);
HL1:=(HH1+LL1)/2,COLORFFFFFF;
STICKLINE("MACD.MACD" 0,"MACD.MACD"+HL1,HL1,2,1),COLOR00FFFF;
STICKLINE("MACD.MACD" 0AND"MACD.MACD" REF("MACD.MACD",1),
"MACD.MACD"+HL1,HL1,2,0),COLORFF00FF;
STICKLINE("MACD.MACD" 0,"MACD.MACD"+HL1,HL1,2,0),COLOR00FFFF;
STICKLINE("MACD.MACD" 0AND"MACD.MACD" REF("MACD.MACD",1),
"MACD.MACD"+HL1,HL1,2,1),COLORFF00FF;
通达信普天同庆吸拉派落指标特别版截图
