中华农历论坛知识讨论区历法知识 → 寿星万年历5.08(测试版)


  共有908045人关注过本帖树形打印

主题:寿星万年历5.08(测试版)

帅哥哟,离线,有人找我吗?
onechen
  1051楼 个性首页 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:18 积分:588 威望:0 精华:0 注册:2012/3/1 15:49:00
盗版谋利?  发帖心情 Post By:2012/3/7 19:14:00

在 Apple 的 App Stroe 里找到了这个,看起来应该是许老师的作品,不过好像被别人放到 App Store 上去卖了,或者是有经过许老师的授权同意?不过版权讯息都被涂掉了。
图片点击可在新窗口打开查看此主题相关图片如下:1.jpg
图片点击可在新窗口打开查看

Sorry! 图只能传小於100K 有点小且模糊。

支持(0中立(0反对(0单帖管理 | 引用 | 回复 回到顶部
帅哥哟,离线,有人找我吗?
xjw01
  1052楼 个性首页 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:蝙蝠侠 帖子:866 积分:3804 威望:3 精华:20 注册:2008/3/20 22:14:00
  发帖心情 Post By:2012/3/8 11:55:00

没 有 授 权 .

 

此 人 就 好 象 写 论 文 时 ,几 乎 一 字 不 变 的 抄 .

 

这 人 不 应 把 版 权 信 息 删 除 的 .

 

起 码 也 应 改 点 界 面 ,并 在 适 当 的 地 方 说 明 程 序 的 来 龙 去 脉 .

 

虽 然 我 的 版 权 没 有 写 的 很 规 范 ,但 已 写 明 ,用 了 我 的 内 核 代 码 ,应 注 明 算 法 的 来 源 问 题 .

即 ,要 么 申 明 来 自 于 寿 星 ,要 么 什 么 都 不 说 明 ,但 不 得 说 成 是 别 人 的 内 核 代 码 .

通 俗 的 讲 ,不 是 自 已 的 ,不 要 硬 说 成 是 自 己 的 .

 

 

 


支持(1中立(0反对(0单帖管理 | 引用 | 回复 回到顶部
帅哥哟,离线,有人找我吗?
浪-淘-沙
  1053楼 个性首页 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:2068 积分:4263 威望:5 精华:4 注册:2008/11/13 21:03:00
  发帖心情 Post By:2012/3/8 16:38:00

以下是引用xjw01在2012-3-8 11:55:00的发言:

没 有 授 权 .

 

此 人 就 好 象 写 论 文 时 ,几 乎 一 字 不 变 的 抄 .

 

这 人 不 应 把 版 权 信 息 删 除 的 .

 

起 码 也 应 改 点 界 面 ,并 在 适 当 的 地 方 说 明 程 序 的 来 龙 去 脉 .

 

虽 然 我 的 版 权 没 有 写 的 很 规 范 ,但 已 写 明 ,用 了 我 的 内 核 代 码 ,应 注 明 算 法 的 来 源 问 题 .

即 ,要 么 申 明 来 自 于 寿 星 ,要 么 什 么 都 不 说 明 ,但 不 得 说 成 是 别 人 的 内 核 代 码 .

通 俗 的 讲 ,不 是 自 已 的 ,不 要 硬 说 成 是 自 己 的 .

 

 

 

盗版别人的软件,还要拿去卖钱,这种行为确实要受到谴责的。


支持(0中立(0反对(0单帖管理 | 引用 | 回复 回到顶部
帅哥哟,离线,有人找我吗?
onechen
  1054楼 个性首页 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:18 积分:588 威望:0 精华:0 注册:2012/3/1 15:49:00
  发帖心情 Post By:2012/3/8 16:46:00

以下是引用xjw01在2012-3-8 11:55:00的发言:

没 有 授 权 .

此 人 就 好 象 写 论 文 时 ,几 乎 一 字 不 变 的 抄 .

这 人 不 应 把 版 权 信 息 删 除 的 .

起 码 也 应 改 点 界 面 ,并 在 适 当 的 地 方 说 明 程 序 的 来 龙 去 脉 .

软件如此公然盗版发行,相信是非自有公断。

支持(0中立(0反对(0单帖管理 | 引用 | 回复 回到顶部
帅哥哟,离线,有人找我吗?
chwc
  1055楼 个性首页 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:黑侠 帖子:603 积分:5315 威望:0 精华:4 注册:2008/4/21 19:06:00
  发帖心情 Post By:2012/3/8 18:15:00

太没道德了,那种人比骗子更可恨。

支持(0中立(0反对(0单帖管理 | 引用 | 回复 回到顶部
帅哥哟,离线,有人找我吗?
snys
  1056楼 个性首页 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:9 积分:331 威望:0 精华:0 注册:2012/3/8 19:49:00
  发帖心情 Post By:2012/3/8 20:01:00

徐老师,只调用lunar.js 能否进行阴阳历转换 ?
函数dt_T干么用的,怎么不见定义

有没有C++、JAVA版的,方便用作接口调用
[此贴子已经被作者于2012-3-8 22:11:47编辑过]


支持(0中立(0反对(0单帖管理 | 引用 | 回复 回到顶部
帅哥哟,离线,有人找我吗?
snys
  1057楼 个性首页 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:9 积分:331 威望:0 精华:0 注册:2012/3/8 19:49:00
  发帖心情 Post By:2012/3/9 14:45:00

许剑伟, 你好,我改了一下程序(八字功能),输出日历到文本文件, 格式如下


(每天00:30:00点开始)公历 , 儒略日数 , 距2000年首(日) , 八字 , 真太阳
1995-1-1  00:30:00 , 2449719 , -1826 , 甲戌丙子壬辰庚子 , 00:12:30
1995-1-2  00:30:00 , 2449720 , -1825 , 甲戌丙子癸巳壬子 , 00:12:02
1995-1-3  00:30:00 , 2449721 , -1824 , 甲戌丙子甲午甲子 , 00:11:34
1995-1-4  00:30:00 , 2449722 , -1823 , 甲戌丙子乙未丙子 , 00:11:06
1995-1-5  00:30:00 , 2449723 , -1822 , 甲戌丙子丙申戊子 , 00:10:38
1995-1-6  00:30:00 , 2449724 , -1821 , 甲戌丙子丁酉庚子 , 00:10:11
....


我希望增加 阴历日期、二十四节气及它精确时间 等到 字段末尾, 新格式变为


(每天00:30:00点开始)公历 , 儒略日数 , 距2000年首(日) , 八字 , 真太阳 ,  阴历日期 , 节气, 节气精确时间
2012-3-5  00:00:00 , 2455992 , 4447 , 壬辰壬寅乙丑丙子 , 23:33:58 , 2012-2-13小, 惊蛰, 2012-03-05 12:21:02
...

希望帮助,附件是改过的程序,sxwnl.html 主要更改部分如下:


/**********************
命理八字计算
**********************/
function ML_calc() {
    var ob = new Object();
    Cml_m.value = '1';
    Cml_d.value = '1';
    Cml_his.value = '00:00:00';
    var t = timeStr2hour(Cml_his.value);
    //var jd = JD.JD(year2Ayear(Cml_y.value), Cml_m.value - 0, Cml_d.value - 0 + t / 24)
    var jd, rl, ns;
    var i = 0, m_dy = 0, m_dm = 0, m_dd = 0, m_endy = 0;
    var path = document.location.pathname;
    var dir = path.substring(path.indexOf('/') + 1, path.lastIndexOf('/'));
    var sText = '(每天'+Cml_his.value+'点开始)公历 , 儒略日数 , 距2000年首(日) , 八字 , 真太阳 \n';
    var sep = ' , ';
    var myDate = new Date();
    //var endDate = new Date();
    myDate.setFullYear(Cml_y.value, Cml_m.value - 1, Cml_d.value);
    //endDate.setFullYear(Cml_y.value + 10, Cml_m.value - 1, Cml_d.value);

    m_dy = Cml_y.value-0;
    m_endy = m_dy;
    m_endy += (Cml_span.value-0);

    // 长时间运行,关掉超时报警
    setTimeout("ML_calc", 120000);

    // 最大时间跨度 100年
    for (i = 0; i<36600; i++) {
        m_dy="m_dy"  = myDate.getFullYear() - 0;
        if="if"  (m_dy >= m_endy) break;
        m_dm = myDate.getMonth()+1;
        m_dd = myDate.getDate()-0;
        jd = JD.JD(year2Ayear(m_dy), m_dm - 0, m_dd - 0 + t / 24);
        obb.mingLiBaZi(jd + curTZ / 24 - J2000, Cp11_J.value / radd, ob); //八字计算
        rl = int2(jd + 0.5);
        ns = int2(jd + 0.5 - J2000);
        //Cal6.innerHTML +=
        //    '公历 ' + myDate.toLocaleDateString() +' 儒略日数 ' + rl + ' 距2000年首' + ns + '日'
        //    + '[八字]:' + ob.bz_jn + '年 ' + ob.bz_jy + '月 ' + ob.bz_jr + '日 ' + ob.bz_js + '时 真太阳' + ob.bz_zty + '换行字符';
        myDate.setDate(myDate.getDate() + 1);  // 时间后延
        sText += m_dy+'-'+ m_dm +'-'+m_dd+ '  '+Cml_his.value+ sep + rl + sep + ns + sep + ob.bz_jn +ob.bz_jy +ob.bz_jr + ob.bz_js + sep + ob.bz_zty + '\n';
    }

    var fso = new ActiveXObject("Scripting.FileSystemObject");

    var m_file = dir + '/D' + Cml_y.value + 'SPAN' + Cml_span.value + '.txt';
    Cal6.innerHTML += m_file + '换行字符';
       
    //ForReading 1 Open a file for reading only. You can't write to this file.
    //ForWriting 2 Open a file for writing.
    //ForAppending 8 Open a file and write to the end of the file.
    var FileObject = fso.OpenTextFile(m_file, 2, true, 0); // 8=append, true=create if not exist, 0 = ASCII
    FileObject.write(sText);
    FileObject.close()


}




换行字符 是 < b r  >

支持(0中立(0反对(0单帖管理 | 引用 | 回复 回到顶部
帅哥哟,离线,有人找我吗?
snys
  1058楼 个性首页 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:9 积分:331 威望:0 精华:0 注册:2012/3/8 19:49:00
  发帖心情 Post By:2012/3/9 16:46:00

有QQ 群么,大家讨论方便

支持(0中立(0反对(0单帖管理 | 引用 | 回复 回到顶部
帅哥哟,离线,有人找我吗?
seetwo
  1059楼 个性首页 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:7 积分:1017 威望:0 精华:0 注册:2012/3/8 23:49:00
  发帖心情 Post By:2012/3/12 20:12:00

寿星天文历(V5.05)和寿星天文历(V5.04)的年暦的B222年的月份一様、十月又有―個十月、十―月相同.有点不合理!希望寿星天文历(V5.06)把它改善一下.
·正月大 12-09(10 03:52:58) 大雪12-10(10 10:37:57) 冬至12-25(25 03:47:10)
·二月大 01-08(08 23:10:25) 小寒01-08(08 22:16:47) 大寒01-23(23 18:50:54)
·三月小 02-07(07 15:52:50) 立春02-07(07 18:04:01) 雨水02-22(22 20:23:29)
·四月大 03-08(09 05:23:27) 惊蛰03-10(10 02:00:10) 春分03-25(25 10:59:04)
·五月小 04-07(07 16:03:19) 清明04-09(09 22:59:34) 谷雨04-25(25 13:44:27)
·六月大 05-06(07 00:37:53) 立夏05-11(11 06:21:56) 小满05-27(27 00:20:01)
·七月小 06-05(05 07:56:47) 芒种06-11(11 18:26:36) 夏至06-27(27 12:06:58)
·八月大 07-04(04 14:50:40) 小暑07-13(13 04:08:01) 大暑07-28(28 18:05:32)
·九月小 08-03(02 22:15:48) 立秋08-13(13 05:04:35) 处暑08-28(28 13:01:25)
·十月大 09-01(01 07:15:39) 白露09-12(12 17:30:09) 秋分09-27(27 18:51:05)
·十一大 10-01(30 18:51:40) 寒露10-12(12 17:07:36) 霜降10-27(27 13:02:04)
·十月小 10-31(30 09:39:34) 立冬11-09(11 06:59:26) 小雪11-25(25 23:57:31)
B221年
·十一大 11-29(29 03:20:19) 大雪12-10(10 16:31:34) 冬至12-25(25 09:44:56)
·十二小 12-29(28 22:34:00) 小寒01-09(09 04:11:28) 大寒01-25(24 00:48:29)


支持(0中立(0反对(0单帖管理 | 引用 | 回复 回到顶部
帅哥哟,离线,有人找我吗?
seetwo
  1060楼 个性首页 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:7 积分:1017 威望:0 精华:0 注册:2012/3/8 23:49:00
  发帖心情 Post By:2012/3/12 20:32:00

許老師經過多位高人指点丶創造―個帯有天文多様化元素的農暦「寿星天文历」、實在令毎個熱愛農暦的人叫好.希望許老師能將這個天文暦做到―百分.把它修改到―百分.(関於秦暦、我有点不懂的是、為何年B723只有十个月丶而B222年有十四个月?) (實暦是樣?)

支持(0中立(0反对(0单帖管理 | 引用 | 回复 回到顶部

返回版面帖子列表

寿星万年历5.08(测试版)








签名