查看完整版本: 24节气与卦

24节气与卦

　　　　
[code]

a:=LSOLARTERM(date);
DRAWTEXT(a=1,high*1.02,'●小寒'),coloryellow;
DRAWTEXT(a=2,high*1.02,'●大寒'),coloryellow;
DRAWTEXT(a=3,high*1.02,'●立春'),coloryellow;
DRAWTEXT(a=4,high*1.02,'●雨水'),coloryellow;
DRAWTEXT(a=5,high*1.02,'●惊蛰'),coloryellow;
DRAWTEXT(a=6,high*1.02,'●春分'),coloryellow;
DRAWTEXT(a=7,high*1.02,'●清明'),coloryellow;
DRAWTEXT(a=8,high*1.02,'●谷雨'),coloryellow;
DRAWTEXT(a=9,high*1.02,'●立夏'),coloryellow;
DRAWTEXT(a=10,high*1.02,'●小满'),coloryellow;
DRAWTEXT(a=11,high*1.02,'●芒种'),coloryellow;
DRAWTEXT(a=12,high*1.02,'●夏至'),coloryellow;
DRAWTEXT(a=13,high*1.02,'◇小暑'),coloryellow;
DRAWTEXT(a=14,high*1.02,'◇大暑'),coloryellow;
DRAWTEXT(a=15,high*1.02,'◇立秋'),coloryellow;
DRAWTEXT(a=16,high*1.02,'◇处暑'),coloryellow;
DRAWTEXT(a=17,high*1.02,'◇白露'),coloryellow;
DRAWTEXT(a=18,high*1.02,'◇秋分'),coloryellow;
DRAWTEXT(a=19,high*1.02,'◇寒露'),coloryellow;
DRAWTEXT(a=20,high*1.02,'◇霜降'),coloryellow;
DRAWTEXT(a=21,high*1.02,'◇立冬'),coloryellow;
DRAWTEXT(a=22,high*1.02,'◇小雪'),coloryellow;
DRAWTEXT(a=23,high*1.02,'◇大雪'),coloryellow;
DRAWTEXT(a=24,high*1.02,'●冬至'),coloryellow;
DRAWYITEXT(a=1 or a=2 or a=3 or a=4 or a=5 or a=6 or a=7 or
a=8 or a=9 or a=10 or a=11 or a=12 or a=13 or a=14 or a=15 or
a=16 or a=17 or a=18 or a=19 or a=20 or a=21 or a=22 or a=23 or
a=24,high*1.04,kgua(1, 1),1),colorred;{显示正K象卦名};
DRAWYITEXT(a=1 or a=2 or a=3 or a=4 or a=5 or a=6 or a=7 or
a=8 or a=9 or a=10 or a=11 or a=12 or a=13 or a=14 or a=15 or
a=16 or a=17 or a=18 or a=19 or a=20 or a=21 or a=22 or a=23 or
a=24,low*0.98,99-kgua(1, 1),1),coloryellow;{显示反K象卦名};
[/code]

[color=Teal][align=right] 本贴由 老实和尚 于 2005-6-29 23:50 最后编辑 [/align][/color]

我电脑里不知何时收集的，送给大家

[color=Teal][align=right] 本贴由 老实和尚 于 2005-6-29 23:48 最后编辑 [/align][/color]

谢谢!!!

和尚发公式啊，加分！
你的公式我不会用，下次发个我会用的吧！

XIEXIE！

:clap::clap::clap:和尚:cool:

谢谢分享!!!

谢谢

分析家中不能用

最后2行，不用那么麻烦呀：

a:=LSOLARTERM(date);
DRAWTEXT(a=1,high*1.02,'●小寒'),coloryellow;
DRAWTEXT(a=2,high*1.02,'●大寒'),coloryellow;
DRAWTEXT(a=3,high*1.02,'●立春'),coloryellow;
DRAWTEXT(a=4,high*1.02,'●雨水'),coloryellow;
DRAWTEXT(a=5,high*1.02,'●惊蛰'),coloryellow;
DRAWTEXT(a=6,high*1.02,'●春分'),coloryellow;
DRAWTEXT(a=7,high*1.02,'●清明'),coloryellow;
DRAWTEXT(a=8,high*1.02,'●谷雨'),coloryellow;
DRAWTEXT(a=9,high*1.02,'●立夏'),coloryellow;
DRAWTEXT(a=10,high*1.02,'●小满'),coloryellow;
DRAWTEXT(a=11,high*1.02,'●芒种'),coloryellow;
DRAWTEXT(a=12,high*1.02,'●夏至'),coloryellow;
DRAWTEXT(a=13,high*1.02,'◇小暑'),coloryellow;
DRAWTEXT(a=14,high*1.02,'◇大暑'),coloryellow;
DRAWTEXT(a=15,high*1.02,'◇立秋'),coloryellow;
DRAWTEXT(a=16,high*1.02,'◇处暑'),coloryellow;
DRAWTEXT(a=17,high*1.02,'◇白露'),coloryellow;
DRAWTEXT(a=18,high*1.02,'◇秋分'),coloryellow;
DRAWTEXT(a=19,high*1.02,'◇寒露'),coloryellow;
DRAWTEXT(a=20,high*1.02,'◇霜降'),coloryellow;
DRAWTEXT(a=21,high*1.02,'◇立冬'),coloryellow;
DRAWTEXT(a=22,high*1.02,'◇小雪'),coloryellow;
DRAWTEXT(a=23,high*1.02,'◇大雪'),coloryellow;
DRAWTEXT(a=24,high*1.02,'●冬至'),coloryellow;
DRAWYITEXT(a>0,high*1.04,kgua(1, 1),1),colorred;{显示正K象卦名};
DRAWYITEXT(a>0,low*0.98,99-kgua(1, 1),1),coloryellow;{显示反K象卦名};

哈哈，你终于露面了
[url]http://bbs.fjfox.com/t-19677-f2.html[/url]
这个帖子的内容缺少了南客只能黯然失色哦:D:D

要学习.....要学习

要学习.....要学习

DRAWYITEXT(a>0,high*1.04,kgua(1, 1),1),colorred;{显示正K象卦名};
DRAWYITEXT(a>0,low*0.98,99-kgua(1, 1),1),coloryellow;{显示反K象卦名};

其实这种起卦方法意义不大的

东北虎上有！整个可以看看！

谢谢!!!

谢谢!!!

有点意思

高

:cool::cool::cool::cool::cool::cool::cool::cool::cool::cool::cool::cool:

谢谢

:plaster: :plain: 不错