Monday, January 2, 2012

ipfilter updater

A small vb script that downloads ipfilter.dat for uTorrrent or eMule. Download and unzip subroutines were slightly modified from what I could find from the internet. eMule accepts symlinks, so it can share the same file with uTorrent.


url = "http://ip-filter.emulefuture.de/download.php?file=ipfilter.zip"
filepath = Replace(WScript.ScriptFullName, WScript.ScriptName, "")
zipname = filepath & "ipfilter.zip"

'download/unzip/cleanup
HTTPDownload url, zipname
Unzip zipname, filepath
CreateObject("Scripting.FileSystemObject").DeleteFile(zipname)

Sub HTTPDownload(strFileURL, strHDLocation)
    ' Fetch the file
    Set objXMLHTTP = CreateObject("MSXML2.XMLHTTP")

    objXMLHTTP.open "GET", strFileURL, false
    objXMLHTTP.send()

    If objXMLHTTP.Status = 200 Then
    Set objADOStream = CreateObject("ADODB.Stream")
    objADOStream.Open
    objADOStream.Type = 1 'adTypeBinary

    objADOStream.Write objXMLHTTP.ResponseBody
    objADOStream.Position = 0    'Set the stream position to the start

    Set objFSO = Createobject("Scripting.FileSystemObject")
    If objFSO.Fileexists(strHDLocation) Then objFSO.DeleteFile strHDLocation
    Set objFSO = Nothing

    objADOStream.SaveToFile strHDLocation
    objADOStream.Close
    Set objADOStream = Nothing
    End if

    Set objXMLHTTP = Nothing
End Sub 'HTTPDownload

Sub Unzip(ZipFile, ExtractTo)
    'If the extraction location does not exist create it.
    Set fso = CreateObject("Scripting.FileSystemObject")
    If NOT fso.FolderExists(ExtractTo) Then
       fso.CreateFolder(ExtractTo)
    End If

    'Extract the contants of the zip file.
    set objShell = CreateObject("Shell.Application")
    set FilesInZip=objShell.NameSpace(ZipFile).items
    objShell.NameSpace(ExtractTo).CopyHere FilesInZip, 16
    Set fso = Nothing
    Set objShell = Nothing
End Sub 'Unzip
 

Saturday, June 25, 2011

古董AIWA F660卡座

古董AIWA三磁头卡座,大概生产于八十年代中期。F660是这个系列的低端,之上有F990。此机内外保护的都很好,所有功能正常,完全看不出有三十年的历史。

电控轻触操作
杜比B/C降噪,录音电平和偏磁微调
内部很新,直插的是杜比线路板
双主轴单向走带机芯。变压器有点小
飞线密布
磁头,主轴和压带轮新的一样

古董HP12C


历经30年不衰的惠普12C计算器。从ebay上30块买来,跟新的一样。这一只是82年巴西制造,所以用3颗电池。新版的用1个锂电池,但是质量有所下降。该机所用RPN语法和我以前用的MRI图像重建程序一样,算是当初惠普财务和科学计算器的一个风格。

正面。很硬的注塑按键对得很整齐
背面。电池和简单说明

Sunday, May 16, 2010

Kindle DX汉化以及固件2.5升级

前几天装了这个DX的从2.3.4升级2.5固件, 感觉很棒。
2.5固件支持zoom和collection(相当于gmail的标签)
http://www.hi-pda.com/forum/viewthread.php?tid=602876&extra=page%3D2

我的DX是升级2.5之前就汉化的(通过安装usbnetwork来写系统文件),升级2.5以后汉
化仍然正常。听说2.5之后usbnetwork就装不上了,所以还没有汉化的DX升级要慎重。


PS: 通过安装usbnetworks安装脚本替换字体实现“另类”汉化的指南在这里
http://www.hi-pda.com/forum/viewthread.php?tid=572953&extra=page%3D1
这个方法在DX固件2.3.3或者2.3.4都应该可以。这是我认为Kindle目前最好的汉化方法。

Sunday, April 18, 2010

儿童换牙的小知识

最近关注了一下换牙的问题,有两个blog涵盖了常见问题。

丘立峰博客
http://hi.baidu.com/gebula/blog/item/0e77c8fcb69c5a80b901a084.html/cmtid/5968b1005d01568ae850cd35

新浪问答
http://iask.news.sina.com.cn/b/8258670.html

Sunday, March 21, 2010

阳阳的智慧

阳阳五岁多,还有四个月就满六岁,现在上kindergarten。阳阳平时的数学水平大概是个位数加减法,有时候需要手脚指头帮忙。学校只要求数数到25,但阳阳能数到到100以上。

今天买菜回来的路上,为打发时间开始问阳阳乘法概念的数学题。第一个问题是一个井3米深,小蜗牛掉到井里去了。小蜗牛每天能爬1米,几天能到井上?小家伙想了一下,“三天”。阳阳妈妈很高兴,“没学过乘法都能行!” 于是我开始问一个深一点的问题,“如果小蜗牛白天爬2米,晚上掉下来1米,要几天?”这其实是一个脑筋急转弯,我以前试过的所有小朋友都会上当,包括五年级时候的小表弟。小家伙想了一下,“两天”。为什么呢?妈妈很好奇地问。“因为爬2米,掉下来1米,第二天再爬2米的时候早就爬上来了!”

回家吃晚饭的时候阳阳妈妈拿同样的问题问外公。熟悉乘法思维的成年人不假思索地回答,“三天”。

Wednesday, March 17, 2010

HTC WM 6.5.x ROM pagepool 设置

最近给我的老Sprint Diamond刷了最新的ROM:  OMJ_Diamond_Sense_2.5_2012_23541_v1.2
因为要装中文字体和Tomtom,就想把pagepool稍微调大一点(从前用WM6.1的时候是调成了32MB)。结果发现这个ROM的pagepool设置不对。随package跟的pagepool changer也不能正确设置pagepool,它误报20MB的pagepool,实际上是24MB。正如我所料这个坊间广泛流传的pagepool changer可能从WM6.1以来就没有work过。

现在简单总结一下正确的设置方法,记录下来做个备忘录。基本方法参见 http://forum.ppcgeeks.com/showthread.php?t=43110  这个帖子是WM6.1的,到了WM 6.5要稍微变一下。经过实验,结果如下:

1. 解开压缩包的RUU_signed.nbh文件,用hex editor搜索如下字段。其实搜索a0开始10个byte应该就可以了。

  18 16 a0 03 06 16 a0 13 00 10 83 e5 8b bb ff eb

前两位是pagepool的大小,18 16是24MB。 以下摘抄自ppcgeeks tsab的帖子:

03 15 - Sprint Diamond WM 6.1 stock rom (1.09) default; 12MB dynamic (When viewed under Settings -> System -> Memory, you should have around 203.84MB of Total Program memory available.)
02 15 - 8MB dynamic
01 15 - 4MB dynamic
18 16 - 24MB static (should give you around 191.84MB Total Program memory)
10 16 - 16MB static (should give you around 199.84MB Total Program memory)

[PAGEPOOL EXPLANATIONS AND CALCULATIONS]


"XX 15" pagepools are dynamic based (first byte value multiplied by 4 to determine pagepool size)
"XX 16" pagepools are static based (first byte value multiplied by 1 to determine pagepool size)

03 15 = 0x03 * 0x400000=0xC00000=decimal 12582912 bytes = 12 MB dynamic pagepool
02 15 = 0x02 * 0x400000=0x800000=decimal 8388608 bytes = 8 MB dynamic pagepool
18 15 = 0x18 * 0x400000=0x6000000=decimal 100663296 bytes = 96 MB dynamic pagepool
18 16 = 0x18 * 0x100000=0x1800000=decimal 25165824 bytes = 24 MB static pagepool
10 16 = 0x10 * 0x100000=0x1000000=decimal 16777216 bytes = 16 MB static pagepool
20 16 = 0X20 * 0x100000=0x2000000=decimal 33554432 bytes = 32 MB static pagepool

2. 用hex editor把上述字段改成

20 16 a0 03 06 16 a0 13 00 10 83 e5 8b bb ff eb

3. 存盘重新刷ROM。开机剩余内存从104.75MB降低到97MB,少了大约8MB,正好是原来24MB pagepool到新32MB pagepool的差值。修改完毕,收工。

顺便说一句,Juicy, OMJ这些刷机cook ROM鼎鼎有名的人始终都整不明白pagepool怎么设,ROM cooker和他们cook的ROM质量实在让人担心。多数人估计就是浪费时间抓一堆dll凑来凑去。。。