編程思路破譯開心易友賦值:(收盤價-收盤價的20日簡單移動平均)/收盤價的20日簡單移動平均*100 研制賦值:如果開心易友>0,返回開心易友,否則返回0 當(dāng)滿足條件開心易友>0時,在開心易友和0位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,畫紅色 當(dāng)滿足條件開心易友>0ANDC<1日前的收盤價時,在開心易友和0位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLORFF2626 VARQS3賦值:收盤價的2日指數(shù)移動平均-收盤價的150日指數(shù)移動平均 VARQS4賦值:VARQS3的100日指數(shù)移動平均 VARQS5賦值:2*(VARQS3-VARQS4) VARQS6賦值:VARQS5的3乘冪*0.1+VARQS5的1乘冪 黑馬賦值:(如果VARQS5>0.1,返回VARQS6,否則返回0)*3 黑牛賦值:(收盤價-收盤價的25日簡單移動平均)/收盤價的25日簡單移動平均*100 VARQS7賦值:黑牛的17日簡單移動平均+黑牛的17日簡單移動平均-1日前的黑牛的17日簡單移動平均 VARQS8賦值:如果黑牛的17日簡單移動平均<VARQS7,返回VARQS7,否則返回黑牛的17日簡單移動平均 行情轉(zhuǎn)賦值:VARQS8-(黑牛的17日指數(shù)移動平均-VARQS8)*0.98 Q賦值:黑牛上穿行情轉(zhuǎn) AND 黑牛>1日前的黑牛 AND 行情轉(zhuǎn)<5日前的行情轉(zhuǎn) 當(dāng)滿足條件Q時,在黑牛位置書寫文字,COLORF00FF0 輸出不參與:當(dāng)滿足條件開心易友<0時,在開心易友和0位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,畫綠色 輸出綠色不參與:0,畫綠色 輸出紫陽快牛B:0,COLORF00FF0 輸出紫紅緊跟上:0,畫紅色 輸出升浪超強機:0,畫黃色 MA1賦值:收盤價的10日指數(shù)移動平均 MA2賦值:收盤價的20日指數(shù)移動平均 MA3賦值:收盤價的30日指數(shù)移動平均 A1賦值:MA1-MA2的絕對值+MA2-MA3的絕對值 A2賦值:A1/收盤價<1/100 AND MA1>1日前的MA1 AND MA2>1日前的MA2 當(dāng)滿足條件A2時,在0和4位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,畫黃色 EMA7賦值:收盤價的7日指數(shù)移動平均 EMA14賦值:收盤價的14日指數(shù)移動平均 EMA25賦值:收盤價的25日指數(shù)移動平均 EMA55賦值:收盤價的55日指數(shù)移動平均 A12賦值:EMA7-EMA14的絕對值+EMA14-EMA25的絕對值+EMA25-EMA55的絕對值 A22賦值:A1/收盤價<1/100 AND EMA7>1日前的EMA7 AND EMA14>1日前的EMA14 AND EMA25>1日前的EMA25 輸出極強:收盤價上穿EMA7 AND 收盤價上穿EMA14 AND 收盤價上穿EMA25 AND 收盤價上穿EMA25 AND 收盤價上穿EMA55AND EMA7>1日前的EMA7 AND EMA14>1日前的EMA14 AND EMA25>1日前的EMA25 AND EMA55>1日前的EMA55,畫白色 當(dāng)滿足條件極強時,在-20和0位置之間畫柱狀線,寬度為1.5,0不為0則畫空心柱.,畫白色 VAR11賦值:收盤價的10日簡單移動平均-收盤價的10日指數(shù)移動平均*100 VAR12賦值:VAR11的5日簡單移動平均 VAR13賦值:3*(VAR12-VAR11) 輸出拉升:VAR13上穿20,畫紅色 當(dāng)滿足條件拉升時,在-4位置書寫文字,畫紅色 超強信號賦值:最高價/最高價的5日簡單移動平均*(1+5/100) 輸出超強▲:超強信號上穿1.15,畫黃色 R賦值:如果超強信號>=1.15,返回1,否則返回0 當(dāng)滿足條件R時,在-4位置書寫文字,畫黃色 當(dāng)滿足條件R時,在-8位置書寫文字,畫黃色 當(dāng)滿足條件R時,在-12位置書寫文字,畫黃色 MA32賦值:收盤價的3日指數(shù)移動平均 賦值: 1日前的收盤價 RSI4A賦值:收盤價-LC1和0的較大值的4日[1日權(quán)重]移動平均/收盤價-LC1的絕對值的4日[1日權(quán)重]移動平均*100 TYP賦值:(最高價+最低價+收盤價)/3 CCI賦值:(TYP-TYP的500日簡單移動平均)/(0.015*TYP的500日平均絕對偏差) RSV賦值:(收盤價-500日內(nèi)最低價的最低值)/(500日內(nèi)最高價的最高值-500日內(nèi)最低價的最低值)*100 MTM賦值:收盤價-500日前的收盤價 VV賦值:(CCI<-100) AND (RSV<20) AND (MTM<0) AND (RSI4A<15) 輸出轉(zhuǎn)折●:Q,COLORF00FF0 輸出粘合:0,畫黃色 輸出底:如果VV,返回20,否則返回0,STICK,畫綠色 長RSVA賦值:(收盤價-89日內(nèi)最低價的最低值)/(89日內(nèi)最高價的最高值-89日內(nèi)最低價的最低值)*100 長K89A賦值:長RSVA的3日[1日權(quán)重]移動平均 長D89A賦值:長K89A的3日[1日權(quán)重]移動平均 中RSV27A賦值:(收盤價-27日內(nèi)最低價的最低值)/(27日內(nèi)最高價的最高值-27日內(nèi)最低價的最低值)*100 中K27A賦值:中RSV27A的3日[1日權(quán)重]移動平均 頂賦值:如果長D89A上穿50AND中K27A>1日前的中K27AAND中K27A>70,返回90,否則返回0 當(dāng)滿足條件頂時,在0位置書寫文字,COLOR00FF00 輸出不穿零大牛:0,畫紅色 VAR222賦值:10日內(nèi)最低價的最低值 VAR322賦值:25日內(nèi)最高價的最高值 動力線賦值:((收盤價-VAR222)/(VAR322-VAR222)*4的4日指數(shù)移動平均)*10 清倉賣出賦值:35上穿動力線 當(dāng)滿足條件動力線>1日前的動力線時,在動力線和1日前的動力線位置之間畫柱狀線,寬度為2,1不為0則畫空心柱.,畫黃色 當(dāng)滿足條件動力線<=1日前的動力線時,在動力線和1日前的動力線位置之間畫柱狀線,寬度為2,1不為0則畫空心柱.,COLOR00FF00 當(dāng)滿足條件清倉賣出時,在38和39位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR00FF00 當(dāng)滿足條件清倉賣出時,在47位置書寫文字,COLOR00FF00 G賦值:20 M12賦值:4 M22賦值:2 Q1賦值:30 VAR232賦值:(收盤價-G日內(nèi)最低價的最低值)/(G日內(nèi)最高價的最高值-G日內(nèi)最低價的最低值)*100 VAR332賦值:VAR232的M12日[1日權(quán)重]移動平均 VAR432賦值:VAR332的M22日[1日權(quán)重]移動平均 機構(gòu)減倉賦值:(VAR432>82 AND VAR332>89)*20 臨界頂賦值:(VAR432>85 AND VAR332>95)*20 當(dāng)滿足條件機構(gòu)減倉=20時,在50位置書寫文字,COLORF00FF0 當(dāng)滿足條件臨界頂時,在60位置書寫文字,畫綠色 程序源碼開心易友:=(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)); 行情轉(zhuǎn):=VARQS8-(EMA(黑牛,17)-VARQS8)*0.98; Q:=CROSS(黑牛,行情轉(zhuǎn)) AND 黑牛>REF(黑牛,1) AND 行情轉(zhuǎn)<REF(行情轉(zhuǎn),5); DRAWTEXT(Q,黑牛,''),COLORF00FF0; 不參與:STICKLINE(開心易友<0,開心易友,0,3,0),COLORGREEN; 綠色不參與:0,COLORGREEN;紫陽快牛B:0,COLORF00FF0; 紫紅緊跟上:0,COLORRED;升浪超強機:0,COLORYELLOW; {以下設(shè)置三線粘合} 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; {以下設(shè)置一陽穿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; {以下設(shè)置經(jīng)典選股} 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); 轉(zhuǎn)折●: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; 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); 機構(gòu)減倉:=(VAR432>82 AND VAR332>89)*20; 臨界頂:=(VAR432>85 AND VAR332>95)*20; DRAWTEXT(機構(gòu)減倉=20,50,'▼'),COLORF00FF0; DRAWTEXT(臨界頂,60,'▼'),COLORGREEN; |
|
|