eyye

1、人不犯我，我不犯人；人若犯我，礼让三分；人再犯我，我还一针；人还犯我，斩草除根。
2、我允许你走进我的世界,但不许你在我的世界里走来走去。
3、明骚易躲，暗贱难防。
4、天没降大任于我，照样苦我心智，劳我筋骨。
5、 执子之手，方知子丑，泪流满面，子不走我走。
6、红豆不长南国，长我脸上了，真相思！
7、我深信，会有一个男人是为受我的折磨而来到这世上的。
8、西游记告诉我们：凡是有后台的妖怪都被接走了，凡是没后台的都被一棒子打死了。
9、你有什么不开心的事？说出来让大家开心一下。
10、我那么喜欢你，你喜欢我一下会死啊。
11、虽然你身上喷了古龙水，但我还是能隐约闻到一股人渣味儿。
12、我诅咒你一辈子买方便面没有调料包。
13、不吃饱哪有力气减肥啊。
14、妈妈问我有男朋友了么,我说没有,妈妈说：这个可以有,我说：这个真没有……
15、理想很丰满，现实却很骨感。
16、雷锋做了好事不留名，但是每一件事情都记到日记里面。
17、我又不是人民币，怎么能让人人都喜欢我？！
18、令人不能自拔的，除了牙齿还有爱情。
19、当生活心怀歹毒地将一切都搞成了黑色幽默，我顺水推舟把自己变成了一个受过高等教育的流氓。 

 

24、我是你转身就忘的路人甲，凭什么陪你蹉跎年华到天涯？
25、 间歇性郁闷症发作期间，生人勿扰，熟人勿找。
26、没有医保和寿险的，天黑后不要见义勇为……
27、琴棋书画不会，洗衣做饭嫌累。
33、单身并不难，难的是应付那些千方百计想让你结束单身的人 。
34、幸福是什么?幸福就是你吃鱼,我吃肉,看着别人啃骨头。
37、我的优点是：我很帅；但是我的缺点是：我帅的不明显。
38、我当年也是个痴情的种子，结果下了场雨……淹死了。
39、很多人说婚姻是爱情的坟墓，但是能够入土为安的爱情总比暴尸街头要好 。
40、有空学风水去，死后占个好墓也算弥补了生前买不起好房的遗憾
44、小时候我以为自己长大后可以拯救整个世界，等长大后才发现整个世界都拯救不了我。
47、 女子无才便是德，我一定是太缺德了。
48、诸葛亮出山前也没带过兵啊，你们凭啥要我有工作经验。
49、用嘻哈的蓝调精神来过二胡一样的生活。
50、鸵鸟的幸福，只是一堆沙子。
52、一觉醒来，天都黑了。
54、铁杵能磨成针，但木杵只能磨成牙签，材料不对，再努力也没用。
57、你要搞清楚自己人生的剧本——不是你父母的续集，不是你子女的前传，更不是你朋友的外篇。
61、少年不胡作妄为，大胆放肆，试问老年时哪来的题材话当年。
64、再过几十年 我们来相会 送到火葬场 全部烧成灰 你一堆我一堆 谁也不认识谁 全部送到农村做化肥~
65、学问之美，在于使人一头雾水；诗歌之美，在于煽动男女出轨；女人之美，在于蠢得无怨无悔；男人之美，在于说谎说得白日见鬼。
66、我以为我很颓废,今天我才知道,原来我早报废了。
67、不成熟男人的标志是可以为了理想壮烈的牺牲，成熟男人的标志的可以为了理想卑贱的活着。
71、我以神的姿态,闪耀在这美的瞬间.凡人勿扰…
79、生活,就是这样.永远占领着绝对领导的位置,当无数的傻子高呼着自己控制了生活,掌握了命运.却没看到,生活在更高的苍穹上.露出讥笑的嘲讽的面孔。
83、我不是天桥上算命的，唠不出那么多你爱听的磕。
84、生活二字二几十年来回味得我大小脑抽搐，脊髓痉挛。始终不得要领。
88、曾经我们都以为自己可以为爱情死，其实爱情死不了人，它只会在最疼的地方扎上一针，然后我们欲哭无泪，我们辗转反侧，我们久病成医，我们百炼成钢。你不是风儿，我也不是沙，再缠绵也到不了天涯，擦干了泪，明天早上，我们都要上班。
89、曾经和朋友一起仰望星空，随之我们泪流满面，他是因为失恋，我则是因为扭伤了脖子。

我喜欢从哲学和宏观的角度思考问题，在经济上真正有思考深度的有谢国忠、索罗斯、巴菲特，听听他们的一些话，记住，加以思考：

谢国忠：将来某个时候会很不好。

巴菲特：从长期看，总是很好的。

索罗斯：我不知道，真的不知道，因为没有人知道，如果你认为你知道了，那你肯定是错了。

郎咸平：这是一个人吃人的社会。

------------------------下面是索罗斯的一些话----------------------------------------------------------

芮成钢:“您一定在这场金融危机中赚了不少钱,回顾历史,您似乎总是能安全度过危机,并对市场和资本主义提出一些最根本的看法,您能大概讲讲您的这些看法吗？”

　　索罗斯:“我对市场的看法与大家公认的看法不同,我的第一个看法是,我们并不真正了解我们所处的这个世界,我把这叫做易错性,第二个看法是,我们对世界的了解并不符合真实情况,我把这叫做反思性,这就是我的两个主要看法。”

-----------------------------------------------------------

芮成钢:“最关心什么？”

　　索罗斯:“关心我的原则,以及这个世界究竟是什么？我非常渴望了解现实,对大多数人而言,股市似乎是虚幻的,总是发生很多奇怪的事情,而对于我来说,它是一门科学,是社会及人的行为的真实反映,是我研究现实世界的实验室。

------------------------------------------------------------

芮成钢:“沃伦•巴菲特说过一句话人尽皆知的话,'每个人都在看好中国市场’,还记得那句话说'当其他人贪婪的时候,你要恐慌;当其他人恐慌的时候,你要贪婪’。您有类似这样的语录跟我们分享吗？”

　　索罗斯:“没有,我并不接受这一看法,事实上我的判断并不总是对的,其实我想说我判断错的时候很多,因为总是判断精准是不可能的,所以我卖的太早而买的太迟,我犯过许许多多的错误,我想说,比多是投资者业绩更好的原因,可能是我不断的自省并且努力修正错误。

---------------------------------------------------------------

CBN：这一次你是怎么察觉到危机的到来的？是凭借你的“反身性”理论，还是你的直觉或其他什么东西？

　　索罗斯：这是一个非常复杂的结果，理论仅仅提供给人们金融市场如何运行的原理，但不能帮助你得出确切的预期。通常人们都认为，市场参与者能够凭借其信息和知识了解状况并作出正确的选择，而市场可以在这一基础上达到均衡状态，但我的“反身性”理论的基本原理是，金融市场总是处于不均衡的状态，而同时，市场会对人们认知经济状况产生影响，这就意味着有时市场对经济状况的反映也是不准确的。而反过来这一经过扭曲的经济判断又会反馈给市场，这就是市场泡沫如何变大的原因。因此不能靠理论来预测未来，还要看自己的综合判断。

------------------------------------------------------------------

CBN：在金融市场上，什么是你所独有的天赋？有人说是你对资产负债表的独到运用，而有人说是你对金融市场重大变化(Game change moment)的审时度势，还有很多你因为背痛而改变策略的坊间故事，你的答案是什么？

　　索罗斯：我的直觉和我的哲学其实都是相互联系的，我的哲学思想所依赖的就是不确定性原理，未来是不确定的。如果事实真的如此的话，就像丛林中的动物一样，对面临的敌人要作出判断，到底是比我强，还是比我弱，是该进攻还是该撤退。你可以发现丛林中的动物总是很紧张，它们总是用直觉来判断到底应该怎么行动，这也正是我所拥有的。而敏锐地抓住金融市场变化是这个直觉的延伸。但我有些时候也会作出错误的决定，这个时候我会悲痛，这会告诉我，这个决定是错误的。
--------------------------------------------------------------------

问：从你的经历来看，你似乎总能安然渡过危机，而且在此过程中，你还对市场和资本主义发出了一些最为根本性的询问。你能否大概地讲讲你的哲学见解？ 

　　索罗斯：我对市场的看法与大家公认的看法不同。公认的看法是，市场能反映出所有现有的知识，因为市场比任何单独的市场参与者更能知道未来的走向。这在我看来是错误的，我认为市场总是扭曲现实，并不能反映真实情况，因为人们不可能准确地预知未来，因为未来尚未发生。但是，市场上的状况会影响未来。因此，我提出的第一个哲学原则是，我们并不真正了解我们所处的这个世界，我把这叫做“易错性”（fallibility）。第二个哲学是，我们对世界的误解、我们对世界的错误看法，其实反而会改变历史，我把这叫做“反身性”（reflexivity）。 

------------------------------------------------------------------

问：我们曾在中国民众中进行过一场调查，发现大多数人都将你的名字与“金融大鳄”联系在一起，不过最近几年也有人称你为“投资大师”，你喜欢用哪种说法来描述自己？ 

　　索罗斯：投资只是我生活的一部分。我还拥有一家“开放社会基金会”，我对它非常重视。而且，我还有一套哲学，它指导我如何挣钱、如何花钱。这套哲学才是我最为在意的东西。自从出生以来，我一直在思考，我是如何来到这个世界上的，我所处的这个世界究竟是个什么东西。我一直为这个问题而困惑，也一直试图解决它。其实这才是我最主要的野心。对我而言，金融市场就是一个实验室，可以帮助我来研究现实。在大多数人看来，股市似乎是脱离现实的，总会发生很多奇怪的事情，但在我看来，金融市场的运行是一门科学，我们可以凭借它来研究社会的运转方式和人的行为方式。 

-----------------------------------------------------------------------

问：你从这个实验室中发现了什么奥秘？ 

　　索罗斯：我们对世界的理解总是不完美的，而原因恰好就是，我们本身就是这个世界的参与者。在通常情况下，为了获得知识，我们必须拥有一些可以据以判断正误的独立的标准，但是，我们本身就是这个世界的参与者，从而无法拥有独立的标准，因为我们的行为、思想和观念其实会改变现实。所以，如果实际情况不能提供独立的判断标准，那么我们就必须在没有知识的情况下行动，而我们也必须承认，行动的结果是不确定的。这就是社会事件与自然现象的区别。我们可以通过自然科学获得许多有关自然现象的知识，但在社会领域、尤其是政治领域，我们没有像自然科学那样的标准来判断人们观点的对错。 

--------------------------------------------------------------------------

（一）简介

将数据对象序列化(serialization)，或说串行化，持久化(persistence)都是差不多的意思，就是将程序里复杂的对象数据和关系采用一个统一的算法，将其变成一行、一串、一序列的数据，从而达到持久保存的目的，即电脑关机还在，下次打开电脑只要打开文件，程序又在内存中重建原来的关系。

这是一个很普通的功能，比如WORD、EXCEL自不必说，其实只要稍稍像样的程序都有这个功能。学习MFC的时候也会专门学习如何保存数据。

但是boost Serialization把这一功能做得更加完美，使用更简单，功能更强大，研究这个库将会是很有趣的事情。

要实现序列化关键要做到两点

1）重建对象；2）指针的保存与重建。

要做到这两点，必须要薄记，所有的技术都是围绕这个进行。这是怎样把它做得更漂亮。

参考资料：1）boost Serialization库，2）《C++设计新思维》，这本书花了不少篇幅讨论这个问题，而且boost Serialization作者也把该书作为参考书；3）《程序员》2002、05期《C++怎样实现持久化persistence?》

研究方法：1）学会使用；2)阅读资料，3)看源码，4)分析保存后的文件格式（用txt文件保存），5）研究讨论，希望有兴趣的朋友一起来讨论，希望高手、行家给与我帮助。

vb6.0过时了吗？是的，应该是。不过，到现在，它仍然有它的不可替代的用途。起码，.net开发的程序还不是每个电脑都能够运行，起码，现在的vb.net已经不支持ole控件。新的有新的理由，用旧的也有旧的用途。从这个角度看，所有的技术都谈不上过时与不过时。

我现在在做的题库，比较起来就用vb6.0开发要方便得多。只不过原来习惯于C++的STL，突然发现原来VB6.0连内建的链表都没有。没办法，只能自己建造轮子了。现在把我自己写的这个链表与大家分享，或许你也需要，或许，你觉得我的这个设计笨拙得有些要命，那就请你帮我提出修改意见，不胜感谢。

先定义数据节点（定义一个叫ListNode的类），从性能角度考虑，定义出具体的数据类型，此处为String，可改为其他类型：

Code
Option Explicit

Public strValue As String 
Public preNode As ListNode 
Public nextNode As ListNode 

再 定义一个双向链表类（StrList）

Code
Option Explicit

Private mvarHead As ListNode   
Private curNode As ListNode
Private endNode As ListNode
Dim mvarSize As Integer

Public Function Size() As Integer
Size = mvarSize
End Function

Public Function IsEnd() As Boolean
IsEnd = curNode Is Nothing
End Function

Public Function IsHead() As Boolean
IsHead = curNode Is mvarHead
End Function
Public Sub Unique()
Dim bDelete As Boolean
Dim temNode As ListNode
Dim strValue As String
GoHead
Do While Not IsEnd
strValue = GetValue
Set temNode = curNode
GoNext
    Do While Not IsEnd
        bDelete = True
        If GetValue = strValue Then
        If temNode Is endNode Then
            Exit Sub
        ElseIf curNode Is endNode Then
            Set endNode = curNode.preNode
            Set endNode.nextNode = Nothing
            Set curNode = endNode
        Else
            Set curNode.preNode.nextNode = curNode.nextNode
            Set curNode.nextNode.preNode = curNode.preNode
            Set curNode = curNode.nextNode
        End If
        mvarSize = mvarSize - 1
        bDelete = False
        End If
        If (Not IsEnd) And bDelete Then GoNext
    Loop
    Set curNode = temNode.nextNode
Loop
End Sub

Public Sub ReMove(strValue As String)
Dim bDelete As Boolean
GoHead
Do While Not IsEnd
bDelete = True
    If GetValue = strValue Then
    If mvarHead Is endNode Then
        Set mvarHead = Nothing
        Set endNode = Nothing
        Set curNode = Nothing
    ElseIf curNode Is mvarHead Then
        Set mvarHead = curNode.nextNode
        Set mvarHead.preNode = Nothing
        Set curNode = mvarHead
    ElseIf curNode Is endNode Then
        Set endNode = curNode.preNode
        Set endNode.nextNode = Nothing
        Set curNode = endNode
    Else
        Set curNode.preNode.nextNode = curNode.nextNode
        Set curNode.nextNode.preNode = curNode.preNode
        Set curNode = curNode.nextNode
    End If
    mvarSize = mvarSize - 1
    bDelete = False
    End If
    If (Not IsEnd) And bDelete Then GoNext
Loop
End Sub
Public Sub Delete()
    If mvarHead Is endNode Then
        Set mvarHead = Nothing
        Set endNode = Nothing
        Set curNode = Nothing
    ElseIf curNode Is mvarHead Then
        Set mvarHead = curNode.nextNode
        Set mvarHead.preNode = Nothing
        Set curNode = mvarHead
    ElseIf curNode Is endNode Then
        Set endNode = curNode.preNode
        Set endNode.nextNode = Nothing
        Set curNode = endNode
    Else
        Set curNode.preNode.nextNode = curNode.nextNode
        Set curNode.nextNode.preNode = curNode.preNode
        Set curNode = curNode.nextNode
    End If
    mvarSize = mvarSize - 1
End Sub

Public Sub Clear()
Set mvarHead = Nothing
Set endNode = Nothing
Set curNode = Nothing
mvarSize = 0
End Sub

Public Sub Add(strValue As String)
Dim node As New ListNode
node.strValue = strValue
Set node.preNode = endNode
If mvarHead Is Nothing Then
    Set mvarHead = node
    Set curNode = node
Else
    Set endNode.nextNode = node
End If
Set endNode = node
 mvarSize = mvarSize + 1
End Sub

Public Sub GoNext()
Set curNode = curNode.nextNode
End Sub
Public Sub GoAhead()
Set curNode = curNode.preNode
End Sub
Public Function GetValue() As String
GetValue = curNode.strValue
End Function

Public Sub GoHead()
Set curNode = mvarHead
End Sub
Public Sub GoLast()
Set curNode = endNode
End Sub

利用这个双向链表构造一个循环链表（CycList）：

Code
Option Explicit
Dim list As New StrList

Public Function Size() As Integer
Size = list.Size
End Function

Public Sub ReMove(strValue As String)
list.ReMove strValue
End Sub
Public Sub Delete()
list.Delete
End Sub
Public Sub Clear()
list.Clear
End Sub

Public Sub Add(strValue As String)
list.Add strValue
End Sub

Public Sub GoNext()
If list.IsEnd Then list.GoHead
list.GoNext
If list.IsEnd Then list.GoHead
End Sub

Public Sub GoAhead()
If list.IsEnd Then list.GoLast
list.GoAhead
If list.IsEnd Then list.GoLast
End Sub

Public Function GetValue() As String
GetValue = list.GetValue
End Function

Public Sub GoHead()
list.GoHead
End Sub

Public Function IsHead() As Boolean
IsHead = list.IsHead
End Function

使用实例代码： 

Code
Dim list As New StrList

list.Clear
list.Add "a"
list.Add "b"
 
list.GoHead
Do While Not list.IsEnd
     'do something
     'list.GetValue 
list.GoNext

不要问不要看50ETF曾经到过什么价位，现在大胆预测一下未来是什么样的走法。

对了，聊以自慰；错了，当成笑话，看有多么的离谱。

大师们（巴菲特、林奇）是绝不愿意预测股市的，因为从根本上讲，这份差事该上帝来做，是人就猜不透。

幸好我不是大师，更不是股神，只是股票发烧友。其实我我对股票也没多大兴趣了，我现在要预测的是50ETF（510050），是指数。有兴趣的朋友可以一起探讨，小赌怡情，生活已经有太多痛苦无奈，枯燥乏味，权且当成一种业余爱好，是成交了还是卖出了，让每天有所期待。

这是我的预测：

1）现在1.4元，明年这个时候到底；

2）明年这个时候的价位是0.7元；

3）2010能够回到现在价位1.4元；

4）2013年到达新高位，3元。

基本属于完全看空，但还是纵身跳入股海，不离不弃。

 下面是"Google Java"

矩阵变换实验下载

注：迭代功能已添加，可以无限次迭代，每次以上一次结果为条件迭代。

只要按“画变换图”后就可以开始迭代，重新开始迭代也要按“画变换图”，即第一次变换图是我们的初始值。迭代图没有坐标显示。

不要按“将迭代结果作为输入”，这是另一个功能！

添加了点的自动标注为A,B,C,D...和变换图A',B',C',D'... 

变换矩阵的初始值改为逆时针旋转arcsin0.8，缩放因子为1.还可以输入旋转角度和缩放因子，构造旋转矩阵。变换矩阵当a11=a22,a12=-a12时为旋转矩阵，否则不能称为旋转矩阵，而是仿射变换。

1）再输入框里输入相应的x，y值，在按“添加新点”，可输入一系列精确点；

或：按“重画原始图”，在屏幕上乱点，也可得到一系列不精确点；

2）输入变换矩阵；

3）按“画变换图”，得到经过矩阵变换的图；

4）可以在图中显示坐标或隐藏坐标；

亦可以在屏幕左边列出坐标。

本下载包含编译好的可执行文件和源码，使用vb6.0编写。本不愿意再用vb6.0，因为。。。哎，这显然是盗版嘛。现在大多数时候使用vc2008express，免费的，合理合法。朋友所托要完成这个软件，还是vb6.0这家伙来的快。用就用了吧。。。。