大智慧K線公式如何描述?

ZF:=BARSSINCE(DISPSTATUS=1);

IF DISPSTATUS=0 or DISPSTATUS=2 THEN BEGIN

DPC00:(INDEXC-ref(INDEXC,1))/ref(INDEXC,1)*100,PRECIS6,linethick0;

DPC:=SUM(DPC00,ZF);

DPO:=IF(INDEXC>INDEXO,(INDEXC-INDEXO)/INDEXO*100,(INDEXO-INDEXC)/INDEXC*100);

DPL:=IF(INDEXC>=INDEXO,(INDEXO-INDEXL)/INDEXL*100,(INDEXC-INDEXL)/INDEXL*100);

DPH:=IF(INDEXC>=INDEXO,(INDEXH-INDEXC)/INDEXC*100,(INDEXH-INDEXO)/INDEXO*100);

DP_C:=DPC;

DP_O:=if(INDEXC>INDEXO,DPC-abs(DPO),DPC+abs(DPO));

DP_H:=if(INDEXC>INDEXO,DPC+DPH,DPC+DPO+DPH);

DP_L:=if(INDEXC>INDEXO,DPC-DPL-abs(DPO),DPC-DPL);

STICKLINE(INDEXC>INDEXO,DPC-DPL-abs(DPO),DPC+DPH,1,0),Color150073;

STICKLINE(INDEXC>INDEXO,DPC-abs(DPO),DPC,7,0),Color150073;

STICKLINE(INDEXC=INDEXO and INDEXC>ref(INDEXC,1),DPC-DPL-abs(DPO),DPC+DPH,1,0),Color150073;

STICKLINE(INDEXC=INDEXO and INDEXC>ref(INDEXC,1),DPC-abs(DPO),DPC,7,0),Color150073;

STICKLINE(INDEXC<INDEXO,DPC,DPC+abs(DPO),7,0),ColorA9A434;

STICKLINE(INDEXC<INDEXO,DPC-DPL,DPC+DPO+DPH,1,0),ColorA9A434;

STICKLINE(INDEXC=INDEXO and INDEXC<ref(INDEXC,1),DPC,DPC+abs(DPO),7,1),ColorA9A434;

STICKLINE(INDEXC=INDEXO and INDEXC<ref(INDEXC,1),DPC-DPL,DPC+DPO+DPH,1,0),ColorA9A434;

IF BARSTATUS=2 then DRAWTEXT(v>0,DP_C,'大盤'),LINETHICK2;

MA(DP_C,5),ColorC0C0C0;

GPC00:(C-ref(C,1))/ref(C,1)*100,PRECIS6,linethick0;

GPC0:=if(abs(GPC00)>11,(C-O)/O*100,GPC00);{撇開除權，股改漲幅超10%}

GPC:=SUM(GPC0,ZF);

GPO:=IF(C>O,(C-O)/O*100,(O-C)/C*100);

GPL:=IF(C>=O,(O-L)/L*100,(C-L)/L*100);

GPH:=IF(C>=O,(H-C)/C*100,(H-O)/O*100);

GP_C:=GPC;

GP_O:=if(C>O,GPC-abs(GPO),GPC+abs(GPO));

GP_H:=if(C>O,GPC+GPH,GPC+GPO+GPH);

GP_L:=if(C>O,GPC-GPL-abs(GPO),GPC-GPL);

STICKLINE(C>O,GPC-GPL-abs(GPO),GPC+GPH,0.1,0),Color0000F0;

STICKLINE(C>O,GPC-abs(GPO),GPC,7,0),Color0000F0,MOVE6;

STICKLINE(C=O and C>ref(C,1),GPC-GPL-abs(GPO),GPC+GPH,0.1,0),Color0000F0;

STICKLINE(C=O and C>ref(C,1),GPC-abs(GPO),GPC,7,0),Color0000F0;

STICKLINE(C<O,GPC,GPC+abs(GPO),7,0),Color00DB00;

STICKLINE(C<O,GPC-GPL,GPC+GPO+GPH,0.1,0),Color00DB00;

STICKLINE(C=O and C<ref(C,1),GPC,GPC+abs(GPO),7,1),Color00DB00;

STICKLINE(C=O and C<ref(C,1),GPC-GPL,GPC+GPO+GPH,0.1,0),Color00DB00;

IF BARSTATUS=2 then DRAWTEXT(v>0,GPC,'股票'),LINETHICK2;

MA(GPC,5),Color80FFFF;

END;