SKDJ 模型：該指標分別計算了個股和上證指數的4個價格指標，并將其統一到同一起點進行比較。其中，個股價格指標是使用開盤價、收盤價、最高價和最低價的加權平均值計算的，而上證指數的價格指標是直接使用該指數的每日收盤價。
價格比較：根據 SKDJ 指標和 DMA 指標的計算結果，以不同的顏色和線條方式顯示個股和上證指數的價格變化情況。同時，還顯示了當天和五天內的 PK 結果，并使用圓點標記超車的情況。
INPUT:選擇起點(4,1,4),大盤轉折幅度(30,1,99);
起點1:=BARSCOUNT(C)-1;
年:=年份;
起點2:=BARSLAST(CROSS(年份=年[DATACOUNT],0.5));
起點3:=TROUGHBARS("SH1A0001$C",大盤轉折幅度,1);
起點4:=PEAKBARS("SH1A0001$C",大盤轉折幅度,1);
起點:=IF(選擇起點=1,起點1,IF(選擇起點=2,起點2,IF(選擇起點=3,起點3,起點4)));
圖起點:=BARPOS>=DATACOUNT-起點[DATACOUNT];
VERTLINE(起點=0 AND 圖起點),LINEDASHDOT,COLORDD00DD;C0:=REF(C,起點)*圖起點;
O0:=REF(O,起點)*圖起點;
H0:=REF(H,起點)*圖起點;
L0:=REF(L,起點)*圖起點;
ZC:=(C)/O0; ZO:=(O)/O0; ZH:=(H)/O0; ZL:=(L)/O0;DC0:=REF("SH1A0001$C",起點)*圖起點;
DO0:=REF("SH1A0001$O",起點)*圖起點;
DH0:=REF("SH1A0001$H",起點)*圖起點;
DL0:=REF("SH1A0001$L",起點)*圖起點;
DZC:=("SH1A0001$C")/DO0; DZO:=("SH1A0001$O")/DO0; DZH:=("SH1A0001$H")/DO0; DZL:=("SH1A0001$L")/DO0;收:=DO0*(ZC),LINETHICK;
開:=DO0*(ZO),LINETHICK;
高:=DO0*(ZH),LINETHICK;
低:=DO0*(ZL),LINETHICK;
D收:=DO0*(DZC),LINETHICK;
D開:=DO0*(DZO),LINETHICK;
D高:=DO0*(DZH),LINETHICK;
D低:=DO0*(DZL),LINETHICK;DMA5:=MA(D收,5);
DMA20:=MA(D收,20);
DMAM2:=MA((DMA5+DMA20)/2,10);
DMA15:=MA(D收,15);
DMA30:=MA(D收,30);
DMAM3:=MA((DMA15+DMA30)/2,18);
FILLRGN(DMAM2=30,DMAM2,DMAM3),COLOR9FA9A9;
FILLRGN(DMAM2>DMAM3 AND 圖起點 AND 起點>=30,DMAM2,DMAM3),COLORDDDDDD;
MA5:=MA(收,5);
MA20:=MA(收,20);
MAM2:=MA((MA5+MA20)/2,10);
MA15:=MA(收,15);
MA30:=MA(收,30);
MAM3:=MA((MA15+MA30)/2,18);
FILLRGN(MAM2=30,MAM2,MAM3),COLOR9FA9A9;
FILLRGN(MAM2>MAM3 AND 圖起點 AND 起點>=30,MAM2,MAM3),COLORDDDDDD;
STICKLINE(DZC>=DZO AND 圖起點,D高,D低,0,0),COLOR5050AA;
STICKLINE(DZC>=DZO AND 圖起點,D收,D開,7.8,0),COLOR5050AA;
STICKLINE(DZC<DZO AND 圖起點,D高,D低,0,0),COLORAAAA50;
STICKLINE(DZC<DZO AND 圖起點,D收,D開,7.8,0),COLORAAAA50;
STICKLINE(C>=O AND 圖起點,高,低,0,0),COLOR5050FF;
STICKLINE(C>=O AND 圖起點,收,開,7.8,0),COLOR5050FF;
STICKLINE(C<O AND 圖起點,高,低,0,0),COLOR6FFF50;
STICKLINE(C<O AND 圖起點,收,開,7.8,0),COLOR6FFF50;
PARTLINE( 圖起點 AND 起點>=20,MA(收,20)),COLOR0000FF,LINETHICK2;PARTLINE( 圖起點 AND 起點>=9,SMA(MA(收,3),3,1)),COLORFFFF66,LINETHICK2;
PARTLINE( 圖起點 AND 起點>=20,MA(D收,20)),COLOR0000FF,LINETHICK2;PARTLINE( 圖起點 AND 起點>=9,SMA(MA(D收,3),3,1)),COLORFFFF66,LINETHICK2;
上證指數:D收,LINETHICK;
個股對應上證指數:收,LINETHICK;
超車:CROSS(收,D收) AND 起點>3 ,LINETHICK;
PK方式:=IF(選擇起點=1,'本年初為起點',IF(選擇起點=2,'大盤波谷為起點',IF(選擇起點=3,'大盤波谷為起點','大盤波峰為起點')));
當日PK:(收-REF(收,1))/REF(收,1)-(D收-REF(D收,1))/REF(D收,1),LINETHICK;
五日PK:(收-REF(收,5))/REF(收,5)-(D收-REF(D收,5))/REF(D收,5),LINETHICK;
SS:=SYSPARAM(3)-MAX(SYSPARAM(2),(DATACOUNT-起點[DATACOUNT]));
中線DL:=LLV(D低,SS);
中線GL:=LLV(低,SS);
中線DH:=HHV(D高,SS);
中線GH:=HHV(高,SS);
中線G:=MAX(中線DH,中線GH);
中線D:=MIN(中線DL,中線GL);
中線:=(中線G-中線D)/2+中線D;
PARTLINE( 超車 AND 圖起點,中線[SYSPARAM(3)]),CIRCLEDOT,PXUP23,COLOR00FFFF;
PARTLINE( 超車 AND 圖起點,中線[SYSPARAM(3)]),CIRCLEDOT,PXUP11,COLOR0000FF;
PARTLINE( 超車 AND 圖起點,中線[SYSPARAM(3)]),CIRCLEDOT,PXUP5,COLORFF00FF;DRAWTEXTEX(圖起點,1,10,10,STKLABEL+' '+STKNAME+' P K 上證指數 P K 起點日期; '+NUMTOSTR(REF(YEAR,起點),0)+'年'+NUMTOSTR(REF(MONTH,起點),0)+'月'+NUMTOSTR(REF(DAY,起點),0)+'日'
+' 上證指數: '+NUMTOSTR(REF("SH1A0001$C",起點),0)+'點'),COLOR66AAFF;
DRAWTEXTEX(圖起點 ,1,10,10,' \n \nPK方式: '+PK方式 ),COLORFFFFFF;
DRAWTEXTEX(圖起點 AND 當日PK[SYSPARAM(0)]>0,1,10,10,' \n \n \n \n 當日 P K 贏' ),COLOR6666FF;
DRAWTEXTEX(圖起點 AND 當日PK[SYSPARAM(0)]<0,1,10,10,' \n \n \n \n 當日 P K 輸' ),COLOR66FF6F;
DRAWTEXTEX(圖起點 AND 五日PK[SYSPARAM(0)]>0,1,10,10,' \n \n \n \n \n \n 五日 P K 贏' ),COLORFF66FF;
DRAWTEXTEX(圖起點 AND 五日PK[SYSPARAM(0)]<0,1,10,10,' \n \n \n \n \n \n 五日 P K 輸' ),COLORFFFF6F;
{程序化交易 www.kzuj.com.cn }
打印本文
關閉窗口
