|
编程思路破译 N赋值:5 大盘情绪赋值:"880005$收盘价" 输出大盘情绪1:"SZ399001$上涨家数"+"SH000001$上涨家数" 2400,画淡红色,线宽为2 当满足条件是否最后一个周期=1时,在2400位置书写文字,COLORFFFFFF 800,画淡蓝色,线宽为2 当满足条件是否最后一个周期=1时,在800位置书写文字,画淡蓝色 500,COLOR66FFFF,线宽为2 当满足条件是否最后一个周期=1时,在500位置书写文字,COLOR66FFFF A赋值:"880812$成交额(元)"*0.00000001 A1赋值:如果A<25,返回1,否则返回0 A2赋值:如果A>154ANDA<180,返回1,否则返回0 A3赋值:如果A>200AND大盘情绪1<2000,返回1,否则返回0 A4赋值:如果A/A的20日简单移动平均>1.5,返回1,否则返回0 A5赋值:如果A>200AND大盘情绪1>1800,返回1,否则返回0 当满足条件A2时,在2000位置书写文字,画红色 当满足条件A5时,在3000位置书写文字 当满足条件A3时,在1000位置书写文字,画绿色 D赋值:"880770$最高价"*0.1 DD赋值:"880770$最低价"*0.1 DD1赋值:"880770$收盘价"*0.1 DD2赋值:"880770$开盘价"*0.1 输出DD3:"880770$成交量(手)"/1日前的"880770$成交量(手)" 输出DD4:DD2/1日前的DD1 D1赋值:N日内D的最高值 输出D2:D1/DD 输出D5:D1/DD*100 输出D6:DD2/1日前的DD1 D3赋值:DD1上穿DD1的5日简单移动平均 AND DD1上穿DD1的10日简单移动平均 当满足条件D2>1.088时,在2500位置书写文字,画红色 当满足条件D3AND大盘情绪1>1500时,在2000位置书写文字 当满足条件D6<0.98ANDDD1<DD2时,在2000位置书写文字,画绿色 输出D4:A上穿A的20日简单移动平均 A/A的20日简单移动平均 AAAA赋值:"880772$最高价" AA赋值:"880772$收盘价" AA1赋值:"880772$开盘价" AA11赋值:"880772$最低价" AAA11赋值:"880772$成交量(手)" AD1赋值:AA的20日简单移动平均 输出AD2:(AD1-AAAA)<2 AND AA的5日简单移动平均<AD1 AND 大盘情绪<1500 AA3赋值:AA11/1日前的AA<0.97 AND AA<AA1 输出AAA3:AAA11的5日简单移动平均上穿AAA11的20日简单移动平均 输出F:上次AAA3距今天数 输出F1:F>0 AND AAA11/AAA11的20日简单移动平均>1.7 输出F2:AA的3日简单移动平均上穿AA的7日简单移动平均 输出F3:AA的3日简单移动平均<AA的7日简单移动平均 AND AAA11<AAA11的20日简单移动平均 当满足条件AA3时,在1500位置书写文字,画绿色 当满足条件AAA3时,在1500位置书写文字,画红色 当满足条件F1时,在400位置书写文字,画红色 当满足条件AAA3时,在0和100位置之间画柱状线,宽度为3,0不为0则画空心柱.,画红色 当满足条件F1时,在0和300位置之间画柱状线,宽度为3,0不为0则画空心柱.,画红色 当满足条件F3时,在0和-150位置之间画柱状线,宽度为3,0不为0则画空心柱.,画绿色 当满足条件F2时,在0和300位置之间画柱状线,宽度为3,0不为0则画空心柱.,画黄色 程序源码 N:=5; 大盘情绪:="880005$C";{总上涨家数} 大盘情绪1:"SZ399001$ADVANCE"+"SH000001$ADVANCE";{总上涨家数}; 2400,COLORLIRED,LINETHICK2; DRAWTEXT(ISLASTBAR=1,2400,' '),COLORFFFFFF; 800,COLORLIBLUE,LINETHICK2; DRAWTEXT(ISLASTBAR=1,800,' '),COLORLIBLUE; 500,COLOR66FFFF,LINETHICK2; DRAWTEXT(ISLASTBAR=1,500,' '),COLOR66FFFF; A:="880812$AMOUNT"*0.00000001; A1:=IF(A<25,1,0); A2:=IF(A>154 AND A<180,1,0); A3:=IF(A>200 AND 大盘情绪1<2000 ,1,0); A4:=IF(A/MA(A,20)>1.5,1,0); A5:=IF(A>200 AND 大盘情绪1>1800 ,1,0); DRAWTEXT(A2,2000,'弱分歧'),COLORRED; DRAWTEXT(A5,3000,'高潮期'); DRAWTEXT(A3,1000,'强分歧'),COLORGREEN; D:="880770$H"*0.1; DD:="880770$L"*0.1; DD1:="880770$C"*0.1; DD2:="880770$O"*0.1; DD3:"880770$V"/REF("880770$V",1); DD4:DD2/REF(DD1,1); D1:=HHV(D,N); D2:D1/DD; D5:D1/DD*100; D6:DD2/REF(DD1,1); D3:=crOSS(DD1,MA(DD1,5)) AND CROSS(DD1,MA(DD1,10)); DRAWTEXT(D2>1.088,2500,'接力'),COLORRED; DRAWTEXT(D3 AND 大盘情绪1>1500,2000,'强共振点'); DRAWTEXT(D6<0.98 AND DD1<DD2,2000,'衰退'),COLORGREEN; D4:CROSS(A,MA(A,20)); A/MA(A,20); AAAA:="880772$H"; AA:="880772$C"; AA1:="880772$O"; AA11:="880772$L"; AAA11:="880772$V"; AD1:=MA(AA,20); AD2:(AD1-AAAA)<2 AND MA(AA,5)<AD1 AND 大盘情绪<1500; AA3:=AA11/REF(AA,1)<0.97 AND AA<AA1; AAA3:CROSS(MA(AAA11,5),MA(AAA11,20)); F:BArslAST(AAA3); F1:F>0 AND AAA11/MA(AAA11,20)>1.7; F2:CROSS(MA(AA,3),MA(AA,7)); F3:MA(AA,3)<MA(AA,7) AND AAA11<MA(AAA11,20); DRAWTEXT(AA3,1500,'切换'),COLORGREEN; DRAWTEXT(AAA3,1500,'主胜预警'),COLORRED; DRAWTEXT(F1,400,'主升阶段'),COLORRED; {DRAWTEXT(AD2,3000,'爆头'),COLORRED;} STICKLINE(AAA3,0,100,3,0),COLORRED; STICKLINE(F1,0,300,3,0),COLORRED; STICKLINE(F3,0,-150,3,0),COLORGREEN; STICKLINE(F2,0,300,3,0),COLORYELLOW; 注： 馆内各种公式为学习编程而保存，实战使用前一定要看其中是否有未来函数并自己亲自测试成功率，决不能依据公式名称的描述和形容去投资，据此入市造成投资损失由投资者自己承担。 发文不易，如获益，欢迎赞赏，赞赏必复！ |
|
|
