相關標簽:

?

?

原理解析：
N賦值:15 VAR2賦值:收盤價的5日簡單移動平均 VAR3賦值:收盤價的10日簡單移動平均 VAR4賦值:收盤價的20日簡單移動平均 VAR5賦值:收盤價的30日簡單移動平均 VAR6賦值:((((VAR2 + VAR3) + VAR4) + VAR5) / 4) VAR7賦值:(((VAR6 - N日前的VAR6) / N日前的VAR6) * 100) VAR9賦值:VAR7的5日指數移動平均 輸出付氏精準:如果VAR7上穿0,返回10,否則返回0,COLOR99CC99 當滿足條件((VAR7>1日前的VAR7)AND(VAR7>0))時,在0和VAR9位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLORFF00FF 當滿足條件((VAR7>1日前的VAR7)AND(VAR7<0))時,在VAR7和VAR9位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLOR0000FF 當滿足條件((VAR9>1日前的VAR9)AND(VAR9<0))時,在VAR7和0位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLORFF0000 當滿足條件(VAR9>1日前的VAR9)時,在VAR7和VAR9位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLOR0000FF 當滿足條件VAR7上穿0時,在VAR7和VAR9位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLORFFFFFF 當滿足條件(VAR7<1日前的VAR7)時,在VAR7和VAR9位置之間畫柱狀線,寬度為5,1不為0則畫空心柱.,COLOR00FF00 //當滿足條件((VAR7<1日前的VAR7)AND(VAR9>(1*1日前的VAR9)))時,在VAR7和VAR9位置之間畫柱狀線,寬度為10,0不為0則畫空心柱.,COLOR00EEFF 當滿足條件(((VAR7<1日前的VAR7)AND(VAR9>(1*1日前的VAR9)))AND(VAR7>0))時,在0和VAR9位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLORFF00FF 輸出生死線:0,COLOR7766CC VAR10賦值:(((收盤價 - 收盤價的58日簡單移動平均) / 收盤價的58日簡單移動平均) * 100) VAR11賦值:((((VAR10 > (1 * 1日前的VAR10)) AND (VAR10 < (0 - 26))) AND (VAR10 > (0 - 40))) * 1.5) VAR12賦值:((成交量(手) / 當前流通股本(手)) * 100) VAR13賦值:50日內最低價距今天數 VAR14賦值:成交量(手)的VAR13日累和 VAR15賦值:50日內最高價距今天數 VAR16賦值:成交量(手)的VAR15日累和 VAR17賦值:(((收盤價 - VAR15日前的開盤價) / VAR15日前的開盤價) * 100) VAR18賦值:((VAR16 / 當前流通股本(手)) * 100) VAR19賦值:(((收盤價 - VAR13日前的開盤價) / VAR13日前的開盤價) * 100) VAR20賦值:((VAR14 / 當前流通股本(手)) * 100) VAR21賦值:收盤價的3日簡單移動平均 VAR22賦值:(2日前的收盤價 * 0.865) VAR23賦值:(13日前的收盤價 * 0.772) VAR24賦值:VAR22和VAR23的較小值 VAR25賦值:收盤價的13日簡單移動平均 輸出大底:(如果(((((收盤價-VAR24)/收盤價)<0.03)AND(VAR17<(0-35)))AND((VAR12的5日累和/5)<1.8)),返回1,否則返回0 * 10),COLORFFFF00 VAR26賦值:(((收盤價 - 1日前的收盤價) / 1日前的收盤價) * 100) VAR27賦值:((收盤價的12日指數移動平均 - 收盤價的26日指數移動平均) * 100) VAR28賦值:VAR27的9日指數移動平均 VAR29賦值:(2 * (VAR27 - VAR28)) 當滿足條件((VAR27<(0-50))AND(VAR26>7))時,在0和(0-10)位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLORFFFF66 當滿足條件((VAR27<(0-50))AND(VAR26>7))時,在(0-10)位置書寫文字 當滿足條件大底時,在8位置書寫文字,COLORFFFFFF 當滿足條件(VAR9上穿VAR7AND(VAR7>0))時,在VAR9位置畫5號圖標 當滿足條件(VAR9上穿VAR7AND(VAR7>0))時,在VAR9位置書寫文字,畫白色 KS13賦值:(((收盤價 - 收盤價的13日簡單移動平均) / 收盤價的13日簡單移動平均) * (0 - 100)) RSV賦值:(((收盤價 - 13日內最低價的最低值) / (13日內最高價的最高值 - 13日內最低價的最低值)) * 100) FASTK賦值:RSV的3日[1日權重]移動平均 D賦值:FASTK的3日[1日權重]移動平均 VA1賦值:D的5日[1日權重]移動平均 VA2賦值:(((收盤價 / 收盤價的40日簡單移動平均) * 100) < 76) VA3賦值:(((收盤價 / 收盤價的60日簡單移動平均) * 100) < 74) VA4賦值:(最高價 > (最低價 * 1.051)) FNZH賦值:(VA4 AND (統計5日中滿足VA4的天數 > 1)) LC賦值:((((FNZH AND (VA2 OR VA3)) AND (1日前的KS13 >= 10)) AND ((1日前的KS13 / KS13) >= 1.13)) AND ((收盤價 / 1日前的收盤價) >= 1.02)) 當滿足條件LC時,在5位置畫12號圖標 當滿足條件LC時,在15位置書寫文字,COLOR0000FF RSI賦值:1日前的收盤價 VAR58賦值:(((收盤價-RSI)和0的較大值的6日[1日權重]移動平均 / (收盤價-RSI)的絕對值的6日[1日權重]移動平均) * 100) 當滿足條件((1日前的VAR58>85)ANDCROSS(84,VAR58))時,在VAR7位置畫5號圖標 TIPTEXT(ISNULL(1日后的&收盤價),0,' www.kzuj.com.cn '),畫紅色 TIPTEXT(ISNULL(1日前的收盤價),0,'同花順程序化交易')

?

?來源:程序化99（ www.kzuj.com.cn ）

源碼：

?

?

n:=15;
VAR2:=MA(CLOSE,5);
VAR3:=MA(CLOSE,10);
VAR4:=MA(CLOSE,20);
VAR5:=MA(CLOSE,30);
VAR6:=((((VAR2 + VAR3) + VAR4) + VAR5) / 4);
VAR7:=(((VAR6 - REF(VAR6,N)) / REF(VAR6,N)) * 100);
VAR9:=EMA(VAR7,5);
付氏精準:IF(CROSS(VAR7,0),10,0),COLOR99CC99;
STICKLINE(((VAR7 > REF(VAR7,1)) AND (VAR7 > 0)),0,VAR9,5,0),COLORFF00FF;
STICKLINE(((VAR7 > REF(VAR7,1)) AND (VAR7 < 0)),VAR7,VAR9,5,0),COLOR0000FF;
STICKLINE(((VAR9 > REF(VAR9,1)) AND (VAR9 < 0)),VAR7,0,5,0),COLORFF0000;
STICKLINE((VAR9 > REF(VAR9,1)),VAR7,VAR9,5,0),COLOR0000FF;
STICKLINE(CROSS(VAR7,0),VAR7,VAR9,8,0),COLORFFFFFF;
STICKLINE((VAR7 < REF(VAR7,1)),VAR7,VAR9,5,1),COLOR00FF00;//
STICKLINE(((VAR7 < REF(VAR7,1)) AND (VAR9 > (1 * REF(VAR9,1)))),VAR7,VAR9,10,0),COLOR00EEFF;
STICKLINE((((VAR7 < REF(VAR7,1)) AND (VAR9 > (1 * REF(VAR9,1)))) AND (VAR7 > 0)),0,VAR9,5,0),COLORFF00FF;
生死線:0,COLOR7766CC;
VAR10:=(((CLOSE - MA(CLOSE,58)) / MA(CLOSE,58)) * 100);
VAR11:=((((VAR10 > (1 * REF(VAR10,1))) AND (VAR10 < (0 - 26))) AND (VAR10 > (0 - 40))) * 1.5);
VAR12:=((VOL / CAPITAL) * 100);
VAR13:=LLVBARS(LOW,50);
VAR14:=SUM(VOL,VAR13);
VAR15:=HHVBARS(HIGH,50);
VAR16:=SUM(VOL,VAR15);
VAR17:=(((CLOSE - REF(OPEN,VAR15)) / REF(OPEN,VAR15)) * 100);
VAR18:=((VAR16 / CAPITAL) * 100);
VAR19:=(((CLOSE - REF(OPEN,VAR13)) / REF(OPEN,VAR13)) * 100);
VAR20:=((VAR14 / CAPITAL) * 100);
VAR21:=MA(CLOSE,3);
VAR22:=(REF(CLOSE,2) * 0.865);
VAR23:=(REF(CLOSE,13) * 0.772);
VAR24:=MIN(VAR22,VAR23);
VAR25:=MA(CLOSE,13);
大底:(IF((((((CLOSE - VAR24) / CLOSE) < 0.03) AND (VAR17 < (0 - 35))) AND ((SUM(VAR12,5) / 5) < 1.8)),1,0) * 10),COLORFFFF00;
VAR26:=(((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)) * 100);
VAR27:=((EMA(CLOSE,12) - EMA(CLOSE,26)) * 100);
VAR28:=EMA(VAR27,9);
VAR29:=(2 * (VAR27 - VAR28));
STICKLINE(((VAR27 < (0 - 50)) AND (VAR26 > 7)),0,(0 - 10),5,0),COLORFFFF66;
DRAWTEXT(((VAR27 < (0 - 50)) AND (VAR26 > 7)),(0 - 10),'單邊追漲');
DRAWTEXT(大底,8,'大底-成功率95%'),COLORFFFFFF;
DRAWICON((CROSS(VAR9,VAR7) AND (VAR7 > 0)),VAR9,5);
DRAWTEXT((CROSS(VAR9,VAR7) AND (VAR7 > 0)),VAR9,'逃頂'),colorwhite;
KS13:=(((CLOSE - MA(CLOSE,13)) / MA(CLOSE,13)) * (0 - 100));
RSV:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100);
FASTK:=SMA(RSV,3,1);
D:=SMA(FASTK,3,1);
VA1:=SMA(D,5,1);
VA2:=(((CLOSE / MA(CLOSE,40)) * 100) < 76);
VA3:=(((CLOSE / MA(CLOSE,60)) * 100) < 74);
VA4:=(HIGH > (LOW * 1.051));
FNZH:=(VA4 AND (COUNT(VA4,5) > 1));
LC:=((((FNZH AND (VA2 OR VA3)) AND (REF(KS13,1) >= 10)) AND ((REF(KS13,1) / KS13) >= 1.13)) AND ((CLOSE / REF(CLOSE,1)) >= 1.02));
DRAWICON(LC,5,12);
DRAWTEXT(LC,15,'反彈'),COLOR0000FF;
RSI:=REF(CLOSE,1);
VAR58:=((SMA(MAX((CLOSE - RSI),0),6,1) / SMA(ABS((CLOSE - RSI)),6,1)) * 100);
DRAWICON(((REF(VAR58,1) > 85) AND CROSS(84,VAR58)),VAR7,5);
TIPTEXT(ISNULL(REFX(&CLOSE,1)),0,' www.kzuj.com.cn '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花順程序化交易');

?

公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】

?