caxa线切割安装方法:通达信日周移动平均线同时显示——股票实战技术指标公式研究有缘看本博定多活30年——东方财富...

来源:百度文库 编辑:偶看新闻 时间:2024/05/03 10:45:09
通达信日周移动平均线同时显示(2011-02-06 20:54:33)分类:原创与网上精华

 

ZRR:=(YEAR-1992)*365+INTPART((YEAR-1989)/4)+IF(MONTH<=2,DAY+(MONTH-1)*31,DAY+
INTPART(13*(MONTH+1)/5)-7+(MONTH-1)*28+IF(INTPART(YEAR/4)=YEAR/4,1,0)),NODRAW;
T:=BARSLAST(ZRR-REF(ZRR,1)>WEEKDAY-REF(WEEKDAY,1))+1,NODRAW;
T1:=REF(T,T)+T,NODRAW;
T2:=REF(T,T1)+T1,NODRAW;
T3:=REF(T,T2)+T2,NODRAW;
T4:=REF(T,T3)+T3,NODRAW;
T5:=REF(T,T4)+T4,NODRAW;
T6:=REF(T,T5)+T5,NODRAW;
T7:=REF(T,T6)+T6,NODRAW;
T8:=REF(T,T7)+T7,NODRAW;
T9:=REF(T,T8)+T8,NODRAW;
T10:=REF(T,T9)+T9,NODRAW;
T11:=REF(T,T10)+T10,NODRAW;
T12:=REF(T,T11)+T11,NODRAW;
T13:=REF(T,T12)+T12,NODRAW;
日5:ma(close,5);
周5:(REF(CLOSE,T)+REF(CLOSE,T1)+REF(CLOSE,T2)+REF(CLOSE,T3)+CLOSE)/5;
周13:(REF(CLOSE,T)+REF(CLOSE,T1)+REF(CLOSE,T2)+REF(CLOSE,T3)+REF(CLOSE,T4)+
REF(CLOSE,T5)+REF(CLOSE,T6)+REF(CLOSE,T7)+REF(CLOSE,T8)+REF(CLOSE,T9)
+REF(CLOSE,T10)+REF(CLOSE,T11)+CLOSE)/13,LINETHICK2;

副图显示周k线.

副图显示周k线,可以在观察日线时,同时知晓股票前面周高低.涨跌了多少周?心中多杆称.不办湖涂事!
A图周k线看周五,前面是每日变化进程。
B图周k线省略入进程,清楚一点,意义一样,各取所需吧!向大家问好!


副图显示周线A

A:=WEEKDAY-REF(WEEKDAY,1);
B:=DATETODAY(DATE)-REF(DATETODAY(DATE),1);
周天数:=1+BARSLAST(BARSCOUNT(C)=0 OR A!=B),NODRAW;
本周已交易天数:周天数,NODRAW;
{上面援用日线显示周线的作者,向你问候.向理想致敬}
开盘:=周天数=1;
周距:=周天数<5,周天数>1;
RR:=BACKSET(周天数周未:=( RR=1 AND 周天数!=1) OR WEEKDAY=5 ,NODRAW;
周开盘:IF(开盘*O,开盘*O,REF(开盘*O,周天数=2)*周距),NODRAW;
周最高:HHV(H,周天数),COLORYELLOW,NODRAW;
周最低:LLV(L,周天数),COLOR00FF00,NODRAW;
收盘价:C,NODRAW;
DRAWKLINE(周最高,周开盘,周最低,收盘价);
STICKLINE(周未 AND 周开盘>C,周开盘,C,2,0),COLORGREEN;
STICKLINE(周未 AND 周开盘STICKLINE(周未 AND 周开盘>C,周最高,周最低,0,0),COLORGREEN;
STICKLINE(周未 AND 周开盘
============================================================
副图显示周线B


A:=WEEKDAY-REF(WEEKDAY,1);
B:=DATETODAY(DATE)-REF(DATETODAY(DATE),1);
周天数:=1+BARSLAST(BARSCOUNT(C)=0 OR A!=B),NODRAW;
本周已交易天数:周天数,NODRAW;
{上面援用日线显示周线的作者,向你问候.向理想致敬}
开盘:=周天数=1;
周距:=周天数<5,周天数>1;
RR:=BACKSET(周天数周未:=( RR=1 AND 周天数!=1) OR WEEKDAY=5 ,NODRAW;
周开盘:IF(开盘*O,开盘*O,REF(开盘*O,周天数=2)*周距),NODRAW;
周最高:HHV(H,周天数),COLORYELLOW,NODRAW;
周最低:LLV(L,周天数),COLOR00FF00,NODRAW;
收盘价:C,NODRAW;
STICKLINE(周未 AND 周开盘>C,周开盘,C,2,0),COLOREAEAAE;
STICKLINE(周未 AND 周开盘STICKLINE(周未 AND 周开盘>C,周最高,周最低,0,0),COLOREAEAAE;
STICKLINE(周未 AND 周开盘
同图显示月K线通达信版

◆月周日K线同图◆贴图:
同图显示月K线(原分析家的)
{原码,外部引用公式}
001
C1:close;
O1:Open;
H1:high;
L1:low;
========
同图显示主图 "周K线,月K线"
WC:"001引用.C1#WEEK"LINETHICK0;
WO1:=IF(WEEKDAYWO:HHV(WO1,WEEKDAY),LINETHICK0;
WH:HHV(H,WEEKDAY),LINETHICK0;
WL:LLV(L,WEEKDAY),LINETHICK0;
MC:="001引用.C1#MONTH"LINETHICK0;
MO1:=IF(DAYMO:=HHV(MO1,DAY),LINETHICK0;
A:=DAYB:=BARSLAST(A)+1;
MH:=HHV(H,B),LINETHICK0;
ML:=LLV(L,B),LINETHICK0;
STICKLINE(MC>=MO,MO,MC,4,0),COLOR5CA8FD;
STICKLINE(MCSTICKLINE(WC>=WO,WO,WC,4,0),COLOR003399;
STICKLINE(WCJC:=(REF(C,3)+REF(C,5)+REF(C,7)+REF(C,8)+REF(C,13)+REF(C,21))/6;
参考价:SMA(JC,5,1),CIRCLEDOT,COLORGREEN;
{价:}
IF(C>=参考价,参考价,DRAWNULL),CIRCLEDOT,COLOR0000FF;
GJ:=(C+H+L+O)/4;
明日阻力:=L+(GJ-L)+(C-L),LINETHICK0;
明日支撑:=L+(C-GJ),LINETHICK0;
今日阻力:IF(ISLASTBAR,REF(明日阻力,1),DRAWNULL),POINTDOT,LINETHICK4,COLORMAGENTA;
今日支撑:IF(ISLASTBAR,REF(明日支撑,1),DRAWNULL),POINTDOT,LINETHICK4,COLORMAGENTA;
DRAWKLINE(H,O,L,C);


K线同图周日

WC:"001引用.C1#WEEK"LINETHICK0;
WO1:=IF(WEEKDAYWO2:=IF(WO1= DRAWNULL,REF(WO1,1), WO1);
WO3:=IF(WO2= DRAWNULL,REF(WO2,1), WO2);
WO4:=IF(WO3= DRAWNULL,REF(WO3,1), WO3);
WO:IF(WO4= DRAWNULL,REF(WO4,1), WO4)LINETHICK0;
WH:HHV(H,WEEKDAY),LINETHICK0;
WL:LLV(L,WEEKDAY),LINETHICK0;
STICKLINE(WC>=WO,WO,WC,4,0),COLOR003399;
STICKLINE(WCDRAWKLINE(H,O,L,C);
MA5:MA(C,5),COLORWHITE;
MA10:MA(C,13),COLORYELLOW;
JC:=(REF(C,3)+REF(C,5)+REF(C,7)+REF(C,8)+REF(C,13)+REF(C,21))/6;
参考价:=SMA(JC,5,1), CIRCLEDOT,COLORGREEN;
价:=IF(C>=参考价,参考价,DRAWNULL),CIRCLEDOT,COLOR0000FF;