MosCnCalendar 漠氏万年历(1901-2100)

本类列表:
1. 纯Flash漠氏万年历
2. HTML+Flash+JS 版(HTML桌面壁纸)
3. Flash网页滚动菜单

下载1(不含源代码): cnca.swf 右键菜单目标另存为...
下载2(源文件.fla):cnca.fla

更新记录:

2005.09.24 更新。
(Flash版本: FlashMX6.0)

1.修正按钮文字applay --> apply(感谢FQ Wang网友的指正.)
2.修正时间范围 1901-2010 --> 1901-2100
3.添加“国耻日”判断，当日背景显示(感谢朱俊杰网友的提议.)
4.添加日期变更监视。日期变动，日历对应重新显示当年当月。
5.按钮式样修改。
6.当日标志式样修改
7.鼠标经过日期标志式样修改。
8.系统标准字体，黑体字显示。
9.算法参照网址，文档下载网址更新。

2. HTML+Flash+JS 版(HTML桌面壁纸)

下载: HtmlWnl.rar (示例)

1. 自动更换壁纸;
2. 万年历显示,查询;
3. 点击日期,将该日详细信息复制到系统剪贴板;
4. 可自由设置Flash万年历显示外观(公历年月标头,周末(节假日), 默认日期,公历节日,农历节日,节气,鼠标移动块,当日日期标识块,
是否背景透明,背景颜色,背景透明度,显示位置对齐方式,边缘距离,大小)
5. 可设置多张壁纸,定制显示方式(缩放,居中,平铺)

进一步说明:

注: 将鼠标移动到年月标题的左边,出现一个按钮,点击显示操作面板.

    现在网上比较流行的万年历是台湾的林洵贤做的版万年历，要拿来用，得要独起一页（有点大嘛）相信很多朋友也和我一样，想在自己的首页加个小巧的万年历，于是我就动手将它改成了Flash，不仅小多了，而且Flash的平滑字体，令万年历看上去更漂亮！
若您对此有兴趣，就请继续往下看--> ^_^
    我的这个Flash您可以从http://jsj02.net/mosca/上免费获得，现在有三个版本，一个是用Delphi做的可执行程序（在某些版本的XP上点时间区域有点问题:-()，一个是纯Flash版的，一个是加了js做成的桌面版。这里推荐您好下载第三个。
    下载后是一个winrar文件包，打开会有详细的说明。可能您会直接去点lwnl.swf，这时您会什么也看不到，先不着急，听我细说:-)
好了，材料准备好了，接下来就是怎么将它加入到您自己的网站中，显示一个还自我个性的"万年历"。
    首先打开dreamweaver（做网页的没人不知道吧：-），打开您的主页，在适当位置插入lwnl.swf，并调节大小。接下来要做的是设定这个万年历Flash的id (重要！)。在dreamweaver中选择您插入的这个Flash，在属性栏中的第一个文本框中输入Flash名称lwnl，就是宽高文本框的左边那个。再点一下属性里的“参数”按钮，添加一个"WMODE",值为"Transparent"，目的是让Flash以背景透明显示，否则，您在下面的代码里怎么设透明度都没用：-）
    好了，接下来就是写点代码了，写代码的目的就是让万年历以您的喜好来显示，只要您高兴，您可以使用各种颜色来显示万年历，以适合您的个人主页风格。

var lwnlObj; //用来保存万年历Flash对象
//判断浏览器版本
var InternetExplorer = navigator.appName.indexOf("Microsoft") != -1;

//以下内容是万年历Flash向浏览器发出的命令请求处理
// Handle all the the FSCommand messages in a Flash ***
function lwnl_DoFSCommand(command, args) {
//
// 万年历Flash装载完成时发出处理请求
if(command=="initCal"){
//取得Flash对象
lwnlObj = document.getElementById("lwnl");
//设置Flash显示风格
setFlash(wall1);
//启动万年历
lwnlObj.setVariable("initCal",1);
}
}

//若浏览器不支持Flash发出的信息
// Hook for Internet Explorer
if (navigator.appName && navigator.appName.indexOf("Microsoft") != -1 &&
navigator.userAgent.indexOf("Windows") != -1 && navigator.userAgent.indexOf("Windows 3.1") == -1) {
document.write('<SCRIPT LANGUAGE=VBScript\> \n');
document.write('on error resume next \n');
document.write('Sub lwnl_FSCommand(ByVal command, ByVal args)\n');
document.write(' call lwnl_DoFSCommand(command, args)\n');
document.write('end sub\n');
document.write('</SCRIPT\> \n');
}

//万年历壁纸对象构造函数
function wallPaper(){
this.cl_weekEnd = 0;//周末
this.cl_normal = 0;//默认
this.cl_jr = 0;//节日
this.cl_jq = 0;//节气
this.cl_nl = 0;//农历传统节日
this.cl_glTitle = 0;//公历年月(上)
this.cl_nlTitle = 0;//农历年月(下上)
this.cl_jrTitle = 0;//节日,节气...(下下)
this.cl_current = 0;//鼠标经过时的日期
this.cl_move = 0;//鼠标经过的指示块
this.cl_today = 0;//系统当日的日期
this.cl_bck = -1;//万年历是否透明(-1为透明)
this.bck_alpha = 5;//透明度(0透明,100不透明)
}

//设置万年历Flash显示风格
function setFlash(wall){
with(lwnlObj){
setVariable("cl_weekEnd",wall.cl_weekEnd);
setVariable("cl_normal",wall.cl_normal);
setVariable("cl_jr",wall.cl_jr);
setVariable("cl_jq",wall.cl_jq);
setVariable("cl_nl",wall.cl_nl);
setVariable("cl_glTitle",wall.cl_glTitle);
setVariable("cl_nlTitle",wall.cl_nlTitle);
setVariable("cl_jrTitle",wall.cl_jrTitle);
setVariable("cl_current",wall.cl_current);
setVariable("cl_move",wall.cl_move);
setVariable("cl_today",wall.cl_today);
setVariable("cl_bck",wall.cl_bck);
setVariable("bck_alpha",wall.bck_alpha);
}
}
</script>

将上面这段代码加入到您的网页源文件中，可以加在<head>与</head>之间，也可以是<body>和</body>中，若是有问题，呵呵，那就最好加在<head>中吧：-）
下面来说明一下这段代码，嗯，好象不用说了吧，都有详尽的注释在里面了：-）您需要修改的就是最顶上的那些节日，背景等颜色，以及透明度。

到这里，明眼的朋友肯定明白了为什么直接打开lwnl.swf会什么也看不见了吧:-) 因为，为了方便您定制显示风格，所以当Flash载入时不会自动显示万年历，它只是向装载它的程序发出已经装载完毕的命令，让程序来处理并设置显示风格，然后再通过setVariable("initCal",1)这条语句来手动启动Flash显示。
好了，至此您的个性化万年历就算是完成了。。。。

附注：您还可以将Flash放在表格里，再选一张图片做为单元格的背景，再透明显示Flash，相信会更漂亮啦。
您也可以查看一下所下载的文档说明，让Flash每隔一段时间更换一种显示风格....
若您有什么疑问，欢迎来信，我会尽可能地给您及时复函。mostone@hotmail.com 请用明显的中文标题。

3. Flash网页滚动菜单

下载: dy_menu.rar (示例)

动态生成菜单条，若菜单项有多页，显示翻页按钮．
菜单项目由HTML脚本设置,可方便用在PHP,ASP程序中.
源文件AS脚本有详尽注释,初学者也可很轻松读解.

MosCnCalendar 漠氏万年历(1901-2100)

Flash

Links