|
編程思路破譯 N賦值:9 MID賦值:收盤價(jià)的N日[1日權(quán)重]移動(dòng)平均 MA0賦值:MID的30日簡(jiǎn)單移動(dòng)平均 MA1賦值:MID的1日簡(jiǎn)單移動(dòng)平均 A1賦值:MA1-MA0 MA2賦值:MID的2日簡(jiǎn)單移動(dòng)平均 A2賦值:MA2-MA0 MA3賦值:MID的3日簡(jiǎn)單移動(dòng)平均 A3賦值:MA3-MA0 MA4賦值:MID的4日簡(jiǎn)單移動(dòng)平均 A4賦值:MA4-MA0 MA5賦值:MID的5日簡(jiǎn)單移動(dòng)平均 A5賦值:MA5-MA0 MA6賦值:MID的6日簡(jiǎn)單移動(dòng)平均 A6賦值:MA6-MA0 MA7賦值:MID的7日簡(jiǎn)單移動(dòng)平均 A7賦值:MA7-MA0 MA8賦值:MID的8日簡(jiǎn)單移動(dòng)平均 A8賦值:MA8-MA0 MA9賦值:MID的9日簡(jiǎn)單移動(dòng)平均 A9賦值:MA9-MA0 MA10賦值:MID的10日簡(jiǎn)單移動(dòng)平均 A10賦值:MA10-MA0 MA11賦值:MID的11日簡(jiǎn)單移動(dòng)平均 A11賦值:MA11-MA0 MA12賦值:MID的12日簡(jiǎn)單移動(dòng)平均 A12賦值:MA12-MA0 MA13賦值:MID的13日簡(jiǎn)單移動(dòng)平均 A13賦值:MA13-MA0 MA14賦值:MID的14日簡(jiǎn)單移動(dòng)平均 A14賦值:MA14-MA0 MA15賦值:MID的15日簡(jiǎn)單移動(dòng)平均 A15賦值:MA15-MA0 MA16賦值:MID的16日簡(jiǎn)單移動(dòng)平均 A16賦值:MA16-MA0 MA17賦值:MID的17日簡(jiǎn)單移動(dòng)平均 A17賦值:MA17-MA0 MA18賦值:MID的18日簡(jiǎn)單移動(dòng)平均 A18賦值:MA18-MA0 MA19賦值:MID的19日簡(jiǎn)單移動(dòng)平均 A19賦值:MA19-MA0 MA20賦值:MID的20日簡(jiǎn)單移動(dòng)平均 A20賦值:MA20-MA0 MA21賦值:MID的21日簡(jiǎn)單移動(dòng)平均 A21賦值:MA21-MA0 MA22賦值:MID的22日簡(jiǎn)單移動(dòng)平均 A22賦值:MA22-MA0 MA23賦值:MID的23日簡(jiǎn)單移動(dòng)平均 A23賦值:MA23-MA0 MA24賦值:MID的24日簡(jiǎn)單移動(dòng)平均 A24賦值:MA24-MA0 MA25賦值:MID的25日簡(jiǎn)單移動(dòng)平均 A25賦值:MA25-MA0 MA26賦值:MID的26日簡(jiǎn)單移動(dòng)平均 A26賦值:MA26-MA0 MA27賦值:MID的27日簡(jiǎn)單移動(dòng)平均 A27賦值:MA27-MA0 MA28賦值:MID的28日簡(jiǎn)單移動(dòng)平均 A28賦值:MA28-MA0 MA29賦值:MID的29日簡(jiǎn)單移動(dòng)平均 A29賦值:MA29-MA0 MA30賦值:MID的30日簡(jiǎn)單移動(dòng)平均 A30賦值:MA30-MA0 MA31賦值:MID的31日簡(jiǎn)單移動(dòng)平均 A31賦值:MA31-MA0 MA32賦值:MID的32日簡(jiǎn)單移動(dòng)平均 A32賦值:MA32-MA0 MA33賦值:MID的33日簡(jiǎn)單移動(dòng)平均 A33賦值:MA33-MA0 MA34賦值:MID的34日簡(jiǎn)單移動(dòng)平均 A34賦值:MA34-MA0 MA35賦值:MID的35日簡(jiǎn)單移動(dòng)平均 A35賦值:MA35-MA0 MA36賦值:MID的36日簡(jiǎn)單移動(dòng)平均 A36賦值:MA36-MA0 MA37賦值:MID的37日簡(jiǎn)單移動(dòng)平均 A37賦值:MA37-MA0 MA38賦值:MID的38日簡(jiǎn)單移動(dòng)平均 A38賦值:MA38-MA0 MA39賦值:MID的39日簡(jiǎn)單移動(dòng)平均 A39賦值:MA39-MA0 MA40賦值:MID的40日簡(jiǎn)單移動(dòng)平均 A40賦值:MA40-MA0 輸出LC:(A6+A7+A8+A9+A10+A11+A12+A13+A14+A15+A16+A17+A18+A19+A20)/30,線寬為0,畫(huà)黃色 VAR1賦值:LC VAR2賦值:1日前的LC VAR3賦值:VAR1>VAR2 AND 1日前的LC< 2日前的LC VAR4賦值:VAR1< VAR2 AND 1日前的LC>2日前的LC 輸出均線發(fā)散 : 當(dāng)滿足條件VAR1>VAR2時(shí),在LC和1日前的LC位置之間畫(huà)柱狀線,寬度為2,1不為0則畫(huà)空心柱.,畫(huà)紅色 輸出均線粘合 : 當(dāng)滿足條件VAR1<VAR2時(shí),在LC和1日前的LC位置之間畫(huà)柱狀線,寬度為2,1不為0則畫(huà)空心柱.,畫(huà)綠色 輸出EMA5:VAR1的5日簡(jiǎn)單移動(dòng)平均,COLOR666666 輸出EMA10:VAR1的10日簡(jiǎn)單移動(dòng)平均,COLOR999999 B1賦值:上次MA20>1日前的MA20距今天數(shù) 當(dāng)滿足條件VAR3ANDMA20<1日前的MA20ANDCOUNT(VAR3,B1)=1時(shí),在0.95*1日前的LC位置書(shū)寫(xiě)文字,畫(huà)黃色 當(dāng)滿足條件VAR3ANDMA20<1日前的MA20ANDCOUNT(VAR3,B1)=2時(shí),在0.95*1日前的LC位置書(shū)寫(xiě)文字,畫(huà)黃色 當(dāng)滿足條件VAR3ANDMA20<1日前的MA20ANDCOUNT(VAR3,B1)=3時(shí),在0.95*1日前的LC位置書(shū)寫(xiě)文字,畫(huà)黃色 當(dāng)滿足條件VAR3ANDMA20<1日前的MA20ANDCOUNT(VAR3,B1)=4時(shí),在0.95*1日前的LC位置書(shū)寫(xiě)文字,畫(huà)黃色 當(dāng)滿足條件VAR3ANDMA20<1日前的MA20ANDCOUNT(VAR3,B1)=5時(shí),在0.95*1日前的LC位置書(shū)寫(xiě)文字,畫(huà)黃色 B2賦值:上次MA20<1日前的MA20距今天數(shù) 當(dāng)滿足條件VAR4ANDMA20>1日前的MA20ANDCOUNT(VAR4,B2)=1時(shí),在1.05*1日前的LC位置書(shū)寫(xiě)文字 當(dāng)滿足條件VAR4ANDMA20>1日前的MA20ANDCOUNT(VAR4,B2)=2時(shí),在1.05*1日前的LC位置書(shū)寫(xiě)文字 當(dāng)滿足條件VAR4ANDMA20>1日前的MA20ANDCOUNT(VAR4,B2)=3時(shí),在1.05*1日前的LC位置書(shū)寫(xiě)文字 當(dāng)滿足條件VAR4ANDMA20>1日前的MA20ANDCOUNT(VAR4,B2)=4時(shí),在1.05*1日前的LC位置書(shū)寫(xiě)文字 MACD賦值:(EMA5-EMA10)*2,COLORSTICK 輸出減速上行: 當(dāng)滿足條件VAR1>1日前的VAR1ANDMACD<1日前的MACD時(shí),在VAR1和1日前的VAR1位置之間畫(huà)柱狀線,寬度為2,1不為0則畫(huà)空心柱.,畫(huà)淡紅色 輸出減速下行: 當(dāng)滿足條件VAR1<1日前的VAR1ANDMACD>1日前的MACD時(shí),在VAR1和1日前的VAR1位置之間畫(huà)柱狀線,寬度為2,1不為0則畫(huà)空心柱.,COLORFFFF00 程序源碼 N:=9; MID:=SMA(C,N,1); MA0:=MA(MID,30); MA1:=MA(MID,1); A1:=MA1-MA0; MA2:=MA(MID,2); A2:=MA2-MA0; MA3:=MA(MID,3); A3:=MA3-MA0; MA4:=MA(MID,4); A4:=MA4-MA0; MA5:=MA(MID,5); A5:=MA5-MA0; MA6:=MA(MID,6); A6:=MA6-MA0; MA7:=MA(MID,7); A7:=MA7-MA0; MA8:=MA(MID,8); A8:=MA8-MA0; MA9:=MA(MID,9); A9:=MA9-MA0; MA10:=MA(MID,10); A10:=MA10-MA0; MA11:=MA(MID,11); A11:=MA11-MA0; MA12:=MA(MID,12); A12:=MA12-MA0; MA13:=MA(MID,13); A13:=MA13-MA0; MA14:=MA(MID,14); A14:=MA14-MA0; MA15:=MA(MID,15); A15:=MA15-MA0; MA16:=MA(MID,16); A16:=MA16-MA0; MA17:=MA(MID,17); A17:=MA17-MA0; MA18:=MA(MID,18); A18:=MA18-MA0; MA19:=MA(MID,19); A19:=MA19-MA0; MA20:=MA(MID,20); A20:=MA20-MA0; MA21:=MA(MID,21); A21:=MA21-MA0; MA22:=MA(MID,22); A22:=MA22-MA0; MA23:=MA(MID,23); A23:=MA23-MA0; MA24:=MA(MID,24); A24:=MA24-MA0; MA25:=MA(MID,25); A25:=MA25-MA0; MA26:=MA(MID,26); A26:=MA26-MA0; MA27:=MA(MID,27); A27:=MA27-MA0; MA28:=MA(MID,28); A28:=MA28-MA0; MA29:=MA(MID,29); A29:=MA29-MA0; MA30:=MA(MID,30); A30:=MA30-MA0; MA31:=MA(MID,31); A31:=MA31-MA0; MA32:=MA(MID,32); A32:=MA32-MA0; MA33:=MA(MID,33); A33:=MA33-MA0; MA34:=MA(MID,34); A34:=MA34-MA0; MA35:=MA(MID,35); A35:=MA35-MA0; MA36:=MA(MID,36); A36:=MA36-MA0; MA37:=MA(MID,37); A37:=MA37-MA0; MA38:=MA(MID,38); A38:=MA38-MA0; MA39:=MA(MID,39); A39:=MA39-MA0; MA40:=MA(MID,40); A40:=MA40-MA0; LC:(A6+A7+A8+A9+A10+A11+A12+A13+A14+A15+A16+A17+A18+A19+A20)/30,LINETHICK0,COLORYELLOW; VAR1:=LC; VAR2:=REF(LC,1); VAR3:=VAR1>VAR2 AND REF(LC,1)< REF(LC,2); VAR4:=VAR1< VAR2 AND REF(LC,1)>REF(LC,2); 均線發(fā)散 : STICKLINE(VAR1>VAR2,LC,REF(LC,1),2,1),COLORRED; 均線粘合 : STICKLINE(VAR1< VAR2,LC,REF(LC,1),2,1),COLORGREEN; EMA5:MA(VAR1,5),COLOR666666; EMA10:MA(VAR1,10),COLOR999999; B1:=BARSLAST(MA20>REF(MA20,1)); DRAWTEXT(VAR3 AND MA20< REF(MA20,1) AND COUNT(VAR3,B1)=1,0.95*REF(LC,1),'1'),COLORYELLOW; DRAWTEXT(VAR3 AND MA20< REF(MA20,1) AND COUNT(VAR3,B1)=2,0.95*REF(LC,1),'2'),COLORYELLOW; DRAWTEXT(VAR3 AND MA20< REF(MA20,1) AND COUNT(VAR3,B1)=3,0.95*REF(LC,1),'3'),COLORYELLOW; DRAWTEXT(VAR3 AND MA20< REF(MA20,1) AND COUNT(VAR3,B1)=4,0.95*REF(LC,1),'4'),COLORYELLOW; DRAWTEXT(VAR3 AND MA20< REF(MA20,1) AND COUNT(VAR3,B1)=5,0.95*REF(LC,1),'5'),COLORYELLOW; B2:=BARSLAST(MA20< REF(MA20,1)); DRAWTEXT(VAR4 AND MA20>REF(MA20,1) AND COUNT(VAR4,B2)=1 ,1.05*REF(LC,1),'1'); DRAWTEXT(VAR4 AND MA20>REF(MA20,1) AND COUNT(VAR4,B2)=2 ,1.05*REF(LC,1),'2'); DRAWTEXT(VAR4 AND MA20>REF(MA20,1) AND COUNT(VAR4,B2)=3 ,1.05*REF(LC,1),'3'); DRAWTEXT(VAR4 AND MA20>REF(MA20,1) AND COUNT(VAR4,B2)=4 ,1.05*REF(LC,1),'4'); MACD:=(EMA5-EMA10)*2,COLORSTICK; 減速上行: STICKLINE(VAR1>REF(VAR1,1) AND MACD< REF(MACD,1),VAR1,REF(VAR1,1),2,1),COLORLIRED; 減速下行: STICKLINE(VAR1< REF(VAR1,1) AND MACD>REF(MACD,1),VAR1,REF(VAR1,1),2,1),COLORFFFF00; 注: 館內(nèi)各種公式為學(xué)習(xí)編程而保存,實(shí)戰(zhàn)使用前一定要看其中是否有未來(lái)函數(shù)并自己親自測(cè)試成功率,決不能依據(jù)公式名稱的描述和形容去投資,據(jù)此入市造成投資損失由投資者自己承擔(dān)。 發(fā)文不易,如獲益,歡迎贊賞,贊賞必復(fù)! |
|
|
來(lái)自: 追夢(mèng)文庫(kù) > 《均線交易系統(tǒng)》