公式指标平台 股票指标公式源码分享 登录 注册
公式指标平台
未来函数检测
首 页 金钻指标 通达信公式 大智慧公式 同花顺公式 文华财经公式 操盘手公式 东财通公式 飞狐公式 其他公式 公式解答 股票软件 股票池
当前位置:→ 公式指标平台 > 通达信公式 > 正文 → 正文

通达信时间窗口、缺口/农历、源码

发布时间:2012/11/5 2:02:45  浏览次数:

通达信时间窗口、缺口/农历、源码

缺口/农历时间窗口
继续整理公式,指标原创????可能是或者有借鉴,无所谓
今后是否发布,看大家是否喜欢;我发布公式基本原则简单明了、可以自由整合到你的主图,
打字较慢,所以很少解释,简单明了一看应明白
农历时间窗口论坛可能有,应该不一样
此贴还有一个目的,合并输出,通达信有50限制

{缺口}
STICKLINE(LOW>REF(H,1),LOW,REF(H,1),15,0),COLOR0066EE;
STICKLINE(HIGH<REF(LOW,1),HIGH,REF(LOW,1),15,0),COLOR888080;
TQ:=BARSLAST(L>REF(H,1));EQ:=COUNT(L<REF(H,TQ+1),TQ)<2;
{DRAWTEXT(L<REF(H,TQ+1 ) AND EQ,L-0.12,'缺补'),COLOR0099FF;}
AA节:=(360*FRACPART(((DATETODAY(DATE)-21)/(365/360))/360)),NODRAW;
A节:=INTPART(AA节/15)+1,NODRAW;节N:=A节!=REF(A节,1);
AHZ:=HHV(H,200); ALZ:=LLV(L,200); BZ0:=(AHZ-ALZ)/40;
STICKLINE(A节!=REF(A节,1),C,C-BZ0,1,1),COLOR00FFFF;
节气:=IF(节N AND A节=3,'立春',IF(节N AND A节=4 ,'雨水',IF(节N AND A节=5,'惊蛰',IF(节N AND A节=6,'春分',
IF(节N AND A节=7,'清明',IF(节N AND A节=8,'谷雨',IF(节N AND A节=9,'立夏',IF(节N AND A节=10,'小满',
IF(节N AND A节=11,'芒种',IF(节N AND A节=12,'夏至',IF(节N AND A节=13,'小暑',IF(节N AND A节=14,'大署',
IF(节N AND A节=15,'立秋',IF(节N AND A节=16,'处暑',IF(节N AND A节=17,'白露',IF(节N AND A节=18,'秋分',
IF(节N AND A节=19,'寒露',IF(节N AND A节=20,'霜降',IF(节N AND A节=21 ,'立冬',IF(节N AND A节=22,'小雪',
IF(节N AND A节=23,'大雪',IF(节N AND A节=24,'冬至',IF(节N AND A节=1,'小寒',IF(节N AND A节=2,'大寒',
DRAWNULL))))))))))))))))))))))));DRAWTEXT(1,H+BZ0,节气),COLOR00FFFF;

月节:=IF(REFDATE(MONTH,DATE)=1,'小寒5日-7日大寒20日-22日',IF(REFDATE(MONTH,DATE)=2,'立春3日-5日雨水18日-20日',
IF(REFDATE(MONTH,DATE)=3,'惊蛰5日-7日春分20日-22日',IF(REFDATE(MONTH,DATE)=4,'清明4日-6日谷雨19日-21日',
IF(REFDATE(MONTH,DATE)=5,'立夏5日-7日小满20日-22日',IF(REFDATE(MONTH,DATE)=6,'芒种5日-7日夏至21日-23日',
IF(REFDATE(MONTH,DATE)=7,'小暑6日-8日大暑22日-24日',IF(REFDATE(MONTH,DATE)=8,'立秋7日-9日处暑22日-24日',
IF(REFDATE(MONTH,DATE)=9,'白露7日-9日秋分22日-24日',IF(REFDATE(MONTH,DATE)=10,'寒露8日-10日霜降23日-25日',
IF(REFDATE(MONTH,DATE)=11,'立冬7日-9日小雪22日-24日',IF(REFDATE(MONTH,DATE)=12,'大雪6日-8日冬至21日-23日',
DRAWNULL)))))))))))); 今日:=DATE+19000000,NODRAW;
输节K:=STRCAT(CON2STR(今日,0),STRCAT('■农历节气',月节));
DRAWTEXT_FIX(1,0.70,0.02,1,输节K),COLORWHITE;
输周K:=STRCAT(STRCAT('今年N周',CON2STR(WEEKOFYEAR,0)),STRCAT('■周日星期',CON2STR(WEEKDAY,0)));
DRAWTEXT_FIX(1,0.96,0.02,1,输周K),COLORWHITE;

通达信时间窗口、缺口/农历、源码

资源下载链接   资源大小:unknow

关于我们 - 联系我们 - 广告合作 - 下载声明 - 网站帮助 - 友情链接 - 网站地图 - RSS订阅 - TOP
湘ICP备09016573号 增值电信业务经营ICP许可证:湘B2-20210269 湘公网安备43108102000039号
Copyright © GSZB.COM ,All Rights Reserved.
股票公式,股票指标,股票软件,股票知识