2008-03-19

典型软件开发

一张经典的老图, 无意中发现英文原版和繁体版.

2008-03-09

谁来为虚拟维权?

以下为手机短信内容: (2008-03-07 17:07)

因公安局网监处调查取证需要, 您空间所在服务器暂不能开通, 公司争取尽快取回数据, 已先为您重建站点, 您可以自行上传数据备份.

2008-03-01

Hello F# 我的第一个AutoCAD+F#程序

#!fsharp
// 使用 F# 缩略语法
#light

// 声明独有的命令空间和类
module FsTest.DrawLine

// 指定包含文件夹
#I @"D:\\AutoCAD 2008"

// 引用托管
#r "acdbmgd.dll"
#r "acmgd.dll"

open Autodesk.AutoCAD.Runtime
open Autodesk.AutoCAD.ApplicationServices
open Autodesk.AutoCAD.DatabaseServices
open Autodesk.AutoCAD.Geometry

// 声明命令
[<commandmethod  (?DRAWLINE?)>]
let DrawLine () =
    let line = new Line(new Point3d(0.0, 0.0, 0.0), new Point3d(3333.0, 3333.0, 0.0))
    let db = Application.DocumentManager.MdiActiveDocument.Database
    use trans = db.TransactionManager.StartTransaction()
    let bt = trans.GetObject(db.BlockTableId, OpenMode.ForRead):?> BlockTable
    let btr = trans.GetObject(bt.[BlockTableRecord.ModelSpace], OpenMode.ForWrite):?> BlockTableRecord
    btr.AppendEntity(line) |> ignore
    trans.AddNewlyCreatedDBObject(line, true)
    trans.Commit()

#!csharp
// 下面是才鸟老大在 DotNetARX 帮助文件中, 第一页 Geting Started 的第一段 C# 示例.
// 对比一下还是蛮像的嘛~_~
Line line = new Line(new Point3d(0.0, 0.0, 0.0), new Point3d(3333.0, 3333.0, 0.0));
Database db = Application.DocumentManager.MdiActiveDocument.Database;
using (Transaction trans = db.TransactionManager.StartTransaction())
{
    BlockTable bt = (BlockTable)trans.GetObject(db.BlockTableId, OpenMode.ForRead, false);
    BlockTableRecord btr = (BlockTableRecord)trans.GetObject(bt[BlockTableRecord.ModelSpace], OpenMode.ForWrite, false);
    btr.AppendEntity(line);
    trans.AddNewlyCreatedDBObject(line, true);
    trans.Commit();
}

2008-01-28

这不是斯巴达

是的, 这不是斯巴达. 那是什么呢? 反正不是斯巴达…

相信很多人都看过三百斯巴达勇士这部电影, 如果你还没有, 那么赶紧去补课吧, 相信我不会错, 这绝对是去年年末一部非常值得观看的电影.

电影讲述的是公元前480年, 波斯王薛西斯率50万铁骑攻向希腊. 斯巴达国王率300人对抗数10万波斯大军的故事.

那么第二幅图片是什么? 这不是斯巴达. 是的你没有看错, 这就是电影的名字.

其实了解这部影片并不难, 你只需闭上眼睛去回忆一下三百斯巴达勇士, 就能得到大至的故事框架以及所遵循的发展节奏…

不过你需要对原作有所了解, 并且还要对欧美文化有所了解, 才能真正领会电影里处处让人大跌眼晴的恶搞.

BTW: 看第一部电影的时候别太激动, 看第二部电影的时候别吃零食.

2008-01-22

冰灾

由于罕见暴雪冻雨灾害, 造成电力铁塔覆冰, 火车飞机停运, 高速公路拥堵, 并导致数以万计的春运旅客滞留在了回家的路上.

现代社会人类对于科技的依赖性加重, 一旦发生自然灾害, 无法体现自身的本能. 试想一下, 如果这场暴风雪发生在数百年以前, 或许根本不是灾害, 而是百年奇景, 吸引文人舞文弄墨.

而我们现代的人类却完全笑不出来了! 看看我们丢失了哪些本能!

视力: 停电后我们会处在一片漆黑当中寸步难行, 蜡烛对我们来说实在是太过微弱, 在光污染如此严重的今天, 我们早已失去了夜间观察的能力. 要知道古时候点着煤油灯就算是”灯火通明”了.
取暖: 如今人们的取暖方式, 北方以煤为主, 南方以电为主, 这次的灾害正是由于天气影响电力, 电力影响运输, 运输影响煤炭, 煤炭又影响电力的恶性循环造成的, 现如今, 你一定不会指望有谁能在没有煤和电的情况下取暖, 对于我们的先人, 劈柴生火是再平常不过的事儿了.
交通: 交通的发达让世界变得越来越小, 我们正不断的提高运力和速度, 让人们可以更加容易的远行, 现在的孩子几乎不会有步行数公里的经历, 便捷的交通工具让他们对红军长征二万五千里没有任何概念.

但愿用失去的这些换来科技的繁荣, 是值得的…

更多图片

2008-01-21

Windows 2003 安装 Windows Live Writer

作为Bloger, 你一定听说过微软公司出品的Live Writer. 当它还是beta版的时候, 我就已经下载过了, 安装时提示我不能在Windows Server下安装, 又见微软的这套把戏, 用产品来加深操作系统的界线, 感觉十分不爽. 且不说软件的好坏, 总该让我看看长的什么样子才死心啊!

时隔数月, 无意中找到了从安装包中提取出来的.MSI文件, 可跳过对系统版本的检测, 双击安装, 无任何可选项, 安装后在开始菜单Windows Live目录里打开, 2008简体中文版.

网盘下载

PCHome下载

另外还有一种方法就是使用便携版, 不过像这样的软件, 实在是不知道便携的意义何在, 请根据实际情况自行选择.

便携版下载

记得需要.NET Framework 1.1以上哦~

OK~ Enjoy it~!~

2008-01-19

VLisp 读取网卡 MAC 地址

使用Lisp语言读取MAC地址, 目前最合适的方法是通过WMI实现. 但是网上可查到的几种方法都有一个弊端, 就是通过识别ID为”本地连接”的设备来读取MAC, 并且标注为仅支持中文系统.

事实上这是行不通的, 如果你研究过系统的克隆, 你就会发现,”本地连接 2”是XP系统经常出现的一个问题.

在DOSLib 6.1中也具备读取MAC的函数, 但是貌似实现的方法是读取最后一个MAC地址, 当你把一个Windows Mobile 系统的手机连到电脑上, 它竟然返回手机的MAC…

经过对流行代码的少量修改, 写出了一个能返回所有设备MAC地址列表的小程序, 源码如下:

;;; 获取网卡MAC地址
;;; 对win2000系统的兼容性未做测试
;;; 暂不知道是否会读取到非网卡设备
(defun macaddr (/ mac WMIobj con lox sn)
  (vl-load-com)
  (if (setq WMIobj (vlax-create-object "wbemScripting.SwbemLocator"))
    (progn
      (setq con (vl-catch-all-apply 'vlax-invoke (list WMIobj 'ConnectServer "." "" "" "" "" "" 128 nil)))
      (if (vl-catch-all-error-p con)
        (setq con (vlax-invoke WMIobj 'ConnectServer "." "" "" "" "" ""))
      )
      (setq lox (vlax-invoke con 'ExecQuery "Select * From Win32_NetworkAdapter"))
      (vlax-for i lox
        (if (vlax-get i 'NetConnectionID)
          (progn
            (setq sn (vlax-get i 'MACAddress))
            (or
              (member sn mac)
              (setq mac (cons sn mac))
            )
          )
        )
      )
      (mapcar	'vlax-release-object
        (list lox con WMIobj)
      )
    )
  )
  (reverse mac)
)

2008-01-10

魔兽争霸3英雄开场白

发现了一个叫WinMPQ的软件, 可以编辑.mpq文件, 于是把War3里英雄开场白提取出来了.

魔兽争霸3英雄开场白

压缩包内共21个文件: 人族4个兽族4个精灵4个亡灵4个娜迦海妖黑暗游侠兽王熊猫酒仙深渊魔王

文件信息内已经注明英雄名字, 还有开场白的中英文对照. 剑圣未翻译.

目前尚缺: 火焰领主炼金术士地精修补匠文件名实在是找不到, 如果你知道哪里有, 请留言!

2008-01-10

MacBook Air

长度 : 32.5 厘米
宽度 : 22.7 厘米
厚度 : 0.4 - 1.94 厘米
重量 : 1.36 千克

CPU : Intel Core2 双核 1.6GHz (可选 1.8GHz)
内存 : DDR2 SDRAM 667MHz 2G
硬盘 : PATA 4200转 80G (可选固态 64G)
显卡 : Intel GMA X3100 144M共享显存最高分辩率输出19201200
屏幕 : 13.3吋宽屏 TFT LED 分辩率1280800
网络 : Wi-Fi无线网络 IEEE 802.11n 内置蓝牙2.1
声卡 : 模拟音频输出
接口 : USB2.0 微型DVI
内置 : iSight摄像头音声道扬声器全方位麦克风
电池 : 5小时