1. 首页 > 基础知识

通达信时间转农历(通达信神奇九转选股使用方法)

通达信时间转农历(通达信神奇九转选股使用方法)

内容导航:
  • 有农历和公历相互转换的函数吗
  • 日期转换为农历日期的算法是什么
  • 在EXCEL中怎样把公历转换成农历
  • 日历转农历
  • 通达信怎么把分时公式导入分时图 就像下图这样的
  • 炒股,怎样用通达信实现九转序列?
  • 通达信九转序列主图指标公式 怎么用
  • Q1:有农历和公历相互转换的函数吗

    公历转农历,如图例:

    B2="农历"&TEXT(A2,"[$-130000]m月d日")----限2007版以上

    农历闰月月份会加 1,如润7月会显示8月,8月顺延为9月….,12月顺延为13月。

    农历转公历:(供参考,不一定正确,闰年无法转换)

    B2=LOOKUP(--SUBSTITUTE(SUBSTITUTE(A2,-30,-28),-29,-27),--TEXT((LEFT(A2,5)&"1/1")+ROW($1:$400),"[$-130000]yyyy/m/d"),(LEFT(A2,5)&"1/1")+ROW($1:$400))+(--RIGHT(A2,2)>28)*2

    验算:C2="农历"&TEXT(B2,"[$-130000]m月d日")

    Q2:日期转换为农历日期的算法是什么

    excel公历转农历方法一:使用text函数 A列是公历日期,我们在B1单元格输入公式:=TEXT(A1,"[$-130000]yyyy年m月"&IF(LEN(--TEXT(A1,"[$-130000]dd"))=1,"初","")&"d"),下拉完成公历转农历。

    Q3:在EXCEL中怎样把公历转换成农历

    Dim WeekName(7), MonthAdd(11), NongliData(99), TianGan(9), DiZhi(11), ShuXiang(11), DayName(30), MonName(12)
    Dim curTime, curYear, curMonth, curDay, curWeekday
    Dim GongliStr, WeekdayStr, NongliStr, NongliDayStr
    Dim i, m, n, k, isEnd, bit, TheDate
    Private Sub Form_Load()
    '获取当前系统时间
    curTime = Now()
    '星期名
    WeekName(0) = " * "
    WeekName(1) = "星期日"
    WeekName(2) = "星期一"
    WeekName(3) = "星期二"
    WeekName(4) = "星期三"
    WeekName(5) = "星期四"
    WeekName(6) = "星期五"
    WeekName(7) = "星期六"
    '天干名称
    TianGan(0) = "甲"
    TianGan(1) = "乙"
    TianGan(2) = "丙"
    TianGan(3) = "丁"
    TianGan(4) = "戊"
    TianGan(5) = "己"
    TianGan(6) = "庚"
    TianGan(7) = "辛"
    TianGan(8) = "壬"
    TianGan(9) = "癸"
    '地支名称
    DiZhi(0) = "子"
    DiZhi(1) = "丑"
    DiZhi(2) = "寅"
    DiZhi(3) = "卯"
    DiZhi(4) = "辰"
    DiZhi(5) = "巳"
    DiZhi(6) = "午"
    DiZhi(7) = "未"
    DiZhi(8) = "申"
    DiZhi(9) = "酉"
    DiZhi(10) = "戌"
    DiZhi(11) = "亥"
    '属相名称
    ShuXiang(0) = "鼠"
    ShuXiang(1) = "牛"
    ShuXiang(2) = "虎"
    ShuXiang(3) = "兔"
    ShuXiang(4) = "龙"
    ShuXiang(5) = "蛇"
    ShuXiang(6) = "马"
    ShuXiang(7) = "羊"
    ShuXiang(8) = "猴"
    ShuXiang(9) = "鸡"
    ShuXiang(10) = "狗"
    ShuXiang(11) = "猪"
    '农历日期名
    DayName(0) = "*"
    DayName(1) = "初一"
    DayName(2) = "初二"
    DayName(3) = "初三"
    DayName(4) = "初四"
    DayName(5) = "初五"
    DayName(6) = "初六"
    DayName(7) = "初七"
    DayName(8) = "初八"
    DayName(9) = "初九"
    DayName(10) = "初十"
    DayName(11) = "十?quot;"
    DayName(12) = "十二"
    DayName(13) = "十三"
    DayName(14) = "十四"
    DayName(15) = "十五"
    DayName(16) = "十六"
    DayName(17) = "十七"
    DayName(18) = "十八"
    DayName(19) = "十九"
    DayName(20) = "二十"
    DayName(21) = "廿一"
    DayName(22) = "廿二"
    DayName(23) = "廿三"
    DayName(24) = "廿四"
    DayName(25) = "廿五"
    DayName(26) = "廿六"
    DayName(27) = "廿七"
    DayName(28) = "廿八"
    DayName(29) = "廿九"
    DayName(30) = "三十"
    '农历月份名
    MonName(0) = "*"
    MonName(1) = "正"
    MonName(2) = "二"
    MonName(3) = "三"
    MonName(4) = "四"
    MonName(5) = "五"
    MonName(6) = "六"
    MonName(7) = "七"
    MonName(8) = "八"
    MonName(9) = "九"
    MonName(10) = "十"
    MonName(11) = "十一"
    MonName(12) = "腊"
    '公历每月前面的天数
    MonthAdd(0) = 0
    MonthAdd(1) = 31
    MonthAdd(2) = 59
    MonthAdd(3) = 90
    MonthAdd(4) = 120
    MonthAdd(5) = 151
    MonthAdd(6) = 181
    MonthAdd(7) = 212
    MonthAdd(8) = 243
    MonthAdd(9) = 273
    MonthAdd(10) = 304
    MonthAdd(11) = 334
    '农历数据
    NongliData(0) = 2635
    NongliData(1) = 333387
    NongliData(2) = 1701
    NongliData(3) = 1748
    NongliData(4) = 267701
    NongliData(5) = 694
    NongliData(6) = 2391
    NongliData(7) = 133423
    NongliData(8) = 1175
    NongliData(9) = 396438
    NongliData(10) = 3402
    NongliData(11) = 3749
    NongliData(12) = 331177
    NongliData(13) = 1453
    NongliData(14) = 694
    NongliData(15) = 201326
    NongliData(16) = 2350
    NongliData(17) = 465197
    NongliData(18) = 3221
    NongliData(19) = 3402
    NongliData(20) = 400202
    NongliData(21) = 2901
    NongliData(22) = 1386
    NongliData(23) = 267611
    NongliData(24) = 605
    NongliData(25) = 2349
    NongliData(26) = 137515
    NongliData(27) = 2709
    NongliData(28) = 464533
    NongliData(29) = 1738
    NongliData(30) = 2901
    NongliData(31) = 330421
    NongliData(32) = 1242
    NongliData(33) = 2651
    NongliData(34) = 199255
    NongliData(35) = 1323
    NongliData(36) = 529706
    NongliData(37) = 3733
    NongliData(38) = 1706
    NongliData(39) = 398762
    NongliData(40) = 2741
    NongliData(41) = 1206
    NongliData(42) = 267438
    NongliData(43) = 2647
    NongliData(44) = 1318
    NongliData(45) = 204070
    NongliData(46) = 3477
    NongliData(47) = 461653
    NongliData(48) = 1386
    NongliData(49) = 2413
    NongliData(50) = 330077
    NongliData(51) = 1197
    NongliData(52) = 2637
    NongliData(53) = 268877
    NongliData(54) = 3365
    NongliData(55) = 531109
    NongliData(56) = 2900
    NongliData(57) = 2922
    NongliData(58) = 398042
    NongliData(59) = 2395
    NongliData(60) = 1179
    NongliData(61) = 267415
    NongliData(62) = 2635
    NongliData(63) = 661067
    NongliData(64) = 1701
    NongliData(65) = 1748
    NongliData(66) = 398772
    NongliData(67) = 2742
    NongliData(68) = 2391
    NongliData(69) = 330031
    NongliData(70) = 1175
    NongliData(71) = 1611
    NongliData(72) = 200010
    NongliData(73) = 3749
    NongliData(74) = 527717
    NongliData(75) = 1452
    NongliData(76) = 2742
    NongliData(77) = 332397
    NongliData(78) = 2350
    NongliData(79) = 3222
    NongliData(80) = 268949
    NongliData(81) = 3402
    NongliData(82) = 3493
    NongliData(83) = 133973
    NongliData(84) = 1386
    NongliData(85) = 464219
    NongliData(86) = 605
    NongliData(87) = 2349
    NongliData(88) = 334123
    NongliData(89) = 2709
    NongliData(90) = 2890
    NongliData(91) = 267946
    NongliData(92) = 2773
    NongliData(93) = 592565
    NongliData(94) = 1210
    NongliData(95) = 2651
    NongliData(96) = 395863
    NongliData(97) = 1323
    NongliData(98) = 2707
    NongliData(99) = 265877
    '生成当前公历年、月、日 ==> GongliStr
    curYear = Year(curTime)
    curMonth = Month(curTime)
    curDay = Day(curTime)
    GongliStr = curYear & "年"
    If (curMonth < 10) Then
    GongliStr = GongliStr & "0" & curMonth & "月"
    Else
    GongliStr = GongliStr & curMonth & "月"
    End If
    If (curDay < 10) Then
    GongliStr = GongliStr & "0" & curDay & "日"
    Else
    GongliStr = GongliStr & curDay & "日"
    End If
    '生成当前公历星期 ==> WeekdayStr
    curWeekday = Weekday(curTime)
    WeekdayStr = WeekName(curWeekday)
    '计算到初始时间1921年2月8日的天数:1921-2-8(正月初一)
    TheDate = (curYear - 1921) * 365 + Int((curYear - 1921) / 4) + curDay + MonthAdd(curMonth - 1) - 38
    If ((curYear Mod 4) = 0 And curMonth > 2) Then
    TheDate = TheDate + 1
    End If
    '计算农历天干、地支、月、日
    isEnd = 0
    m = 0
    Do
    If (NongliData(m) < 4095) Then
    k = 11
    Else
    k = 12
    End If
    n = k
    Do
    If (n < 0) Then
    Exit Do
    End If
    '获取NongliData(m)的第n个二进制位的值
    bit = NongliData(m)
    For i = 1 To n Step 1
    bit = Int(bit / 2)
    Next
    bit = bit Mod 2
    If (TheDate <= 29 + bit) Then
    isEnd = 1
    Exit Do
    End If
    TheDate = TheDate - 29 - bit
    n = n - 1
    Loop
    If (isEnd = 1) Then
    Exit Do
    End If
    m = m + 1
    Loop
    curYear = 1921 + m
    curMonth = k - n + 1
    curDay = TheDate
    If (k = 12) Then
    If (curMonth = (Int(NongliData(m) / 65536) + 1)) Then
    curMonth = 1 - curMonth
    ElseIf (curMonth > (Int(NongliData(m) / 65536) + 1)) Then
    curMonth = curMonth - 1
    End If
    End If
    '生成农历天干、地支、属相 ==> NongliStr
    NongliStr = "农历" & TianGan(((curYear - 4) Mod 60) Mod 10) & DiZhi(((curYear - 4) Mod 60) Mod 12) & "年"
    NongliStr = NongliStr & "(" & ShuXiang(((curYear - 4) Mod 60) Mod 12) & ")"
    '生成农历月、日 ==> NongliDayStr
    If (curMonth < 1) Then
    NongliDayStr = "闰" & MonName(-1 * curMonth)
    Else
    NongliDayStr = MonName(curMonth)
    End If
    NongliDayStr = NongliDayStr & "月"
    NongliDayStr = NongliDayStr & DayName(curDay)
    MsgBox NongliStr & NongliDayStr
    End Sub
    参考资料:http://www.wangchao.net.cn/bbsshowlist.jsp?area_id=02&board_id=01&parent_id=23361

    Q4:日历转农历

    下载个人生日历软件就可以了,上面都显示的很清楚的。试试很好用

    Q5:通达信怎么把分时公式导入分时图 就像下图这样的

    点分时副图右侧 出来方框 点方框左侧最上面的--选择分时指标  然后到你的指标里面选你自己喜欢的

    Q6:炒股,怎样用通达信实现九转序列?

    指标介绍:九转序列是根据TD马克序列的思想产生的,即连续9天收盘价高于(低于)前4天的收盘价,其后走势很可能发生转向(大家可看图)。数字1至8要用到未来函数,但数字9不带未来函数,所有对转向的判断是定量且不变的。
    实战注意事项:
    1、九转序列主要运用于大盘研判,个股可参照使用。大盘确定仓位,个股决定战场。
    2、九转序列最好与MACD背离技术结合使用,准确率会更高。
    3、九转序列在单边行情里使用效果最差,建议不要用它来判断行情。
    4、九转序列找顶和底一般是这样的关系:如果在下降趋势中,日线的出低9(“低”就是下降九转序列),那么对应反弹的是120分钟的高9(“高”就是上升九转序列),即时间单位分析上应减少一半。
    以上分析也主要来自学习中知识和体会,欢迎各位股友指正!这里提供两个版本的指标:一是交易师版,二是通达信版。
    (本文来源于股民在线:http://www.soobbs.com/gupiaozhishi/201608/162.html,转载请注明出处。)
    A1:=C>REF(C,4);
    NT:=BARSLASTCOUNT(A1);
    TJ11:=NT=9;
    TJ13:=ISLASTBAR AND BETWEEN(NT,5,8);
    AY:=(BACKSET(TJ11>0,9) OR BACKSET(TJ13>0,NT))*NT;
    DRAWTEXT(AY>0,H*1.02,VAR2STR(AY,0)),COLORFF00FF;
    DRAWTEXT(NT=9,H*1.02,'9'),COLORGREEN;
    B1:=C<REF(C,4);
    NT0:=BARSLASTCOUNT(B1);
    TJ21:=NT0=9 ;
    TJ23:=ISLASTBAR AND BETWEEN(NT0,5,8);
    AY1:=(BACKSET(TJ21>0,9) OR BACKSET(TJ23>0,NT0))*NT0;
    DRAWTEXT(AY1>0,L*0.98,VAR2STR(AY1,0)),COLORFF00FF;
    DRAWTEXT(NT0=9,L*0.98,'9'),COLORGREEN;

    Q7:通达信九转序列主图指标公式 怎么用

    通达信九转序列,类似早期大智慧软件的公式。
    九转序列,分为九步,上升九步,下跌九步,九步以后顺势而为的可能性增加了。
    当然,由于用到未来函数,这个信号不一定是准确的,有时转势的时候,信号就不存在了。
    多数公式只要多注意观察,就可以明白公式的原理。
    如刚还想深入理解,那就要看下面的动态翻译,长期下去自己也可以编写修改公式了。

    本文由锦鲤发布,不代表本站立场,转载联系作者并注明出处:/showinfo-1-73285-0.html