開心炒股系統源碼(各軟件通用)[大智慧公式]

相關標簽: 開心炒股系統源碼(各軟件通用),開心炒股指標源碼,開心炒股公式、

開心炒股系統－（有說明、有圖 源碼）

看了有的學友轉帖了我的“開心炒股系統”指標，因為沒有必要的說明，使得很多學友不知道該指標的精妙而與該指標擦邊而過。該指標是我大約花了三個月的收集、學習編寫才完成的。雖然主要是多個指標合成的，但是也有一些自己的理念融在里面，包括一些典型的選股（多線粘合、拉升、超強選股），還有階段頂和高位頂的提示，指標中沒有未來函數。使用方法在打油詩中已經有說明，具體的含意是：
綠色不參與:指股價處于下跌行情或處于洗盤狀態，這時可暫時出來觀望。
 

紫陽快牛B:指出現紫陽時，表示股價接近企穩、要轉強了，準備戰斗。
 

紫紅緊跟上:指紫陽和拉升信號同時出現時，要及時買入等待拉升。{本文來源： www.tumamayizhan.com}
升浪超強機:指出現超強信號時，是強拉升，如果是在后期，一般是夢寐以求的主升浪來臨，更是要拿好手中的股票，不要見一個漲停就出來哦，那樣你會后悔不止的。該指標也適合看大盤，指標在4月16日就提示不要參與、需要空倉了，你知道嗎？等到紫陽高照以后才進去不遲！！！！該指標經過一品老師幫處理后才能在各種軟件通過，在此再次感謝一品老師！！！！
 

你如果認為該指標有用就用，頂不頂無所謂。如果認為該指標沒有用，也不要說酸話哈。最后祝各位朋友，開心炒股、開心賺錢！！！！

{開心炒股系統----各種軟件通用} 以下為源碼
 

開心易友:=(CLOSE-MA(CLOSE,20))/MA(CLOSE,20)*100;
研制:=IF(開心易友>0,開心易友,0);
STICKLINE(開心易友>0,開心易友,0,3,0),COLORRED;
STICKLINE(開心易友>0 AND C<ref(C,1),開心易友,0,3,0),COLORFF2626;
VARQS3:=EMA(CLOSE,2)-EMA(CLOSE,150);
VARQS4:=EMA(VARQS3,100);
VARQS5:=2*(VARQS3-VARQS4);
VARQS6:=POW(VARQS5,3)*0.1+POW(VARQS5,1);
黑馬:=(IF(VARQS5>0.1,VARQS6,0))*3;
黑牛:=(CLOSE-MA(CLOSE,25))/MA(CLOSE,25)*100;
VARQS7:=MA(黑牛,17)+MA(黑牛,17)-ref(MA(黑牛,17),1);
VARQS8:=IF(MA(黑牛,17)<VARQS7,VARQS7,MA(黑牛,17));
行情轉:=VARQS8-(EMA(黑牛,17)-VARQS8)*0.98;
Q:=CROSS(黑牛,行情轉) AND 黑牛>ref(黑牛,1) AND 行情轉<ref(行情轉,5);
DRAWTEXT(Q,黑牛,'●'),COLORF00FF0;
不參與:STICKLINE(開心易友<0,開心易友,0,3,0),COLORGREEN;
綠色不參與:0,COLORGREEN;紫陽快牛B:0,COLORF00FF0;
紫紅緊跟上:0,COLORRED;升浪超強機:0,COLORYELLOW;
{以下設置三線粘合}
MA1:=EMA(C,10);
MA2:=EMA(C,20);
MA3:=EMA(C,30);
A1:=ABS(MA1-MA2)+ABS(MA2-MA3);
A2:=A1/C<1/100 AND MA1>ref(MA1,1) AND MA2>ref(MA2,1);
STICKLINE(A2,0,4,2,0),COLORYELLOW;
{以下設置一陽穿4線}
EMA7:=EMA(CLOSE,7);
EMA14:=EMA(CLOSE,14);
EMA25:=EMA(CLOSE,25);
EMA55:=EMA(CLOSE,55);
A12:=ABS(EMA7-EMA14)+ABS(EMA14-EMA25)+ABS(EMA25-EMA55);
A22:=A1/C<1/100 AND EMA7>ref(EMA7,1) AND EMA14>ref(EMA14,1) AND EMA25>ref(EMA25,1);
極強:CROSS(C,EMA7) AND CROSS(C,EMA14) AND CROSS(C,EMA25) AND CROSS(C,EMA25) AND CROSS(C,EMA55)
AND EMA7>ref(EMA7,1) AND EMA14>ref(EMA14,1) AND EMA25>ref(EMA25,1) AND EMA55>ref(EMA55,1),COLORWHITE;
STICKLINE(極強,-20,0,1.5,0),COLORWHITE;
{以下設置經典選股}
VAR11:=MA(CLOSE,10)-EMA(CLOSE,10)*100;
VAR12:=MA(VAR11,5);
VAR13:=3*(VAR12-VAR11);
拉升:CROSS(VAR13,20),COLORRED;
DRAWTEXT(拉升,-4,'▲'),COLORRED;
{超強信號}
超強信號:=H/MA(H,5)*(1+5/100);
超強▲:CROSS(超強信號,1.15),COLORYELLOW;
R:=IF(超強信號>=1.15,1,0);
DRAWTEXT(R,-4,'▲'),COLORYELLOW;
DRAWTEXT(R,-8,'▲'),COLORYELLOW;
DRAWTEXT(R,-12,'▲'),COLORYELLOW;
{CD抄底XG}
MA32:=EMA(C,3);
LC1 := ref(CLOSE,1);
RSI4A:=SMA(MAX(CLOSE-LC1,0),4,1)/SMA(ABS(CLOSE-LC1),4,1)*100;
TYP:=(HIGH+LOW+CLOSE)/3;
CCI:=(TYP-MA(TYP,500))/(0.015*AVEDEV(TYP,500));
RSV:=(CLOSE-LLV(LOW,500))/(HHV(HIGH,500)-LLV(LOW,500))*100;
MTM:=CLOSE-ref(CLOSE,500);
VV:=(CCI<-100) AND (RSV<20) AND (MTM<0) AND (RSI4A<15);
轉折●:Q,COLORF00FF0;粘合:0,COLORYELLOW;
底:IF(VV,20,0),STICK,COLORGREEN;
長RSVA:=(CLOSE-LLV(LOW,89))/(HHV(HIGH,89)-LLV(LOW,89))*100;
長K89A:=SMA(長RSVA,3,1);
長D89A:=SMA(長K89A,3,1);
中RSV27A:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;
中K27A:=SMA(中RSV27A,3,1);
頂:=IF(CROSS(長D89A,50) AND 中K27A>ref(中K27A,1) AND 中K27A>70,90,0);
DRAWTEXT(頂,0,'◆'),COLOR00FF00;
不穿零大牛:0,COLORRED;
{抄底逃頂}
VAR222:=LLV(LOW,10);
VAR322:=HHV(HIGH,25);
{階段賣出:=35}
動力線:=(EMA((CLOSE-VAR222)/(VAR322-VAR222)*4,4))*10;
清倉賣出:=CROSS(35,動力線);
STICKLINE(動力線>ref(動力線,1) ,動力線 ,ref(動力線,1),2,1),COLORYELLOW; {內容來至程序化交易網 CXH99.COM}
STICKLINE(動力線<=ref(動力線,1) ,動力線 ,ref(動力線,1),2,1),COLOR00FF00;
STICKLINE(清倉賣出,38,39,3,0),COLOR00FF00;
DRAWTEXT(清倉賣出,47,'▼'),COLOR00FF00;
G:=20;M12:=4;M22:=2;Q1:=30;
VAR232:=(CLOSE-LLV(LOW,G))/(HHV(HIGH,G)-LLV(LOW,G))*100;
VAR332:=SMA(VAR232,M12,1);
VAR432:=SMA(VAR332,M22,1);
機構減倉:=(VAR432>82 AND VAR332>89)*20;
臨界頂:=(VAR432>85 AND VAR332>95)*20;
DRAWTEXT(機構減倉=20,50,'▼'),COLORF00FF0;
DRAWTEXT(臨界頂,60,'▼'),COLORGREEN;

發兩張說明圖和大盤圖。

{本文來至程序化交易網 cxh99.com}