相關標簽: 短線暴漲k線選股源碼 、 慧眼k線源碼 、 同花順k線買賣點源碼 、 主力控盤k線 源碼 、 大智慧k線源碼 、 畫k線的程序源碼 、 博弈k線指標公式源碼 、 主控k線公式源碼 、 k線 源碼 、

數字主圖 (明日價格預測源碼 + 明日模擬K線 源碼 ）:

預測1:=(C+H+L)/3;
預測2:=H-L;
預測4:=預測1+預測2;
預測5:=預測1-預測2;
預測6:=2*預測1-L;
預測7:=2*預測1-H;
預測9:=BARSTATUS=2;
STICKLINE(預測9>0 AND 預測6>ref(C,1),預測4,預測5,1,1000),COLOR102070,LINETHICK2;
STICKLINE(預測9>0 AND 預測6>ref(C,1),預測4,預測5,0,1000),COLOR1020E0,LINETHICK2;
STICKLINE(預測9>0 AND 預測6>ref(C,1),預測6,預測7,8,1000),COLOR102070,LINETHICK2;
STICKLINE(預測9>0 AND 預測6>ref(C,1),預測6,預測7,7,1000),COLOR102080,LINETHICK2;
STICKLINE(預測9>0 AND 預測6>ref(C,1),預測6,預測7,6,1000),COLOR102090,LINETHICK2;
STICKLINE(預測9>0 AND 預測6>ref(C,1),預測6,預測7,5,1000),COLOR1020A0,LINETHICK2;
STICKLINE(預測9>0 AND 預測6>ref(C,1),預測6,預測7,4,1000),COLOR1020B0,LINETHICK2;
STICKLINE(預測9>0 AND 預測6>ref(C,1),預測6,預測7,3,1000),COLOR1020C0,LINETHICK2;
STICKLINE(預測9>0 AND 預測6>ref(C,1),預測6,預測7,2,1000),COLOR1020D0,LINETHICK2;
STICKLINE(預測9>0 AND 預測6>ref(C,1),預測6,預測7,1,1000),COLOR1020E0,LINETHICK2;
STICKLINE(預測9>0 AND 預測6<=ref(C,1),預測4,預測5,1,1000),COLOR105510,LINETHICK2;
STICKLINE(預測9>0 AND 預測6<=ref(C,1),預測4,預測5,0,1000),COLOR10CC10,LINETHICK2;
STICKLINE(預測9>0 AND 預測6<=ref(C,1),預測6,預測7,8,1000),COLOR105510,LINETHICK2;
STICKLINE(預測9>0 AND 預測6<=ref(C,1),預測6,預測7,7,1000),COLOR106610,LINETHICK2;
STICKLINE(預測9>0 AND 預測6<=ref(C,1),預測6,預測7,6,1000),COLOR107710,LINETHICK2;
STICKLINE(預測9>0 AND 預測6<=ref(C,1),預測6,預測7,5,1000),COLOR108810,LINETHICK2;
STICKLINE(預測9>0 AND 預測6<=ref(C,1),預測6,預測7,4,1000),COLOR109910,LINETHICK2;
STICKLINE(預測9>0 AND 預測6<=ref(C,1),預測6,預測7,3,1000),COLOR10AA10,LINETHICK2;
STICKLINE(預測9>0 AND 預測6<=ref(C,1),預測6,預測7,2,1000),COLOR10BB10,LINETHICK2;
STICKLINE(預測9>0 AND 預測6<=ref(C,1),預測6,預測7,1,1000),COLOR10CC10,LINETHICK2;
gj:=if(c=INDEXC,(INDEXC+INDEXh+INDEXl+INDEXO)/4,AMOUNT/(v+0.01)/100);
明日阻力:=l+(gj-l)+(c-l);
明日支撐:=l+(c-gj);
明日阻力:=l+(gj-l)+(c-l);
明日支撐:=l+(c-gj);
今日阻力:=ref(明日阻力, 1);
今日支撐:=ref(明日支撐, 1);
STICKLINE(DISPSTATUS=2 and c>=今日阻力,今日阻力,今日阻力,30,0),Color0000FF;
STICKLINE(DISPSTATUS=2 and c<今日阻力,今日阻力,今日阻力,30,0),Color00FF00;
STICKLINE(DISPSTATUS=2 and c>=今日支撐,今日支撐,今日支撐,30,0),ColorFF00FF;
STICKLINE(DISPSTATUS=2 and c<今日支撐,今日支撐,今日支撐,30,0),ColorFF0000;
DRAWTEXTREL(406,117,'---------------------------------------'),ColorFFFFFF;
IF BARSTATUS=2 and c>=今日支撐 THEN
DRAWTEXTREL(408,147,'今日支撐：'+NUMTOSTRN(今日支撐,2)),colorred;
IF BARSTATUS=2 and c<今日支撐 THEN
DRAWTEXTREL(408,147,'今日支撐：'+NUMTOSTRN(今日支撐,2)),colorred;
IF BARSTATUS=2 and c>=今日阻力 THEN
DRAWTEXTREL(408,187,'今日阻力：'+NUMTOSTRN(今日阻力,2)),Color0000FF;
IF BARSTATUS=2 and c<今日阻力 THEN
DRAWTEXTREL(408,187,'今日阻力：'+NUMTOSTRN(今日阻力,2)),Color00FF00;
IF BARSTATUS=2 and c>=明日支撐 THEN
DRAWTEXTREL(510,147,' 明日支撐：'+NUMTOSTRN(明日支撐,2)),Color00FFFF;
IF BARSTATUS=2 and c<明日阻力 THEN
DRAWTEXTREL(510,187,' 明日阻力：'+NUMTOSTRN(明日阻力,2)),Color00FFFF;
DRAWTEXTREL(406,217,'＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝'),ColorFFFFFF; {內容來至程序化交易網 CXH99.COM}

下檔線:=(((CLOSE - LLV(LOW,13))/(HHV(HIGH,13) - LLV(LOW,13))) * 100);
CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('http://www.weiqiv.net.cn',CURRENTTIME>180000 and (CXH=1 OR CXH=4 OR CXH=7 OR CXH=9));
DRAWTEXTREL(10,880,' www.weiqiv.net.cn ')linethick2,coloryellow;
DRAWTEXTREL(999,999,' cxh99.com 大智慧程序 化交易');
aRSV:=SMA(下檔線,3,1);
aK:=SMA(aRSV,3,1);
aD:=((3 * aRSV) - (2 * aK));
aJ12:=(((CLOSE - LLV(LOW,55))/(HHV(HIGH,55) - LLV(LOW,55))) * 100);
aRSV24:=SMA(aJ12,3,1);
aK24:=SMA(aRSV24,3,1);
aD24:=((3 * aRSV24) - (2 * aK24));
撐壓位:=IF(CROSS(aD24,aD),HIGH,ref(HIGH,BARSLAST(CROSS(aD24,aD))));
底:=LLV(HIGH,30){,COLOR00FF00,LINETHICK2};
STICKLINE(BARSTATUS=2,撐壓位,撐壓位,30,1),LINETHICK1,COLORFFFFFF;
DRAWTEXT(BARSTATUS=2,撐壓位,'撐壓'),COLORFFFFFF,VALIGN1;
STICKLINE(BARSTATUS=2,底,底,30,1),COLOR00FF00,LINETHICK1;
DRAWTEXT(BARSTATUS=2,底,'底線'),COLOR00FF00,VALIGN0;
AA05:MA(C,5),colorff00ff,LINETHICK1;
五日乖離率:=(c-AA05)/AA05*100;
BB05:=atan((aa05/ref(aa05,1)-1)*100)*180/3.1416;
速度5:=sMA(eMA((AA05-ref(AA05,1))/ref(AA05,1),3)*100,3,1);
加速度5:eMA((速度5-ref(速度5,1)),3),LINETHICK0;
{STICKLINE(BB05>30 and AA05>ref(AA05,1),AA05,ref(AA05,1),8,1),colorff00ff;}
AA10:MA(C,10),coloryelLOW; {文章來至 cxh99.com}
AA20:=MA(c,20);
BB10:=atan((aa10/ref(aa10,1)-1)*100)*180/3.1416;
{STICKLINE(BB05<0 and AA05<ref(AA05,1),AA05,ref(AA05,1),3,1),colorcyan;}
AA30:MA(C,30),colorwhite;
三拾日乖離率:(c-AA30)/AA30*100,LINETHICK0;
Var1:=(AA20-AA30)>ref((AA20-AA30),1) and AA20>ref(aa20,1) and AA30>ref(AA30,1);
Var2:=(AA30-AA20)<ref((AA30-AA20),1) and AA20<ref(aa20,1) and AA30<ref(AA30,1);
BB30:=atan((aa30/ref(aa30,1)-1)*100)*180/3.1416;
{STICKLINE(BB30>15 and AA30>ref(AA30,1),AA30,ref(AA30,1),8,1),colorff00ff;}
強勢狙擊:=filter(BB30>30 and BB10>45 and cross(BB05,60),10);
加倉:=filter(count(cross(BB05,30),5)>=1 and AA05>ref(aa05,1) and 三拾日乖離率>ref(三拾日乖離率,1) and AA10>ref(AA10,1)
and 加速度5>ref(加速度5,1) and 速度5>ref(速度5,1),10) ;
清倉:=filter(count(cross(30,BB05),5)>=1 and (c>AA30 or O>AA30) and AA05<ref(aa05,1) and 三拾日乖離率<ref(三拾日乖離率,1) and AA10<ref(AA10,1),10);
DRAWTEXT(加倉,LOW*0.98,'←加倉'),colorred;
JC:=cross(0,五日乖離率) and 三拾日乖離率<ref(三拾日乖離率,1) and AA10>ref(AA10,1) ;
減倉:=filter(JC,10);
MR:=count(cross(五日乖離率,0),3)>=1 and 三拾日乖離率>ref(三拾日乖離率,1) and AA05>ref(AA05,1) and (c/ref(c,1)-1)*100>5 and ref(c,1)<AA30;
買入:=filter(MR,10);
DRAWTEXT(減倉,HIGH*1.02,'←減倉'),colorcyan;
DRAWTEXT(買入,LOW*0.98,'←買入'),coloryelLOW;

DRAWTEXT(強勢狙擊,LOW*0.98,'←強勢狙擊'),coloryelLOW;
Var21:=MAX(ABS(HIGH-AMOUNT/VOL/100),ABS(AMOUNT/VOL/100-LOW));
Var3:=ABS((OPEN+CLOSE)/2-AMOUNT/VOL/100);
MV:=(Var21+Var3)/AMOUNT*VOL*100*50;
DRAWTEXT(MV>6 and l<=llv(l,10),l*0.96,'←異動'),colorcyan;
aa:=if(c>=ref(c,3),1,0);
bb:=if(c>=ref(c,5),1,0);
cc:=if(c>=ref(c,7),1,0);
dd:=if(c>=ref(c,8),1,0);
ee:=if(c>=ref(c,13),1,0);
ff:=if(c>=ref(c,21),1,0);
gz2:=aa+bb+cc+dd+ee+ff;
Var11:=EMA(CLOSE,3)-EMA(CLOSE,6)-(EMA(CLOSE,6)-EMA(CLOSE,12))*(-100);
Var12:=EMA(Var11,3);
Var5:=CROSS(Var11,Var12);
Var6:=CROSS(Var12,Var11);
STICKLINE(C>=O,l,H,0,0),COLOR0000FF,LAYER2;
STICKLINE(C<O,l,H,0,0),COLORFFFF00,LAYER2;
STICKLINE(C>=O,O,C,10,1),COLOR0000FF,LAYER2;
STICKLINE(C<O,O,C,8,0),COLORFFFF00,LAYER2;
STICKLINE(Var6,OPEN,CLOSE,8,0),COLORBLUE,LAYER0;{蘭色熊K}
STICKLINE(Var5,OPEN,CLOSE,5,0),COLORYELLOW,LAYER0;{彩色牛K}
STICKLINE(Var5,OPEN,CLOSE-(CLOSE-OPEN)*0.33,5,0),COLORaaccdd,LAYER0;{彩色牛K}
STICKLINE(Var5,OPEN,CLOSE-(CLOSE-OPEN)*0.66,5,0),COLORRED,LAYER0;{彩色牛K}
DRAWTEXT(c>0,(O+C)/2,NUMTOSTRN(gz2,0 )),coloryelLOW,LAYER0,ALIGN1,VALIGN0,LINETHICK1;{彩色牛K};[attach]2834103[/attach]

{內容來至程序化交易網 CXH99.COM}