分类： Other

郁闷。
从同事的箱子里面翻到了一个 LABTool-48编程器，从网上得到的资料来看，是相当牛X的兵器了。当然，因为年代
久远（从附件的手册上看，原先随机带的软件都是DOS下运行的）。上网找驱动和 XP 下的软件... 
...结果发现是一家台湾公司，网站上已经不提供支持LABTool-48这个型号了，需要升级为 LABTool-48XP，代价
是$500。汗，这个价格够买一台新的了（网上最便宜的报价是￥1500）。
最终找到了我这个型号的XP软件。
下面是找ROM试验。找了一圈，说起来很惭愧，我从Taobao上买了20个二手的ROM DIP封装的芯片。到了一看：居然是
开着“小窗户”，紫外线擦除的... ...立马退货。
想起来同事那边有，所要之。给/借我4块。
结果只有一块可以读擦写。另外的，2块是HOLTEK 的 HT27C512，不能擦除。我疑心是因为刷片机损坏的缘故。
今天找到data sheet一看：
General Description
The HT27C512 chip family is a low-power,512K bit, +5V electrically one-time 
programmable
(OTP) read-only memories (EPROM). Organized into 64K words with 8 bits per 
word。
囧，一次性写入的。估计剩下那个不能擦除的也是这个原因... ...

										Zoologist
										2008-12-29

Word 中超链接不显示问题的解决

wordtip1

 

 

 

下面的程序段（VBA）可以将Outlook中的联系人dump到文件中。如果你们公司有那种全部联系人的通讯录（全球联系人），

你可以先将全部联系人保存到你本机的联系人中，然后运行下面的程序。之后，你就可以在c:下面找到 Text.txt 。里面

包含了全部联系人名单和电话号码... ...2年之前，我就用这样的方法将全部联系人dump出来，编写Delphi程序以资源方式

引用，从而实现本地的地址簿。

程序不完善，虽然可以直接将DistroList中的写入文件中，但是不能保存Recipient的信息（组信息）。

											2008年11月22日
Private Sub copyDistroList()

On Error GoTo errHandler

    Dim myOlApp As New Outlook.Application
    Dim myNameSpace As Outlook.NameSpace
    Dim myFolder As Outlook.MAPIFolder
    Dim myDistList As Outlook.DistListItem  'source distribution list contains all contacts
    Dim myDistList1 As Outlook.DistListItem 'target distribution list containing contacts A-L
    Dim myDistList2 As Outlook.DistListItem 'target distribution list containing contacts M-Z
    Dim myFolderItems As Outlook.Items
    Dim myRcpnt As Outlook.Recipient

    Dim intIterateContactItems As Integer   'track contact items
    Dim intIterateDLMemberItems As Integer  'track distribution members
    Dim intCountContactItems As Integer     'count contact items
    Dim intCountDLMemberItems As Integer    'count distribution members within list

    Dim strSourceDistList As String         'source distro list name container
    Dim strTargetDistList1 As String        'target 1 distro list name container
    Dim strTargetDistList2 As String        'target 2 distro list name container
    Dim blnListFound As Boolean             'track if source distro list was found

     Dim objSAE      ' As Redemption.AddressEntry
     Dim myItem As Outlook.ContactItem

    strSourceDistList = "KS"          'name of source distro list
    strTargetDistList1 = "test1"        'name of target 1 distro list
    strTargetDistList2 = "test2"        'name of target 2 distro list

    'create Outlook objects
    Set myNameSpace = myOlApp.GetNamespace("MAPI")
    Set myFolder = myNameSpace.GetDefaultFolder(olFolderContacts)
    Set myFolderItems = myFolder.Items
    Set myDistList1 = myOlApp.CreateItem(olDistributionListItem)
    Set myDistList2 = myOlApp.CreateItem(olDistributionListItem)

    'intialize variables
    myDistList1.DLName = strTargetDistList1
    myDistList2.DLName = strTargetDistList2
    blnListFound = False

    Const fsoForAppend = 8
    Const PR_CELLULAR_TELEPHONE_NUMBER = &H3A1C001E

    Dim objFSO
    Dim objTextStream

    Set objFSO = CreateObject("Scripting.FileSystemObject")
    Set objTextStream = objFSO.OpenTextFile("C:\Test.txt", fsoForAppend)
     'replace with your filename & path

    'assign the count of all contact items to variable
    intCountContactItems = myFolderItems.Count

    'iterate through all Outlook contact items until the source distro list is located
    For intIterateContactItems = 1 To intCountContactItems

        'check to see if the contact item is a distribution list type
        If TypeName(myFolderItems.Item(intIterateContactItems)) = "DistListItem" Then

            'set the myDistList object as the DistListItem
            Set myDistList = myFolderItems.Item(intIterateContactItems)

            'check to see if the distro list is correct source list
            If myDistList.DLName = strSourceDistList Then

                'assign the distro list member count to variable
                intCountDLMemberItems = myDistList.MemberCount

                'iterate through all members of the distro list
                For intIterateDLMemberItems = 1 To 2
                'intCountDLMemberItems

                    'get the member name, create the recipient, and assign to object variable
                    Set myRcpnt = myOlApp.Session.CreateRecipient(myDistList.GetMember(intIterateDLMemberItems).Address)
                    Set myItem = Application.CreateItem(olContactItem)

                    'ensure the recipient can be resolved in the Exchange director
                    myRcpnt.Resolve

                    'is recipient name resolved?
                    If myRcpnt.Resolved = True Then
                    Set objSAE = myRcpnt.AddressEntry

                            objTextStream.WriteLine myRcpnt.Name

                       myItem.FullName = myRcpnt.Name
                       myItem.Email1Address = myRcpnt.Address
                            objTextStream.WriteLine myItem.BusinessTelephoneNumber & "sss"

                       myItem.ForwardAsVcard

                       myItem.Save

                    'if recipient is not resolved then warn the user and move on to the next distro list member
                    Else
                        MsgBox "Sorry, I could not resolve the email address for " & _
                                myDistList.GetMember(intIterateDLMemberItems).Name & "." & _
                                vbCrLf & "Please write this information down and verify." & _
                                vbCrLf & "I will move on with the list.  Click okay " & _
                                "to continue.", vbOKOnly + vbCritical, "NOT RESOLVED"
                        Resume Next
                    End If

                    'Debug.Print myDistList.GetMember(intIterateDLMemberItems).Name & _
                                ", " & myDistList.GetMember(intIterateDLMemberItems).Address

                'get the next member of the distro list
                Next intIterateDLMemberItems

                'save the new distro lists
                myDistList1.Save
                myDistList2.Save
                'source distro list was found, so set variable to true
                blnListFound = True
                'since the source distro list is found, there is no need to continue with the contact items iteration
                Exit For
            End If
        End If

    'get the next item within Contacts
    Next intIterateContactItems

     'Close the file and clean up
    objTextStream.Close
    Set objTextStream = Nothing
    Set objFSO = Nothing

    'raise message box if source distro list was not found
    If blnListFound = False Then
        MsgBox "Your Source Distribution List was not found", vbOKOnly + vbInformation, "DISTRO LIST NOT FOUND"
    End If

setAllToNothing:
    'end of subroutine, so ensure all objects are emptied
    If Not myOlApp Is Nothing Then
        Set myOlApp = Nothing
    End If

    If Not myNameSpace Is Nothing Then
        Set myNameSpace = Nothing
    End If

    If Not myFolder Is Nothing Then
        Set myFolder = Nothing
    End If

    If Not myDistList Is Nothing Then
        Set myDistList = Nothing
    End If

    If Not myDistList1 Is Nothing Then
        Set myDistList1 = Nothing
    End If

    If Not myDistList2 Is Nothing Then
        Set myDistList2 = Nothing
    End If

    If Not myFolderItems Is Nothing Then
        Set myFolderItems = Nothing
    End If

    If Not myRcpnt Is Nothing Then
        Set myRcpnt = Nothing
    End If

    Exit Sub

errHandler:

    MsgBox Err.Number & " " & Err.Description, vbCritical + vbOKOnly, "ERROR"
    Resume setAllToNothing

End Sub

 

网站再次恢复。原来的域名 www.begin.org.cn 无法恢复，只好重新请Nihg帮我申请了新的域名：www.asdqwe.cn 貌似很奇怪的名称，也没有意义，不过你在键盘上多输入几次就知道还是很方便输入的了。转眼间，之前的页面竟然用了快3年，正好借这个机会重新做了一下网站。之前的页面是这样的。我是用的是 Free website templates 网站提供的模板。看上去非常简洁的风格，我很喜欢。网速慢的朋友浏览的速度也会很快。

西行漫记

 

（音乐）

旁白: 师徒三人前去西方取经，一天经过关村，中部，俗称中关村。

 

悟空：师傅前面有妖气，此乃凶兆！

八戒：摸自己胸部… ….

唐僧: (看八戒) 哪里哪里？

（三人走，转场）

 

白骨精：(上场)身份证 毕业证 结婚证 光盘 VCD，要不要？

八戒：(害羞表情)有片么?，有李亚鹏配音的么

白骨精：有。

八戒：（兴奋）有日本的么？

白骨精：有。

八戒：（激动）有带字幕的吗？

白骨精：(迟疑)有。

八戒：（更加激动）有李亚鹏配音的么？

白骨精：(尴尬无语)… …

 

唐僧：八戒，你又犯戒了~（一把拉过八戒，自己上前）

（严肃认真）这位施主，我们自东土大唐二来，旅途劳顿，准备买点发票回大唐报销。

白骨精：（四处张望一下）有，要多少？

唐僧：（兰花指，计算状）区区3000两而已~ 敢问施主，是机打还是手撕？我可只要机打的。

白骨精：随我而来… …

 

(悟空上场)

 

悟空：（看到白骨精，大叫）妖怪啊~ （上前，挥棒）

白骨精：叫“条子来了”。

（悟空拉着白骨精，到角落，挥棒打之）

八戒：（伸脖子）我的光盘……

唐僧：发票….

（悟空回来）

唐僧：你以为你是城管吗，怎么见人就打啊~ 不是已经答应师傅，为何还如此冥顽不化！

（悟空，生气，无语）

 

旁白：悟空一气之下，回了花果山。刚刚赶走了悟空，突然平地挂起大风（风声）

唐僧：打雷了，沙尘暴又来了。

（一个mm上场将唐僧卷走）

八戒：（喊）师傅，等一等！

唐僧：（甩头，回头一笑）用了飘柔更自信。八戒你就别追了，别误了师傅的好事。

 

八戒:（犯愁，思考状。拿出阳光服务卡，面相观众）800 Call Center。

旁白：普通话服务请按1，英语请按2。

八戒：我选1。

旁白：东北话，请按3；河南话，请按4；不需要服务：请挂机。找观音姐姐聊天，请按1277867（快速读）。

八戒：我靠，我还得再听一边？

旁白：观音117 为您服务

观音：喂，你好，观音在线。有什么需要帮助的？

八戒：姐姐，我唐僧师傅被妖精抓走了。

观音：您是我们的VIP用户，我们可以为您提供定点清除服务。

八戒：（自言自语）我还等着光盘哪。（对电话说）有其他服务么？

观音：您是我们的VIP用户，我们还可以提供上门服务。需要请按#。

旁白：（嗖）

(观音闪现，八戒下了一跳)

八戒：我靠，怎么一点声音都没有。

观音：你没有听到“嗖~”的一声么。

（观音姐姐拿出一本宝典，交给八戒）

观音：（深情）你要么？

八戒：（点头）我要~

(观音不松手)

观音：你要你就说，你不说我怎么知道，你说了我又不是不给你~

（双方用力抢，八戒忍无可忍，双手抓过）

 

旁白：此后，八戒研究MOT…….(Z.t注：我上的就是这个课，根据需要可以修改为3DB，八个要脸八个不要脸的都可以)

旁白：第一页：与练此功，必先自宫。

（八戒出门，惨叫，冲马桶的声音，转身回来）

八戒：（高叫）我悟到了（仰天长啸）大师兄终于不用被fair了

 

旁白：转眼间，八戒来到了花果山，找到了悟空。将宝典交给了悟空。

悟空：（看八戒）二师弟，怎么变白了？

八戒：大师兄，你也变胖了。

旁白: 说话间，悟空翻到了第一页。

悟空：（深情的看着八戒）二师弟辛苦了。（递给八戒一杯水）

八戒：没什么，我只是失去了一点点。以后还可以加入演艺圈（juan）。

（悟空继续看）

旁白：第二页，如不自宫，也可成功。

八戒：喷水，

吾空：MOT Moment of Tolit 师傅有救了，行动！

 

 

 

 

场景：美女给唐曾捶背。

唐僧：（对八戒）八戒你怎么来了，快跑吧，这年头你的肉比我值钱多了。

（对悟空说）悟空你也来了，我们公司离职3个月内不允许回来的。

美女：对唐僧说：先生你已经到钟了

唐僧：记得给我开发票哈。台头写上：Senovo。

悟空：师傅你身后的女人是妖精，怎么办？

唐僧：人是人她妈生的，妖是妖她妈生的，我们要有一颗仁慈的心。 让她走吧。

 

大家齐唱 Only You

 

 

环境变量PathExt的介绍

pathext

            五三记 中关村的水啊深又深

      又是“五一”，这是我在北京度过的第一个劳动节，三天假期。

      本打算去“家*乐*福”看看热闹，正好有事情，没去成。等到有空了，在网上

搜索“家*乐*福”惊奇的发现无论是baidu还是google都表示“这个东西不存在”。汗。

缩短关键字绕过去，找到某人的blog，似乎什么都没发生。想必也是真的没有发生

什么吧，大家还是相应了xxx的号召，度过了一个平和安详的劳动节。

      3号，被隔壁装修的电钻吵醒。起来准备上街。天色昏暗，一眼望去，竟然有黄昏

的错觉，天，非常严肃的阴沉着。带伞，外套。逛街去了~

      先去银行，开通可以支付的网上银行，交水煤气费会省事许多，到了北大北门只见

上面挂着横幅“庆祝北大建校110周年”。有很多人在照相，白天照出夜景效果。我拿出

手机拍了张，回来一看：果真是夜晚的效果，除了灯泡耀出的光点，其余部分一片漆黑。

回来baidu一下，“北京大学创建于1898年”，历史真的蛮长的，同西南交大有得一拼。

清华建校于1928年，原来以为他们是一起建立的。现在知道北大是清华他爹那辈的了。

     天色越发阴沉，仿佛晚上七八点。路上的车都打开了前灯，楼中也都开了灯。

走着走着，我头顶一闪，心中一紧，不由得快“走”了起来。虽然江湖传闻，雷公雷母

只打坏人，但是，没准有打歪的时候。一阵小跑，穿过马路，翻越护栏，冲进了工商

银行。刚进门，伴随着巨大的雷声，外面的雨下起来了。

     这家银行位于中关村图书大厦附近，周末人很少，莫非是因为附近没有住宅区？

门口牌子上提示，您可能需要等待20分钟，但是排号大约只有2分钟就到了。我要开户，

实践证明，银行之间关于网上银行的规定差别还是挺大的。比如，招商银行，只容许

开设一个网上银行账号，其余的无论你是在什么地方办的账号只能挂在这个账号

下面。我去开户的时候，对方突然问我以前是不是开设过账号？我想了一下，敢情

1999年在学校的时候开过，里面还有50元，卡还在我手中，密码已经忘记了很多年。

工商银行，你可以开多个。比如，我在昆山开过一个网上银行，现在北京又可以开一个。

刚开始服务小姐不知道，本打算将昆山账号帮我注销掉。后来才发现可以同时开设2个的。

    之后我又去中关村图书大厦转了一圈，书非常多，办个会员卡就可以打8折，和网上

购书差别不大，最主要是网上购书配送总是瓶颈。转了2个多小时。相中了几本书，用手机

拍下封皮，等以后有时间有精力再来买。我现在最大的问题是没有时间和精力来看书。

床上一本《联想风云》，已经翻看了个把星期，竟然还没有看完，惭愧之极。

    中午吃的麦当劳，注意到他的门都是从里面向外推的，后来又光顾了一下肯德基

（不是吃东西）发现它的门也是这样的。不知道其他的麦肯店是不是也是这样的呢？

吃麦当劳，点了一份套餐，装可乐的是非常夸张的带吸管的塑料杯。端的时候，服务员

特地提醒，请用双手，容易翻... ...等我坐下了，边上来了几个学生就给我表演了一下

单手拿托盘，他们的杯子哗的一下翻了~ 水淹七军。

    顶风冒雨，打算去买个小灵通，公司晚上经常开电话会议，只有固定电话或者小灵通

接入才是免费的，而我的住地没有固定电话，一般是在楼下的IC卡机器上拨打。拨打免费，

但是，深更半夜，一个精壮的男人，胯下红色的自行车，占着电话机一言不发，一听就是

1个小时，难免招来怀疑的目光。

    海龙，鼎好门口聚集着很多拉客的人，他们用“秃鹫”的眼神打量着每一个过往者。

口中念到，数码相机看一下，笔记本电脑看一下。有时候还会拉你，让人很不舒服。据说

他们给拉上一位客人到某个摊位，就会有几十元的提成。转了半天，智能手机很多，黑莓

手机很多，小灵通没有。

    转出去，准备到对面的科贸看看。过了马路，对面有一家华信通电讯，店面挺大，看起

来很正规。进去问了一下价格，感觉不贵，就在那里买了部ZTE V190，花了399，又买了张

充值卡。回来上网一查，这部小灵通报价在100-150，被人宰了。更不幸的是，我发现

将小灵通的SIM卡，放在公司的小灵通上竟然也可以用。早知道买个号码就可以了。

    总结：中关村水很深，到哪里买东西最好现在网上查询好。然后，进去只买你查好的那个

东西，其余不计。唉，这次是花钱买个教训吧。

三无产品：管理小故事

三无产品：管理小故事 最近又看余世维先生的管理讲座，发现他基本上不用那种管理小故事来说明问题了。许多年前， 他的管理讲座中有很多小故事，比如日本人参观北洋水师的定远号，伸手一摸发现炮管里面灰很大， 必定平常疏于打扫，于是断定舰队没有战斗力；还有镇远在船尾晾衣服… … 上班4年，每月的早会都会有一个台干来“分享管理小故事”。我们的喇叭通常只认女人，尖锐的 声音很容易从中播出，而男人的声音听起来多像狗叫。偶然有几个能让人听得清楚的男人讲述的管理 小故事必定是“从频谱功率上来说，高音部分功率谱密度较大”。因此，几年下来还记得的小故事不多， 有一个是卖鞋的去非洲市场调查，悲观的人报告那边的人没有穿鞋的习惯，所以我们没有市场；乐观的 人调查结果是，那边市场很大，大家都光脚… …讲这个故事的时候，我一直在疑心话锋一转会讲应该 先给当地的医生卖钉子，再买治疗脚伤的药品和工具，最后卖鞋子—-这样的做法称为营销（一次我去 测试组转悠，有一个dd在复习准备考试，其中的一道填空题是“营销的目的是创造需求”）。还有一个 有点印象的故事是动物园的斑马经常跑出来，于是管理部门不断加高围栏，结果斑马还是能跑出来。后来 斑马和邻居长颈鹿聊天说“如果他们继续忘记锁门，围栏再高我也会跑出来”。 我已经过了喜欢这样的小故事的年龄了。并且这样的小故事多是“三无产品”，同江湖传闻中那些 “吃人的树”和“神秘的金字塔”等等很类似。好比现在告诉我说某人，小时候特别笨，长大了学习也不好， 后来坚持读书，读到了博士，引申出来不断坚持，不断进取再笨的人也可能成功。我一定摇头不相信， 现实中，这样的事情发生的唯一理由是他有很多好爷爷或者爸爸。 以前还有个经典的管理小故事：说某家牙膏厂，面向员工征集提高销量的办法，许诺重金奖励， 在各种方案中最终采纳的是非常简单的方案“加大牙膏口1mm”… …当时我觉得这个是非常好的主意， 直到有一天我突然发现这个方法不能保证降低成本甚至会很愚蠢。是这样的，我在床上喝矿泉水，一瓶是 农夫山泉，另一瓶是娃哈哈的。我试验将农夫山泉的瓶盖拧在娃哈哈上，竟然严丝合缝，反之亦然。为什么 这样是这样的？原因很简单：标准化工业生产。制造饮料的公司，如果连瓶子瓶盖都要自己生产，那他 肯定是国企。“正常思维”的企业都会找其他公司直接买，自己把关质量就可以了。从外面买能降低很多成本。 而生产瓶盖的公司则会采用同样的模具为不同家生产，这样，不同牌子的矿泉水瓶盖相同不足为奇了。再回 到上面的小故事，你就会发现这个故事的荒谬之处了。修改口径之后，装牙膏的容器要重新设计，盖子也要 重新设计。这些是很大的花费。 若干年前，还有个经典小故事：说一个拾荒者与众不同，善于思考，别人只是捡易拉罐，而他花了600块 到金属研究所测试了易拉罐中各种金属的含量，发现其中有很多有价值的金属，于是自己开始提炼这些金属。 这个故事告诉我们要多观察，多思考，多动脑。后来，我在《知音》杂志上看到了一篇类似的文章，颇感惊讶。 开头都非常相似，那个人提炼金属，很快发家致富，老婆都娶了5个。最后的结局是进监狱了，不是因为重婚， 而是因为他偷电。融化金属需要大量的电，他在输电线上做手脚… …我宁愿相信这个故事是真是的，很多 东西我们不去做，原因很可能是成本太高。这样说说似乎有吃不着葡萄就说葡萄是酸的意味…… 房屋都是有使用寿命的，哪怕你修建之时用料再扎实也是这样的。国外有很多旧房屋改造加固的项目， 有人看好这样的项目，希望引入国内。但是经过一番考察发现这是不可能的，原因是：成本太高。国外，这样的 项目费用通常接近重新建造。而国内，这样高的成本来维护旧房子，人们根本不接受。或者一拆了之，再建 新房。 总而言之，事物是诸多因素交织在一起的，单独的强调某个方面是不科学的，甚至与真实的决定因素大相径庭。 我想也正是因为这样的小故事过于捕风捉影，正龙打虎，余世维先生在他的讲座中也不愿意使用了吧？ Zoologist 2008-4-23

离职指南

			离职指南

    许许多多年以前，偶然父亲听说单位（大型国有企业）有两个“人事干部”。一个负责

“进口”，就是负责考核招聘干部；另一个负责“出口”，基本上工作就是送葬等等善后工作。

据说前者脾气非常好，态度也非常好，后者与之截然相反。后来我接触到心理学，尝试着

使用心理学的观点进行分析，有很多种解释。不过现在想起来，这个和心理学什么关系都

没有，完全是利益的问题：你招聘的时候谁知道进来的人是领导的七大姑还是八大姨？

谁知道招进来的干部是否会成为他的上司？而负责出口的则完全没有顾虑，他“送出去”的

干部永远不会再见的。

    通常与XX课打交道非常痛苦，因为他们总是认为很多事情都是常识，比如：政府公文

“都”必须用黑色水笔填写（黑色圆珠笔不行，蓝黑色钢笔不行）。当我说我不知道的时候，

人资一个mm用惊异的表情看着我，仿佛她刚知道自己吃下了什么似的。其实，我要问问她

身为一个在主板制造为主的公司呆了n多年，你可知道当今最流行的 LGA775接口的CPU有

多少脚，她肯定回答不正确----没接触过，谁TMD知道啊！

    闲话不提，下午三点之后，到人资取离职单。主意必须是三点之后，这样的刻意安排让我

很不理解。也许是上峰考虑经过一天紧张激烈的工作，应该让手下放松一下，找机会发泄

一下吧。早于这个时间去，通常他们会用瞪着绿豆的眼神看着你，说三点后过来。如果此刻

心情不好，必定补充道“你们有看到过通知么”？仔细回想起来，还真没少收过各种龟“腚”。

不过时日一长，总是不清楚哪里是头哪里是尾的。

    记得带一支笔，他们那边没有多余的。会让你填三份单子。还要找到最近一次的合同交

上去。如果没有的话，说说好话，借他们的复印一下。这里我非常怀疑他们把我当成日本鬼子，

我问是否可以借来复印的时候，某人居然一口咬“腚”说他们没有，都上交了... ... 多问几个

人就好了，总会有人说漏嘴的。另外，还要交上去一份什么户籍证明，档案在人力资源有限

公司的，需要去青阳路的劳动局打印出来，收费是2元。尽量多打电话问问先，这方面，昆山的

政府部门还是非常不错的。需要注意，公司在这里还有个“腚”，打印完证明之后，必须去派出所

盖章。劳动局的工作人员说，其他公司都没有这个手续的。

    然后，把三份单子，合同，户籍证明，交上。换来一张移交手续办理单。去成仓，零仓找人

签字。正常情况下不会有什么问题。法务也不会有什么问题。之后跑电子公文，将能转出去的都

转出去。财产将会是非常麻烦的事情。东西很多的话你就有种被当作土豪被“打”的感觉。你还会

发现名下会平白“多”出很多东西。最常见的就是“不小心”，工作机里面的东西在外面又列出

一次。遇到这种情况，最好及时解释清楚，能早解决就尽量早解决，也给后继者方面的，大家

都是同事，枪口对外。我们这时候也要理解YY课的行为，他们不琢磨多点事情怎么体现价值，

怎么表现很忙碌的样子，此之谓“有困难要上，没有困难创造困难也要上”，是也。

    上面的东西签下来，大约要2天时间。之后可以去找会计签字。他要检查你的财产是否已经

清理干净。他们使用ERP的网站查询，ERP会比电子公文再慢上3-4天（YY课自己承认的）。也就

是说，你的电子公文中可能什么东西都没有了，但是ERP上还有一大坨。解决方法是将跑完的电子

公文打印出来，给会计看一下。保存好这个电子公文，说不定后面还要给总务课show出来。

    顺便提一句：除非你有特别的信心----比如老大渴望你马上滚蛋，或者你爬的职位足够高，

否则，报废物品上缴的时候，千万要记得，找那个“没收”你物品的人签名留作纪念。我在去年报废

几样物品，上缴时说非常敬仰，好不容易瞻仰到容貌，请他签了字（先见之明，事实上当时我说

的是“哥们我信不着你”）。果真，即至离职的时候惊奇的发现报废单跑了4个月居然没有跑完。

而没签的人，恰好是XX课“最有常识的人”。找她的时候，她竟然和我要看报废的东西。不过好

在我拿出那张签字的单子，她最后没有抵赖。前车之鉴引以为戒，害人之心不可有。

    余下还有总务课要签字，退工衣之前必须先退水卡才可以。退这些东西的时候要记得

带上那个离职单，否则去了也没有用。需要注意，他们不会主动给你免穿工衣卡，除非你还有

工衣，否则警卫会找你的麻烦。ps:他们就没有给我，也许这个又是我不知道的常识：（

    还有取消资讯权限，要通过电子公文申请取消，这样做多少有点自废武功的意思。

    最后，找老大再签字。交给人资，他们会给你一个小纸片，上面注明日期。在那个日期的

 12之前必须离开公司，隐约仿佛宾馆客栈。不知道如果商量一下过几天再走是否可行？

    还有一项非常非常重要的事情就是离职单。公司规定是你离职之日之后的15天。如果你是

4日走的，那么19日左右才能拿到这个单子。并且这个单子对于你入职来说非常重要。

很多大公司必须凭借这个单子才能报道。因此在开始最好计算清楚。通常可以和对方公司

商量着来的。多出来的时间你可以用来熟悉环境，或者像我一样，用这些时间认真钻研2个

单机游戏。

    最后的抒情：当我摘下胸口的钥匙交上去之后（不好意思，幼稚了，我一直把寝室

钥匙挂在了胸前），再戴上工牌，就隐隐的觉得胸口少了点什么。木然回首（工程师做久

了人都这样），我已经在公司呆了四年。从面带青涩，慌张应付客户的毕业生，成为

即使对待FAE也是连唬带蒙的工程师。四年间我改变了很多。床铺，我已经睡了3年（第一年

睡上铺），已经符合人体工程学（床板某处裂了，碎了）。

    天是阴沉沉的，大雄在我身后用力的挥着手，亲爱的朋友们，我们不知何时才能够再次

相见；不知何时我才能对你们再说一次“I am back!”

                                                                    Zoologist
                                                                    2008年4月5日

汇编语言作业的作弊方法 本文程序和工具

ah                    		汇编语言作业的作弊方式

    帮着朋友写汇编语言作业（好像从小到大我经常帮别人写作业），前后花了一个星期，没写出来。感觉很糟糕，

出题老师疯了，居然要求学生用汇编语言写学生成绩管理系统。要求“能够实现菜单显示、菜单选择、编辑（录入、

插入、修改、删除等）、查找、显示、求总成绩、按总成绩排序（高→低）并显示、装入数据文件、数据文件存盘、

退出、为数据动态分配存储空间等功能”。这样的要求仿佛是给学生火柴棍和502胶水，要求制作能装人的船----

理论上完全能实现，实际上可行性不高。

    既然没写出来，自然要琢磨“歪门邪道”。方法就是用C语言直接写出功能。编译之后有2条路可以选择：

1.反编译为汇编语言；2.插入在汇编语言中。

    花了大约4个小时编写了简单的C语言程序，用TC3正常编译，生成 xy.exe 再使用 exe2bin 生成 xy.com文件。

不清楚什么地方的问题，最开始使用TCC -mt -lt xy.c 可以直接编译为 xy.com 文件。选择生成 com文件的原因是

它没有段切换的问题，使用非常方便，也足够小。

    xy.com的大小是18,576byte，一般来说汇编程序的源程序大小是它生成的机器代码的7-8倍。反过来估计，

如果手写汇编，完成这些功能就需要大约 140000byte 的源程序... ...这就是我说出题老师疯了的原因......

    使用IDA 5反编译，结果太难看懂了，估计老师一眼就能看出来“代码不是人写的”。顺便提一句：IDA5的功能

好强大，反编译后直接能够生成程序的流程图（接近）；使用IDA4 反编译了一下，结果也过于复杂，整理起来非常

困难。

    看起来想直接反出来汇编程序这条路走不通。

    第二条路，用汇编程序包括这个文件，这个是名副其实的“作弊”，不过看起来更专业。我想如果有汇编语言老师

能看到我的这个文章，并且发现有同学用我这个方法，不妨放他们一马吧，你的题目太难了能理解/想到这个方法的人

就是对汇编认识很深刻的了。

    具体方法，用工具 bin2inc 将 xy.com 转化为 x.inc,然后将程序写成这个样子：

.model tiny

;为了表示你是一个认真的同学，这里可以插入宏

.data

;为了表示你是一个专业的同学，这里可以插入数据定义

.code

;为了表示你不想让老师一眼看出问题的同学，这里可以插入过程

.startup

	include x.inc

;为了表示你写了很多，这里可以插入代码

.exit

end

    实际上，程序的关键只有 include x.inc 这句话。

    交作业的时候，需要交上上面的程序和x.inc 。

    最后的话，我将东西做完，交给朋友。朋友没同意，觉得 x.inc 太难解释清楚。后来不得不再花了十几个小时给他

写纯汇编语言的作业。未来如果有一个以生成汇编语言代码为目标的简单C编译器，中国学生的汇编语言作业将不会是

什么难题。

                                                                                          Zoologist
                                                                                          2008-4-12