分类目录归档:日子

要不要去献血

  惭愧地说,我至今都没有献过血。大学的义务献血我直接没有打招呼就放了鸽子,事后也没有人抓着针头来找我。在以前公司楼下和东大的校园里也看到过好几次献血车,但都没有勇气跑过去。每次体检虽然血液检查都有一堆项目,但就是没有血型,目前我还不能确定自己的血型,我妈说她是B型,我爸说当兵的时候验过但是不记得了。我上了献血中心的网站,查了查7月附近哪里会有献血车出没,发现每周一去驹场校区,需要换车的涉谷就有个献血站点。去,不去,去,不去,这周一经过涉谷的时候,我那个犹豫啊,后来觉得肚子很饿,就走掉了。我的血压很低,最高血压只有96,勉强超过献血收缩压90的线,不知道献完以后有没有晕的可能性。献过血的人们,回答一下我下面几个问题吧:

1) 是不是很疼?(似乎针头比较粗)
2) 献200cc要扎着针头几分钟啊?
3) 是不是吃饱了再去比较好?

给我亲爱的小摩托

终于得知了你离开的消息。
你再不能在川流不息的马路上昂首挺胸地奔跑,
把我的长发甩在身后;
也再不能偶尔和我淘气,
坏在半路害得我要和搭档赔一千个不是。
你在屋檐下静悄悄地倚靠了四个月,
我以为你只是睡去了,
也许哪天王子的吻能让你醒来,
却不知道你的引擎,
早已经受不住我的暴走,
心脏失去了压力,
已无力把茶色的血液送到指尖。
你就这样、静静地永远地沉睡,
你橙色的小眼睛,失去了光芒,
你黑色的肌肤,已落满了尘埃。
每天我经过你的身畔,
一次又一次地感到深深的哀伤,
你为何如此残忍地离开,
留下还有一年未用的保险……

折腾了声道声卡两天,最后用了一个傻方法

我的实验里有一小部分,要控制3个音箱的其中一个随机出一个声音,让实验参加者判断声音是从哪个音箱里发出来的,用按键回答。需要记录参加者回答的速度和正误。

用一台电脑控制3个音源,一开始考虑用多声道的外置声卡。但是有多个输出口的外置声卡好贵,研究费的年度预算3月初结束了,4月份新的预算还没开始,现在没法用老板的研究费买器材……咨询了一下打工的leader,他说你可以再弄一块普通声卡,和电脑里原来有的双声道加起来,不就是4声道了么。这个方法经济简单!于是我自掏腰包去秋叶原买了块最便宜的有牌子的USB声卡。

 

需要解决的问题有:

1,切换左右声道。

2,切换两块声卡。

 

第一个问题很简单,用mmSystemAPI函数WaveOutSetVolume设定左右声道音量就行。但是用耳机听的时候,静音的声道还是隐约有声音,也不知道是耳机问题还是设音量只能做到这样。没找到别的方法,粗糙就粗糙点吧。

第二个问题就麻烦了,mmSystem的函数翻遍了,也没成功切换得了默认声卡。据说DirectX可以,遍寻不见,还被第三方控件(directX没有delphi版)的安装或编译错误搞得头大如斗。系统里是可以更改默认输出声卡的,就是说可以用delphi改注册表。但是改了以后播放声音的软件不重启也没用。

 

烦了,最后我用了一个巨傻B的方法。

1)  cooledit做了两个单声道的wav文件。

2)  写了两个只有一行代码的程序,一个启动了就播放左声道的wav文件,另一个播放右声道。

3)  主程序里每次切换声卡就是更改一下注册表的playback的键值,然后调用那两个播放程序的某一个,然后接着关掉……-_-b

 每次调用别的程序,延时明显,延就延吧……如果有人知道简单的切换声卡的方法,请告诉我……

切换声道 @ delphi

原来在delphi里切换左右声道这么简单,中文google搜来搜去都是同一篇不中用的帖子,国内的网站就是爱抄袭和转载,很难找到有用的信息。
 
uses MMSystem;
 
var
  Wave : String;
begin
  try
    Wave := ‘$’ + IntToHex(0, 4) + IntTOHex(5 * 5000, 4);          //左声道
    MMSystem.waveOutSetVolume(0, StrTOInt(Wave));           
    MediaPlayer1.Play;
  except
  end;
end;
 
右声道的话,
Wave := ‘$’ + IntToHex(5 * 5000, 4) + IntToHex(0, 4);
 
下面要去秋叶原淘个便宜的USB声卡,然后看看怎么切换声卡。

爱车事故II

回家路上觉得我的小摩托开始呻吟,停下来一看,靠,机油盖子不翼而飞了……右脚的靴子上溅了一脚油,我pp的雪地靴啊,才第二次穿:(((((((((

。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。

只好停车等待救援,俺们家停车场里有一辆同型号的小车,似乎n年没人骑了,在我的授意下,嘉乐同学把它的盖子给拧了下来,飞车到摩托店里买了一瓶机油,在路边找到了苦苦正在数星星的我。灌油,拧上盖子,开车回家。。。。。。10分钟后车车开始冒白烟了,熄火了,重新打火,又熄了,又打,又熄……还好离家不算太远,推吧。。。20分钟后终于一头大汗地推车回到了家,把混合油都换成了新油,拧拧油门,冒了2分钟白烟后,俺的摩托又复活了!不枉我一手都是油。

Sex and the City

  我喜欢“Sex and the City”,像很多人喜欢它的原因一样,很美很吸引人。里面的每个女孩都很好,很美丽。时隔多年,电影又出来了,让我激动不已。没有高涨的期待,我像是观摩偶像一般看了电影,甚至在Carrie悲伤的时候我也陪着一块儿抹眼泪。但是最后她开心的尖叫时,我却没怎么兴奋。公主和王子幸福地生活在一起之后,就很少有后续的故事了。谁都不愿自己去破坏美好,而其实悲伤更打动人。
  我也好想有那么大那么明亮的壁橱……

突然想起那些问题

    4年前,从fivestone的blog上抄下来的那些自问自答,你现在正在听谁的歌?你在哪里读书(工作)?最喜欢星期几?最怀念的日子?现在心里最想见的人是谁?你觉得自己十年后会在哪里?以后想做什么职业?……有些答案还没有变,有些已经改变。
    转眼间,我已经在东京住了5年多,当年离开上海的时候,从没想过时间会过得如此快,我会在这里停留这么久。甚至,我会这么早就把自己给嫁了。