?LY:=10;BL:=40;CJQS:=REFX1(MA(CLOSE,LY),LY/2);JBQS:=REFX1(MA(CLOSE,BL),BL/2);CURRBARSCOUNT:=DATACOUNT-BARPOS;N:=REF(JBQS,BL/2+1-CURRBARSCOUNT)/REF(JBQS,BL/2+2-CURRBARSCOUNT);M:=REF(CJQS,LY/2+1-CURRBARSCOUNT)/REF(CJQS,LY/2+2-CURRBARSCOUNT);JB上軌:IF(CURRBARSCOUNT>BL/2,JBQS*1.1,REF(JBQS,BL/2+1-CURRBARSCOUNT)*POW(N,BL/2+1-CURRBARSCOUNT)*1.1);JB下軌:IF(CURRBARSCOUNT>BL/2,JBQS*0.9,REF(JBQS,BL/2+1-CURRBARSCOUNT)*POW(N,BL/2+1-CURRBARSCOUNT)*0.9);CJ上軌:IF(CURRBARSCOUNT>LY/2,CJQS*1.05,REF(CJQS,LY/2+1-CURRBARSCOUNT)*POW(M,LY/2+1-CURRBARSCOUNT)*1.05);CJ下軌:IF(CURRBARSCOUNT>LY/2,CJQS*0.95,REF(CJQS,LY/2+1-CURRBARSCOUNT)*POW(M,LY/2+1-CURRBARSCOUNT)*0.95);DRAWTEXT(O<=CJ下軌,(L * 0.98),'搶'),COLORYELLOW;DRAWTEXT(CROSS(H,CJ上軌),(H * 1.01),'逃'),COLORYELLOW;TJ:=VOL>=REF(V,1)*1.91 AND C>REF(C,1)*1.01;STICKLINE(TJ,C,O+(C-O)/2,1,0),COLOR00FFFF;MA1:=MA(CLOSE,5);MA2:=MA(CLOSE,10);MA3:=MA(CLOSE,20);一穿三:=MA1>O AND MA2>O AND MA3>O AND MA1<C AND MA2<C AND MA3<C AND CLOSE>OPEN ;STICKLINE(一穿三,O,O+(C-O)/2,1,0),COLORFF00FF;AAA2:=SUM(IF( CLOSE>REF(CLOSE,1),VOL*C,0),0);AAA3:=SUM(IF( CLOSE<REF(CLOSE,1),VOL*C,0),0);AAA4:=SUM(IF( CLOSE=REF(CLOSE,1),VOL*C,0),0);BB1:=0;DVOL:=REFX1(V,100000);DCLOSE:=REFX1(C,10000);B1萬元:=DVOL*DCLOSE/100;B1差:=B1萬元-REF(B1萬元,1);B2萬元:=DVOL*DCLOSE/100;B2比:=B2萬元/REF(B2萬元,1);凈流入萬元:=(AAA2-AAA3-0.5*AAA4);PM:=MA(凈流入萬元,1);PMA:=PM/REF(PM,1)>1;PMB:=REF(PMA,1)<1 AND PMA;密碼:(EMA(MA(B1萬元,2),2))/100000,COLORYELLOW,NODRAW;二日比:=密碼/REF(密碼,1);選股:PMB AND 密碼>REF(密碼,1) AND 二日比>1,COLORRED,NODRAW;Y:=CLOSE/REF(CLOSE,1)>1.07;X:=VOL>MA(VOL,5);A1:=Y AND X;DRAWTEXT(A1,MA(CLOSE,5),'攻漲停'),COLORMAGENTA; ?
?
?來源:程序化99
文華技術人員：
?提供下指標源碼我們看下。
?
?來源: www.tumamayizhan.com
文華客服：?LY:=10;BL:=40;CJQS:=REFX1(MA(CLOSE,LY),LY/2);JBQS:=REFX1(MA(CLOSE,BL),BL/2);CURRBARSCOUNT:=DATACOUNT-BARPOS;N:=REF(JBQS,BL/2+1-CURRBARSCOUNT)/REF(JBQS,BL/2+2-CURRBARSCOUNT);M:=REF(CJQS,LY/2+1-CURRBARSCOUNT)/REF(CJQS,LY/2+2-CURRBARSCOUNT);JB上軌:IF(CURRBARSCOUNT>BL/2,JBQS*1.1,REF(JBQS,BL/2+1-CURRBARSCOUNT)*POW(N,BL/2+1-CURRBARSCOUNT)*1.1);JB下軌:IF(CURRBARSCOUNT>BL/2,JBQS*0.9,REF(JBQS,BL/2+1-CURRBARSCOUNT)*POW(N,BL/2+1-CURRBARSCOUNT)*0.9);CJ上軌:IF(CURRBARSCOUNT>LY/2,CJQS*1.05,REF(CJQS,LY/2+1-CURRBARSCOUNT)*POW(M,LY/2+1-CURRBARSCOUNT)*1.05);CJ下軌:IF(CURRBARSCOUNT>LY/2,CJQS*0.95,REF(CJQS,LY/2+1-CURRBARSCOUNT)*POW(M,LY/2+1-CURRBARSCOUNT)*0.95);DRAWTEXT(O<=CJ下軌,(L * 0.98),'',COLORYELLOW;DRAWTEXT(CROSS(H,CJ上軌),(H * 1.01),'',COLORYELLOW;TJ:=VOL>=REF(V,1)*1.91 AND C>REF(C,1)*1.01;STICKLINE(TJ,C,O+(C-O)/2,1,0),COLOR00FFFF;MA1:=MA(CLOSE,5);MA2:=MA(CLOSE,10);MA3:=MA(CLOSE,20);一穿三:=MA1>O AND MA2>O AND MA3>O AND MA1<C AND MA2<C AND MA3<C AND CLOSE>OPEN ;STICKLINE(一穿三,O,O+(C-O)/2,1,0),COLORFF00FF;AAA2:=SUM(IF( CLOSE>REF(CLOSE,1),VOL*C,0),0);AAA3:=SUM(IF( CLOSE<REF(CLOSE,1),VOL*C,0),0);AAA4:=SUM(IF( CLOSE=REF(CLOSE,1),VOL*C,0),0);BB1:=0;DVOL:=REFX1(V,100000);DCLOSE:=REFX1(C,10000);B1萬元:=DVOL*DCLOSE/100;B1差:=B1萬元-REF(B1萬元,1);B2萬元:=DVOL*DCLOSE/100;B2比:=B2萬元/REF(B2萬元,1);凈流入萬元:=(AAA2-AAA3-0.5*AAA4);PM:=MA(凈流入萬元,1);PMA:=PM/REF(PM,1)>1;PMB:=REF(PMA,1)<1 AND PMA;密碼:(EMA(MA(B1萬元,2),2))/100000,COLORYELLOW,NODRAW;二日比:=密碼/REF(密碼,1);選股:PMB AND 密碼>REF(密碼,1) AND 二日比>1,COLORRED,NODRAW;Y:=CLOSE/REF(CLOSE,1)>1.07;X:=VOL>MA(VOL,5);A1:=Y AND X;DRAWTEXT(A1,MA(CLOSE,5),'漲停',COLORMAGENTA;
?
網友回復：?參考： ?LY:=10;BL:=40;CJQS:=REFX1(MA(CLOSE,LY),LY/2);JBQS:=REFX1(MA(CLOSE,BL),BL/2);CURRBARSCOUNT:=DATACOUNT-BARPOS;N:=REF(JBQS,BL/2+1-CURRBARSCOUNT)/REF(JBQS,BL/2+2-CURRBARSCOUNT);M:=REF(CJQS,LY/2+1-CURRBARSCOUNT)/REF(CJQS,LY/2+2-CURRBARSCOUNT);JB上軌:IF(CURRBARSCOUNT>BL/2,JBQS*1.1,REF(JBQS,BL/2+1-CURRBARSCOUNT)*POW(N,BL/2+1-CURRBARSCOUNT)*1.1);JB下軌:IF(CURRBARSCOUNT>BL/2,JBQS*0.9,REF(JBQS,BL/2+1-CURRBARSCOUNT)*POW(N,BL/2+1-CURRBARSCOUNT)*0.9);CJ上軌:IF(CURRBARSCOUNT>LY/2,CJQS*1.05,REF(CJQS,LY/2+1-CURRBARSCOUNT)*POW(M,LY/2+1-CURRBARSCOUNT)*1.05);CJ下軌:IF(CURRBARSCOUNT>LY/2,CJQS*0.95,REF(CJQS,LY/2+1-CURRBARSCOUNT)*POW(M,LY/2+1-CURRBARSCOUNT)*0.95);DRAWTEXT(O<=CJ下軌,L-5*MINPRICE,'',COLORYELLOW;DRAWTEXT(CROSS(H,CJ上軌),H+5*MINPRICE ,'',COLORYELLOW;TJ:=VOL>=REF(V,1)*1.91 AND C>REF(C,1)*1.01;STICKLINE(TJ,C,O+(C-O)/2,1,0),COLOR00FFFF;MA1:=MA(CLOSE,5);MA2:=MA(CLOSE,10);MA3:=MA(CLOSE,20);一穿三:=MA1>O AND MA2>O AND MA3>O AND MA1<C AND MA2<C AND MA3<C AND CLOSE>OPEN ;STICKLINE(一穿三,O,O+(C-O)/2,1,0),COLORFF00FF;AAA2:=SUM(IF( CLOSE>REF(CLOSE,1),VOL*C,0),0);AAA3:=SUM(IF( CLOSE<REF(CLOSE,1),VOL*C,0),0);AAA4:=SUM(IF( CLOSE=REF(CLOSE,1),VOL*C,0),0);BB1:=0;DVOL:=REFX1(V,100000);DCLOSE:=REFX1(C,10000);B1萬元:=DVOL*DCLOSE/100;B1差:=B1萬元-REF(B1萬元,1);B2萬元:=DVOL*DCLOSE/100;B2比:=B2萬元/REF(B2萬元,1);凈流入萬元:=(AAA2-AAA3-0.5*AAA4);PM:=MA(凈流入萬元,1);PMA:=PM/REF(PM,1)>1;PMB:=REF(PMA,1)<1 AND PMA;密碼:(EMA(MA(B1萬元,2),2))/100000,COLORYELLOW,NODRAW;二日比:=密碼/REF(密碼,1);選股:PMB AND 密碼>REF(密碼,1) AND 二日比>1,COLORRED,NODRAW;Y:=CLOSE/REF(CLOSE,1)>1.07;X:=VOL>MA(VOL,5);A1:=Y AND X;DRAWTEXT(A1,MA(CLOSE,5),'漲停',COLORMAGENTA;
打印本文
關閉窗口