波浪与波神 主图指标通达信指标公式源码.docx
- 文档编号:27061002
- 上传时间:2023-06-26
- 格式:DOCX
- 页数:19
- 大小:490.43KB
波浪与波神 主图指标通达信指标公式源码.docx
《波浪与波神 主图指标通达信指标公式源码.docx》由会员分享,可在线阅读,更多相关《波浪与波神 主图指标通达信指标公式源码.docx(19页珍藏版)》请在冰豆网上搜索。
波浪与波神主图指标通达信指标公式源码
波浪与波神主图指标
源码:
波浪与波神
INPUT:
最近天(20,1,360);
当前月:
=FRACPART(ROUND(当前日期/100)/100)*100;
月:
=MONTH;日:
=DAY;
VERTLINE(月=1AND(日=25)),COLORFFFFFF,LINEDASHDOT;
VERTLINE(月=3AND(日=20)),COLORFFFFFF,LINEDASHDOT;
VERTLINE(月=5AND(日=12)),COLORFFFFFF,LINEDASHDOT;
VERTLINE(月=6AND(日=14)),COLORFFFFFF,LINEDASHDOT;
VERTLINE(月=7AND(日=19)),COLORFFFFFF,LINEDASHDOT;
VERTLINE(月=8AND(日=6)),COLORFFFFFF,LINEDASHDOT;
VERTLINE(月=9AND(日=18)),COLORFFFFFF,LINEDASHDOT;
VERTLINE(月=10AND(日=31)),COLORFFFFFF,LINEDASHDOT;
VERTLINE(月=11AND(日=28)),COLORFFFFFF,LINEDASHDOT;
VERTLINE(月=12AND(日=31)),COLORFFFFFF,LINEDASHDOT;
VERTLINE(月=1AND(日=6OR日=15OR日=21)),COLORAAAAAA,LINEDASHDOT;
VERTLINE(月=2AND(日=6OR日=15OR日=21)),COLORAAAAAA,LINEDASHDOT;
VERTLINE(月=3AND(日=6OR日=15OR日=21)),COLORAAAAAA,LINEDASHDOT;
VERTLINE(月=4AND(日=6OR日=15OR日=21)),COLORAAAAAA,LINEDASHDOT;
VERTLINE(月=5AND(日=6OR日=15OR日=21)),COLORAAAAAA,LINEDASHDOT;
VERTLINE(月=6AND(日=6OR日=21)),COLORAAAAAA,LINEDASHDOT;
VERTLINE(月=7AND(日=8OR日=15OR日=23)),COLORAAAAAA,LINEDASHDOT;
VERTLINE(月=8AND(日=8OR日=15OR日=23)),COLORAAAAAA,LINEDASHDOT;
VERTLINE(月=9AND(日=8OR日=15OR日=23)),COLORAAAAAA,LINEDASHDOT;
VERTLINE(月=10AND(日=8OR日=15OR日=23)),COLORAAAAAA,LINEDASHDOT;
VERTLINE(月=11AND(日=8OR日=15OR日=23)),COLORAAAAAA,LINEDASHDOT;
VERTLINE(月=12AND(日=8OR日=15OR日=23)),COLORAAAAAA,LINEDASHDOT;
N:
=if(sysparam
(1)=datacount,最近天,datacount-sysparam
(1));
HH:
=HHV(HIGH,N);
LL:
=LLV(LOW,N);
VN:
=N;
{LAST1:
=DATACOUNT;}
IFVN>DATACOUNTTHEN
VN:
=DATACOUNT+1;
FORI=DATACOUNTDOWNTODATACOUNT-VN+1DOBEGIN
HH[I]:
=HH[DATACOUNT];
LL[I]:
=LL[DATACOUNT];
END;
TMP:
=SETLBOUND(hh,DATACOUNT-VN+1);
TMP:
=SETLBOUND(ll,DATACOUNT-VN+1);
阶段高:
HH,LINETHICK2,color0000FF;阶段低:
LL,LINETHICK2,color00FF00;
中线:
(HH+LL)/2,linethick0;
KKH:
=BARSLAST(H=HH);
KKL:
=BARSLAST(L=LL);
N低日:
=STRTONUM(NUMTOSTR(REF(DATE,KKL),0)),LINETHICK;
N高日:
=STRTONUM(NUMTOSTR(REF(DATE,KKH),0)),LINETHICK;
多空:
IF(N低日>N高日,2,1),LINETHICK0;
多空天:
IF(N低日 DATE1: =IF(多空=1,N低日,N高日);{} hh0: =ref(h,BARSLAST(DATE1=DATE)); ll0: =ref(l,BARSLAST(DATE1=DATE)); H1: =STRTONUM(NUMTOSTR(Hh0,3)),POINTDOT; L1: =STRTONUM(NUMTOSTR(Ll0,3)),POINTDOT; PARTLINE(1,H1),,POINTDOT,linethick0; PARTLINE(1,L1),,POINTDOT,linethick0; LL: =H1-L1; VERTLINE(DATE=DATE1),COLORFFAAAA,,LINETHICK2; DRAWTEXT(DATE=DATE1,SYSPARAM(4)*0.95,'起\n\n始\n\n线'),COLORFFFFFF; 起始至今天: BARSLAST(DATE1=DATE),COLORFFFF00,LINETHICK0; 涨幅: (C-REF(C,起始至今天))/REF(C,起始至今天)*100,COLORFFDDDD,LINETHICK0; IF多空=1THENBEGIN {看多} 开门线: PARTLINE(DATE>=N低日,LL*1.50801+L1),LINETHICK1,COLOREE99FF;; PARTLINE(DATE>=N低日,LL*2.00001+L1),COLOR9999FF,LINEDOT; 多2线: PARTLINE(DATE>=N低日,LL*2.40001+L1),COLORFFFF99,linethick1; PARTLINE(DATE>=N低日,LL*3.05001+L1),COLOR99FF99,LINEDOT; PARTLINE(DATE>=N低日,LL*3.75001+L1),COLORFF9999,LINEDOT; 多5线: PARTLINE(DATE>=N低日,LL*4.15001+L1),COLORMAGENTA,linethick2,LINEDOT; PARTLINE(DATE>=N低日,LL*4.80001+L1),COLORRED,LINEDOT; 多7线: PARTLINE(DATE>=N低日,LL*5.50001+L1),COLORCYAN,linethick2; PARTLINE(DATE>=N低日,LL*6.10001+L1),COLORGREEN,LINEDOT; PARTLINE(DATE>=N低日,LL*6.90001+L1),LINETHICK1,COLORRED; DRAWTEXT(SYSPARAM(3)=BARPOS,L1+LL*1.50801+0.002,NUMTOSTR(L1+LL*1.50801,2)),COLORAAAAAA,ALIGN2; DRAWTEXT(SYSPARAM(3)=BARPOS,L1+LL*2.00001+0.002,NUMTOSTR(L1+LL*2.00001,2)),COLORAAAAAA,ALIGN2; DRAWTEXT(SYSPARAM(3)=BARPOS,L1+LL*2.40001+0.002,'NO.2'+NUMTOSTR(L1+LL*2.40001,2)),COLORAAAAAA,ALIGN2; DRAWTEXT(SYSPARAM(3)=BARPOS,L1+LL*3.05001+0.002,NUMTOSTR(L1+LL*3.05001,2)),COLORAAAAAA,ALIGN2; DRAWTEXT(SYSPARAM(3)=BARPOS,L1+LL*3.75001+0.002,NUMTOSTR(L1+LL*3.75001,2)),COLORAAAAAA,ALIGN2; DRAWTEXT(SYSPARAM(3)=BARPOS,L1+LL*4.15001+0.002,'NO.5'+NUMTOSTR(L1+LL*4.15001,2)),COLORAAAAAA,ALIGN2; DRAWTEXT(SYSPARAM(3)=BARPOS,L1+LL*4.80001+0.002,NUMTOSTR(L1+LL*4.80001,2)),COLORAAAAAA,ALIGN2; DRAWTEXT(SYSPARAM(3)=BARPOS,L1+LL*5.50001+0.002,'NO.7'+NUMTOSTR(L1+LL*5.50001,2)),COLORAAAAAA,ALIGN2; DRAWTEXT(SYSPARAM(3)=BARPOS,L1+LL*6.10001+0.002,NUMTOSTR(L1+LL*6.10001,2)),COLORAAAAAA,ALIGN2; DRAWTEXT(SYSPARAM(3)=BARPOS,L1+LL*6.90001+0.002,NUMTOSTR(L1+LL*6.90001,2)),COLORAAAAAA,ALIGN2; DRAWTEXT(DATE=DATE1,LL*1.50801+L1+0.002,'多开门'),colorred; DRAWTEXT(DATE=DATE1,LL*6.90001+L1+0.002,'多关门'),colorred; END; ELSEBEGIN {看空} 空开门线: PARTLINE(DATE>=N高日,H1-LL*1.50801),LINETHICK1,COLOREE99FF; PARTLINE(DATE>=N高日,H1-LL*2.00001),COLOR9999FF,LINEDOT; 空2线: PARTLINE(DATE>=N高日,H1-LL*2.40001),COLORFFFF99; PARTLINE(DATE>=N高日,H1-LL*3.05001),COLOR99FF99,LINEDOT; PARTLINE(DATE>=N高日,H1-LL*3.75001),COLORFF9999,LINEDOT; 空5线: PARTLINE(DATE>=N高日,H1-LL*4.15001),COLORMAGENTA; PARTLINE(DATE>=N高日,H1-LL*4.80001),COLORRED,LINEDOT; 空7线: PARTLINE(DATE>=N高日,H1-LL*5.50001),COLORCYAN; PARTLINE(DATE>=N高日,H1-LL*6.10001),COLORGREEN,LINEDOT; 空关门线: PARTLINE(DATE>=N高日,H1-LL*6.90001),LINETHICK1,COLORRED; DRAWTEXT(DATE=DATE1,H1-LL*1.50801+0.002,'空开门'),color3333FF; DRAWTEXT(DATE=DATE1,H1-LL*6.90001+0.002,'空关门'),color3333FF; DRAWTEXT(SYSPARAM(3)=BARPOS,H1-LL*1.50801+0.002,NUMTOSTR(H1-LL*1.50801,2)),COLORAAAAAA,ALIGN2; DRAWTEXT(SYSPARAM(3)=BARPOS,H1-LL*2.00001+0.002,NUMTOSTR(H1-LL*2.00001,2)),COLORAAAAAA,ALIGN2; DRAWTEXT(SYSPARAM(3)=BARPOS,H1-LL*2.40001+0.002,'NO.2'+NUMTOSTR(H1-LL*2.40001,2)),COLORAAAAAA,ALIGN2; DRAWTEXT(SYSPARAM(3)=BARPOS,H1-LL*3.05001+0.002,NUMTOSTR(H1-LL*3.05001,2)),COLORAAAAAA,ALIGN2; DRAWTEXT(SYSPARAM(3)=BARPOS,H1-LL*3.75001+0.002,NUMTOSTR(H1-LL*3.75001,2)),COLORAAAAAA,ALIGN2; DRAWTEXT(SYSPARAM(3)=BARPOS,H1-LL*4.15001+0.002,'NO.5'+NUMTOSTR(H1-LL*4.15001,2)),COLORAAAAAA,ALIGN2; DRAWTEXT(SYSPARAM(3)=BARPOS,H1-LL*4.80001+0.002,NUMTOSTR(H1-LL*4.80001,2)),COLORAAAAAA,ALIGN2; DRAWTEXT(SYSPARAM(3)=BARPOS,H1-LL*5.50001+0.002,'NO.7'+NUMTOSTR(H1-LL*5.50001,2)),COLORAAAAAA,ALIGN2; DRAWTEXT(SYSPARAM(3)=BARPOS,H1-LL*6.10001+0.002,NUMTOSTR(H1-LL*6.10001,2)),COLORAAAAAA,ALIGN2; DRAWTEXT(SYSPARAM(3)=BARPOS,H1-LL*6.90001+0.002,NUMTOSTR(H1-LL*6.90001,2)),COLORAAAAAA,ALIGN2; END; 高年: =ref(YEAR,BARSLAST(date=N高日)); 高月: =ref(MONTH,BARSLAST(date=N高日)); 高日: =ref(DAY,BARSLAST(date=N高日)); 低年: =ref(YEAR,BARSLAST(date=N低日)); 低月: =ref(MONTH,BARSLAST(date=N低日)); 低日: =ref(DAY,BARSLAST(date=N低日)); DRAWTEXT(SYSPARAM (2)=BARPOS,H1,'最近'+NUMTOSTR(最近天,0)+'天最高价日期: '+NUMTOSTR(高年,0)+'年'+NUMTOSTR(高月,0)+'月'+NUMTOSTR(高日,0)+'日'+'\n\n' +'最近'+NUMTOSTR(最近天,0)+'天最低价日期: '+NUMTOSTR(低年,0)+'年'+NUMTOSTR(低月,0)+'月'+NUMTOSTR(低日,0)+'日'),COLORFFAAAA,ALIGN4; DRAWTEXT(SYSPARAM (2)=BARPOSandNUMTOSTR(当前月,0)='1',c,NUMTOSTR(当前月,0)+'月转折日: 6、15、21、*25\n\n\n\n'),COLOR00FFFF,ALIGN5; DRAWTEXT(SYSPARAM (2)=BARPOSandNUMTOSTR(当前月,0)='2',c,NUMTOSTR(当前月,0)+'月转折日: 6、15、21\n\n\n\n'),COLOR00FFFF,ALIGN5; DRAWTEXT(SYSPARAM (2)=BARPOSandNUMTOSTR(当前月,0)='3',c,NUMTOSTR(当前月,0)+'月转折日: 6、15、*20、21\n\n\n\n'),COLOR00FFFF,ALIGN5; DRAWTEXT(SYSPARAM (2)=BARPOSandNUMTOSTR(当前月,0)='4',c,NUMTOSTR(当前月,0)+'月转折日: 6、15、21\n\n\n\n'),COLOR00FFFF,ALIGN5; DRAWTEXT(SYSPARAM (2)=BARPOSandNUMTOSTR(当前月,0)='5',c,NUMTOSTR(当前月,0)+'月转折日: 6、*12、15、21\n\n\n\n'),COLOR00FFFF,ALIGN5; DRAWTEXT(SYSPARAM (2)=BARPOSandNUMTOSTR(当前月,0)='6',c,NUMTOSTR(当前月,0)+'月转折日: 6、*14、21\n\n\n\n'),COLOR00FFFF,ALIGN5; DRAWTEXT(SYSPARAM (2)=BARPOSandNUMTOSTR(当前月,0)='7',c,NUMTOSTR(当前月,0)+'月转折日: 8、15、*19、23\n\n\n\n'),COLOR00FFFF,ALIGN5; DRAWTEXT(SYSPARAM (2)=BARPOSandNUMTOSTR(当前月,0)='8',c,NUMTOSTR(当前月,0)+'月转折日: *6、8、15、23\n\n\n\n'),COLOR00FFFF,ALIGN5; DRAWTEXT(SYSPARAM (2)=BARPOSandNUMTOSTR(当前月,0)='9',c,NUMTOSTR(当前月,0)+'月转折日: 8、15、*18、23\n\n\n\n'),COLOR00FFFF,ALIGN5; DRAWTEXT(SYSPARAM (2)=BARPOSandNUMTOSTR(当前月,0)='10',c,NUMTOSTR(当前月,0)+'月转折日: 8、15、23、*31\n\n\n\n'),COLOR00FFFF,ALIGN5; DRAWTEXT(SYSPARAM (2)=BARPOSandNUMTOSTR(当前月,0)='11',c,NUMTOSTR(当前月,0)+'月转折日: 8、15、23、*28\n\n\n\n'),COLOR00FFFF,ALIGN5; DRAWTEXT(SYSPARAM (2)=BARPOSandNUMTOSTR(当前月,0)='12',c,NUMTOSTR(当前月,0)+'月转折日: 8、15、23、*31\n\n\n\n'),COLOR00FFFF,ALIGN5; {-----------------------------立体K线--------------------------------------} {-------------------------------------------------------------------------} pl5: =之字转向(3,5); en1: =之字转向(3,5)>向前引用(之字转向(3,5),1)and向前引用(之字转向(3,5),1)<=向前引用(之字转向(3,5),2)and向前引用(之字转向(3,5),2)<=向前引用(之字转向(3,5),3); ex1: =之字转向(3,5)<向前引用(之字转向(3,5),1)and向前引用(之字转向(3,5),1)>=向前引用(之字转向(3,5),2)and向前引用(之字转向(3,5),2)>=向前引用(之字转向(3,5),3); pl10: =之字转向(3,13); en2: =之字转向(3,10)>向前引用(之字转向(3,10),1)and向前引用(之字转向(3,10),1)<=向前引用(之字转向(3,10),2)and向前引用(之字转向(3,10),2)<=向前引用(之字转向(3,10),3); ex2: =之字转向(3,10)<向前引用(之字转向(3,10),1)and向前引用(之字转向(3,10),1)>=向前引用(之字转向(3,10),2)and向前引用(之字转向(3,10),2)>=向前引用(之字转向(3,10),3); pl20: =之字转向(3,26); en3: =之字转向(3,20)>向前引用(之字转向(3,20),1)and向前引用(之字转向(3,20),1)<=向前引用(之字转向(3,20),2)and向前引用(之字转向(3,20),2)<=向前引用(之字转向(3,20),3); ex3: =之字转向(3,20)<向前引用(之字转向(3,20),1)and向前引用(之字转向(3,20),1)>=向前引用(之字转向(3,20),2)and向前引用(之字转向(3,20),2)>=向前引用(之字转向(3,20),3); pl40: =之字转向(3,55); 走强1: =上一次条件成立位置(pl5<向前引用(pl5,1)); 走弱1: =上一次条件成立位置(pl5>向前引用(pl5,1)); 走强2: =上一次条件成立位置(pl10<向前引用(pl10,1)); 走弱2: =上一次条件成立位置(pl10>向前引用(pl10,1)); 走强3: =上一次条件成立位置(pl20<向前引用(pl20,1)); 走弱3: =上一次条件成立位置(pl20>向前引用(pl20,1)); ztjz5: =条件函数(pl10>向前引用(pl10,1),统计总数(en1,走强2),0); ztjd5: =条件函数(pl10>向前引用(pl10,1),统计总数(ex1,走强2),0); dtjz5: =条件函数(pl10<向前引用(pl10,1),统计总数(en1,走弱2),0); dtjd5: =条件函数(pl10<向前引用(pl10,1),统计总数(ex1,走弱2),0); ztjz10: =条件函数(pl20>向前引用(pl20,1),统计总数(en2,走强3),0); ztjd10: =条件函数(pl20>向前引用(pl20,1),统计总数(ex2,走强3),0); dtjz10: =条件函数(pl20<向前引用(pl20,1),统计总数(en2,走弱3),0); dtjd10: =条件函数(pl20<向前引用(pl20,1),统计总数(ex2,走弱3),0); 显示文字(en1anddtjz5=1,最低价*0.98,'(Ⅰ)'),colorffff00; 显示文字(ex1anddtjd5=2,最高价*1.02,'(Ⅱ)'),colorffff00; 显示文字(en2andztjz5=1,最低价*0.98,'(Ⅲ)'),colorffff00; 显示文字(ex1andpl10>向前引用(pl10,1)andztjd5=1,最高价*1.02,'⑴'),colorff; 显示文字(en1andpl10>向前引用(pl10,1)andztjz5=2,最低价*0.98,'⑵'),colorff; 显示文字(ex1andpl10>向前引用(pl10,1)andztjz5=2,最高价*1.02,'⑶'),colorff; 显示文字(en1andpl10>向前引用(pl10,1)andztjz5=3,最低价*0.98,'⑷'),colorff; 显示文字(ex2andpl20>向前引用(pl20,1)andztjd10=1,最高价*1.02,'⑸
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 波浪与波神 主图指标通达信指标公式源码 波浪 指标 通达信 公式 源码
![提示](https://static.bdocx.com/images/bang_tan.gif)