您现在的位置:程序化交易>> 股票公式>> 大智慧>> 大智慧公式>>正文内容

个股自适应板块顺势操作公式源码[大智慧公式]

相关标签:大智慧分时指标源码 、 大智慧ddx指标源码 、 大智慧bs指标源码 、 大智慧公式源码附图 、 大智慧股票公式源码 、 大智慧跨周期指标源码 、 大智慧操盘线指标源码 、 黑马指标源码大智慧版 、 大智慧主图公式源码 、 macd背离指标公式源码 、 多空对比指标公式源码 、 波动率指标源码 、 乾坤决策眼指标源码 、 大智慧指标公式大全 、 大智慧地量指标公式 、

 

{顺势操作(主图)}

 

 

原理解析:


 

 

源码:

 

input: n(5,0,999,1),n1(10,0,999,1),n2(20,0,999,1),n3(30,0,999,1);A74:=MA(CLOSE,20);A75:=(CLOSE > MA(CLOSE,5));A76:=(MA(CLOSE,5) > MA(CLOSE,10));A77:=(CLOSE > MA(CLOSE,10));A78:=(MA(CLOSE,5) > MA(CLOSE,20));A79:=(CLOSE > MA(CLOSE,20));A710:=REF(A74,1);A711:=(A74 > A710);AVX:=(((((IF(A75,10,(0 - 10)) + IF(A76,10,(0 - 10))) + IF(A77,10,(0 - 10))) + IF(A78,10,(0 - 10))) + IF(A79,10,(0 - 10))) + IF(A711,10,(0 - 10)));DSLX:=(CLOSE / INDEXC);DSLX1:=MA(DSLX,5);DSLX2:=MA(DSLX,10);V1:=MA(VOL,5);V2:=MA(VOL,10);T := BARSLAST(DISPSTATUS=1)+1;T := BARSLAST(DISPSTATUS=1)+1;HHg := HHV(H, T);ddg := LLV(L, T);{Hk := LL-HH; G12 := LL-HK*1.55; }IF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THENIF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 < V2)) AND (DSLX >= DSLX1)) THENIF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 > V2)) AND (DSLX < DSLX1)) THENIF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 <= V2)) AND (DSLX < DSLX1)) THENIF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THENIF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX >= DSLX1)) THENIF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX < DSLX1)) THENIF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX < DSLX1)) THENIF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THENIF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) THENIF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) THENIF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) THENIF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THENIF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) THENIF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) THENIF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) THENIF BARSTATUS=2 and c>200 and (CROSS(AVX,1) AND (V1 >= V2)) THENIF BARSTATUS=2 and c>200 and (CROSS(AVX,1) AND (V1 >= V2)) THENIF BARSTATUS=2 and c>200 and (CROSS(AVX,1) AND (V1 < V2)) THENIF BARSTATUS=2 and c>200 and (CROSS(AVX,1) AND (V1 < V2)) THENIF BARSTATUS=2 and c>200 and (CROSS(1,AVX) AND (V1 >= V2)) THENIF BARSTATUS=2 and c>200 and (CROSS(1,AVX) AND (V1 < V2)) THENIF BARSTATUS=2 and c>200 and (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) THENIF BARSTATUS=2 and c>200 and (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) THENIF BARSTATUS=2 and c>200 and (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) THENIF BARSTATUS=2 and c>200 and (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) THEN{所属板块}var100:='所属板块:';if inblock('电力')=1 then var100:=var100+' 电力';if inblock('电脑')=1 then var100:=var100+' 电脑';if inblock('电器')=1 then var100:=var100+' 电器';if inblock('电子信息')=1 then var100:=var100+' 电子信息';if inblock('房地产')=1 then var100:=var100+' 房地产';if inblock('纺织服装')=1 then var100:=var100+' 纺织服装';if inblock('钢铁')=1 then var100:=var100+' 钢铁';if inblock('工程建筑')=1 then var100:=var100+' 工程建筑';if inblock('供水供气')=1 then var100:=var100+' 供水供气';if inblock('化工')=1 then var100:=var100+' 化工';if inblock('化纤')=1 then var100:=var100+' 化纤';if inblock('机械')=1 then var100:=var100+' 机械';if inblock('建材')=1 then var100:=var100+' 建材';if inblock('交通工具')=1 then var100:=var100+' 交通工具';if inblock('交通设施')=1 then var100:=var100+' 交通设施';if inblock('教育传媒')=1 then var100:=var100+' 教育传媒';if inblock('金融')=1 then var100:=var100+' 金融';if inblock('旅游酒店')=1 then var100:=var100+' 旅游酒店';if inblock('煤炭石油')=1 then var100:=var100+' 煤炭石油';if inblock('酿酒食品')=1 then var100:=var100+' 酿酒食品';if inblock('农林牧渔')=1 then var100:=var100+' 农林牧渔';if inblock('其他行业')=1 then var100:=var100+' 其他行业';if inblock('汽车')=1 then var100:=var100+' 汽车';if inblock('汽配')=1 then var100:=var100+' 汽配';if inblock('商业连锁')=1 then var100:=var100+' 商业连锁';if inblock('石化')=1 then var100:=var100+' 石化';if inblock('通信')=1 then var100:=var100+' 通信';if inblock('外贸')=1 then var100:=var100+' 外贸';if inblock('医药')=1 then var100:=var100+' 医药';if inblock('仪电仪表')=1 then var100:=var100+' 仪电仪表';if inblock('有色金属')=1 then var100:=var100+' 有色金属';if inblock('运输物流')=1 then var100:=var100+' 运输物流';if inblock('造纸印刷')=1 then var100:=var100+' 造纸印刷';if inblock('安徽')=1 then var100:=var100+' 安徽';if inblock('北京')=1 then var100:=var100+' 北京';if inblock('福建')=1 then var100:=var100+' 福建';if inblock('甘肃')=1 then var100:=var100+' 甘肃';if inblock('广东')=1 then var100:=var100+' 广东';if inblock('广西')=1 then var100:=var100+' 广西';if inblock('贵州')=1 then var100:=var100+' 贵州';if inblock('海南')=1 then var100:=var100+' 海南';if inblock('河北')=1 then var100:=var100+' 河北';if inblock('河南')=1 then var100:=var100+' 河南';if inblock('黑龙江')=1 then var100:=var100+' 黑龙江';if inblock('湖北')=1 then var100:=var100+' 湖北';if inblock('湖南')=1 then var100:=var100+' 湖南';if inblock('吉林')=1 then var100:=var100+' 吉林';if inblock('江苏')=1 then var100:=var100+' 江苏';if inblock('江西')=1 then var100:=var100+' 江西';if inblock('辽宁')=1 then var100:=var100+' 辽宁';if inblock('内蒙古')=1 then var100:=var100+' 内蒙古';if inblock('宁夏')=1 then var100:=var100+' 宁夏';if inblock('青海')=1 then var100:=var100+' 青海';if inblock('山东')=1 then var100:=var100+' 山东';if inblock('山西')=1 then var100:=var100+' 山西';if inblock('陕西')=1 then var100:=var100+' 陕西';if inblock('上海')=1 then var100:=var100+' 上海';if inblock('深圳')=1 then var100:=var100+' 深圳';if inblock('四川')=1 then var100:=var100+' 四川';if inblock('天津')=1 then var100:=var100+' 天津';if inblock('***')=1 then var100:=var100+' ***';if inblock('新疆')=1 then var100:=var100+' 新疆';if inblock('云南')=1 then var100:=var100+' 云南';if inblock('浙江')=1 then var100:=var100+' 浙江';if inblock('重庆')=1 then var100:=var100+' 重庆';if inblock('3G')=1 then var100:=var100+' 3G';if inblock('H股')=1 then var100:=var100+' H股';if inblock('QFII持股')=1 then var100:=var100+' QFII持股';if inblock('ST')=1 then var100:=var100+' ST';if inblock('奥运')=1 then var100:=var100+' 奥运';if inblock('创投')=1 then var100:=var100+' 创投';if inblock('次新股')=1 then var100:=var100+' 次新股';if inblock('大盘')=1 then var100:=var100+' 大盘';if inblock('股权改革')=1 then var100:=var100+' 股权改革';if inblock('股权投资')=1 then var100:=var100+' 股权投资';DD:=FINANCE2(35);SS:=FINANCE2(37);GG:=FINANCE2(3);TH:=DYNAINFO(39);{量能饱和}SAT:=IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100);{趋势}AA10:MA(CLOSE,8),color0000FF;AA12:MA(CLOSE,12),color0000FF;BB10:=((ATAN((AA10 - REF(AA10,1))) * 3.1416) * 10);BB12:=((ATAN((AA12 - REF(AA12,1))) * 3.1416) * 10);MA13:=MA(CLOSE,13);FILLRGN(AA10,AA12,(((AA12 <= AA10) AND (BB12 >= 1)) AND (BB10 >= 1))),Color0098FF;FILLRGN(AA10,AA12,(((AA12 >= AA10) AND (BB10 <= 1)) AND (BB10 <= 1))),color00FF00;{45度异动}x1:=(C+L+H)/3;bb13:=atan(ema(x1,13)-ref(ema(x1,13),1))*3.1416*10;ema8:=ema(c,8);{压力支撑}压力:MA(REF(HHV(C,30),1),2),Color9D00FF;支撑:MA(REF(LLV(C,30),1),2),ColorABdd46;{老鼠仓}AA1:=AMOUNT/V;BB1:=L<AA1*0.9;CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;DD1:=L<MA(C,5)*0.921;EE1:=V<MA(V,5)*1.5;FF1:=BB1 AND CC1 AND DD1 AND EE1;{黑马线}A51:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1);黑马线:=EMA(A51,5);A54:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100;趋势线:=(MA(3*SMA(A54,6,1)-2*SMA(SMA(A54,5,1),5,1),2));{顶底背离}LC:=REF(CLOSE,1);RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);FF:=EMA(CLOSE,3);MA15:=EMA(CLOSE,21);{短线}VAR2:=LLV(LOW,27);VAR3:=HHV(HIGH,34);VAR4:=EMA((CLOSE-Var2)/(Var3-Var2)*4,4)*25;注意买:=IF((Var4<10),80,100);RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;K:=SMA(RSV,3,1);D:=SMA(K,3,1);J:=3*K-2*D;超跌:=IF(J<0,10,0);BDDD:=LLV(J,2)=LLV(J,8);买入:=IF(CROSS(J,REF(J+0.01,1)) AND BDDD AND J<20,30,0);MTM:=C-REF(C,1);DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);买:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0);{多头买入} ENTERLONG:IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0),COLORYELLOW;

 

公式导入教程: 【通达信公式源码导入方法教程】 【同花顺公式源码导入方法教程】 【大智慧新一代公式源码导入方法教程

 

 

有思路,想编写各种指标公式,程序化交易模型,选股公式,预警公式的朋友

可联系技术人员 QQ: 511411198  有需要帮忙请点击这里留言!!!进行 有偿 编写!不贵!点击查看价格!

 


【字体: 】【打印文章】【查看评论

相关文章

    没有相关内容