ZF:= BARSSINCE(disp status = 1)；
如果DISPSTATUS=0或DISPSTATUS=2，則開始
DPC00:(INDEXC-ref(INDEXC，1))/ref(INDEXC，1)*100，PRECIS6，linethick0
DPC:=SUM(DPC00，ZF)；
DPO:= IF(INDEXC & gt；INDEXO，(INDEXC-INDEXO)/INDEXO * 100，(INDEXO-INDEXC)/INDEXC * 100)；
DPL:= IF(INDEXC & gt；=INDEXO，(INDEXO-INDEXL)/INDEXL * 100，(INDEXC-INDEXL)/INDEXL * 100)；
DPH:= IF(INDEXC & gt；=INDEXO，(INDEXH-INDEXC)/INDEXC * 100，(INDEXH-INDEXO)/INDEXO * 100)；
DP _ C:= DPC；
DP _ O:= if(INDEXC & gt；INDEXO、DPC-abs(DPO)、DPC+ABS(DPO)；
DP _ H:= if(INDEXC & gt；INDEXO，DPC+DPH，DPC+DPO+DPH)；
DP _ L:= if(INDEXC & gt；INDEXO，DPC-DPL-abs(DPO)，DPC-DPL)；
粘附線(INDEXC & gtINDEXO，DPC-DPL-abs(DPO)，DPC+DPH，1，0)，color 150073；
粘附線(INDEXC & gtINDEXO，DPC-abs(DPO)，DPC，7，0)，color 150073；
粘附線(INDEXC = INDEXO and INDEXC & gtref(INDEXC，1)，DPC-DPL-abs(DPO)，DPC+DPH，1，0)，color 150073；
粘附線(INDEXC = INDEXO and INDEXC & gtref(INDEXC，1)，DPC-abs(DPO)，DPC，7，0)，color 150073；
粘附線(INDEXC<。INDEXO，DPC，DPC+abs(DPO)，7，0)，ColorA9A434
粘附線(INDEXC<。INDEXO，DPC-DPL，DPC+DPO+DPH，1，0)，ColorA9A434
STICKLINE(INDEXC = INDEXO and INDEXC & lt；ref(INDEXC，1)，DPC，DPC+abs(DPO)，7，1)，ColorA9A434
STICKLINE(INDEXC = INDEXO and INDEXC & lt；ref(INDEXC，1)，DPC-DPL，DPC+DPO+DPH，1，0)，ColorA9A434
如果BARSTATUS=2，那麽DRAWTEXT(v & gt；0，DP_C，'市場')，LINETHICK2
MA(DP_C，5)，color 0 C 0 C 0；
GPC00:(C-ref(C，1))/ref(C，1)*100，PRECIS6，linethick0
GPC0:=if(abs(GPC00)>11，(C-O)/O*100，GPC 00)；{不含除權，股改漲幅超10%}
GPC:=SUM(GPC0，ZF)；
GPO:= IF(C & gt；O，(C-O)/O*100，(O-C)/C * 100)；
GPL:= IF(C & gt；=O，(O-L)/L*100，(C-L)/L * 100)；
GPH:= IF(C & gt；=O，(H-C)/C*100，(H-O)/O * 100)；
GP _ C:= GPC；
GP _ O:= if(C & gt；o，GPC-abs(GPO)，GPC+ABS(GPO))；
GP _ H:= if(C & gt；o，GPC+GPH，GPC+GPO+GPH)；
GP _ L:= if(C & gt；o，GPC-GPL-abs(GPO)，GPC-GPL)；
粘附線(C & gto，GPC-GPL-abs(GPO)，GPC+GPH，0.1，0)，Color0000F0
粘附線(C & gto，GPC-abs(GPO)，GPC，7，0)，Color0000F0，MOVE6
粘附線(C=O和C & gtref(C，1)，GPC-GPL-abs(GPO)，GPC+GPH，0.1，0)，Color0000F0
粘附線(C=O和C & gtref(C，1)，GPC-abs(GPO)，GPC，7，0)，Color0000F0
粘附線(C & lto，GPC，GPC+abs(GPO)，7，0)，Color00DB00
粘附線(C & lto，GPC-GPL，GPC+GPO+GPH，0.1，0)，Color00DB00
粘附線(C=O和C & ltref(C，1)，GPC，GPC+abs(GPO)，7，1)，Color00DB00
粘附線(C=O和C & ltref(C，1)，GPC-GPL，GPC+GPO+GPH，0.1，0)，Color00DB00
如果BARSTATUS=2，那麽DRAWTEXT(v & gt；0，GPC，' stock ')，LINETHICK2
MA(GPC，5)，Color80FFFF
結束；