瑞星卡卡安全论坛综合娱乐区Rising茶馆 【淌汗】天冷了,大家都打开电脑,我来告诉你们怎么取暖!

123   1  /  3  页   跳转

【淌汗】天冷了,大家都打开电脑,我来告诉你们怎么取暖!

【淌汗】天冷了,大家都打开电脑,我来告诉你们怎么取暖!

冬天到了,叶子掉了,大雁们排成B字形或者T字形往南飞,我却还要在严寒中偎
依着冰冷的电脑忧郁地玩着键盘。作为一个优秀的程序员,我们可以用程序解决除了老婆
以外的所有问题,何况是小小的寒风呢。下面我们就用C来写一个取暖器。
    理论上的分析是,电脑是耗费电力的,这部分电除了发光发声以外,都用在发热上面
了。简单说来,CPU,硬盘,乃至内存都会因为工作而发热。考虑到程序的通用性,我们不
考虑显卡声卡光驱,我们用内存读写来让内存发热,用大量计算来使CPU发热,用文件读写
来加热硬盘,最后可以让电脑成为一个小小的取暖器。
让CPU发热的代码如下:
DWORD WINAPI CPUHotter(PVOID para)
{
    while(1);
    return 1;
}

让内存发热的代码如下:

DWORD WINAPI MemHotter(PVOID para)
{
    char *Mem = new char[10000];
    while(1)
    {
            for(int i=0;i<10000;i++)
            {
                      Mem = 0x99;
            }
    }
    return 1;
}

最后是让硬盘发热的代码:

DWORD WINAPI DiskHotter(PVOID para)
{
  FILE *fp;
  fp = fopen("_", "a+");
    while(1)
    {
        for(int i=0;i<10000;i++)
        {
              fwrite("1", 1, 1, fp);
        }
        rewind(fp);
    }
    return 1;
}

main函数创建上面三个线程就可以了。本代码在Athlon 1.26 + 256M + VC 6.0的环境下编
译并运行成功,Windows 2000下运行了三天,室内温度持续上升中,拟申请国家专利。受
到开源思想的感化,特放出源代码,希望给各位带来一个温暖的冬天。
谢谢。
最后编辑2005-12-07 05:58:09
分享到:
gototop
 

沙发。。。
看不懂
gototop
 

偶把电源风扇给拆下来了。
gototop
 

这是一段驱逐苍蝇的代码:
<start>
                      <mian program>
                        dim 苍蝇 as long
                        dim 发出噪声次数 as long
                      if 发现苍蝇 then  beep ’开始发声
                            发出噪声次数=发出噪声次数+1
                              if 发出噪声次数>1234567 then 发出噪声次数=1
                            else
                        if 苍蝇跑出网吧 then stop beep '停止发声
                            else
                            继续发声
                      end if
                end sub
<end program>
gototop
 

楼上所有代码。经本人测试。可以顺利通过。
测试平台:
CPU:XP 2500+ 0.13 巴顿核心 512K CACHE
  主板:微星 KT3V
  内存:HY DDR333 256M
  硬盘:迈托 40G 7200转
  显卡:GF4 64M DDR
  光驱:16X DVD 
  电源: 300W
windows2000  pro
gototop
 

为什么不是“苍蝇跑出机箱”?
gototop
 

。。。。汗
gototop
 

引用:
【福娃贝贝的贴子】为什么不是“苍蝇跑出机箱”?
...........................


因为苍蝇不在机箱中....
gototop
 

飘过~~~~~~~~~~~~~
gototop
 

都挺厉害
我接着飞向太阳吧
gototop
 
123   1  /  3  页   跳转
页面顶部
Powered by Discuz!NT