用C写个取暖器

用C写个取暖器

 

<script language="Javascript" src="/jscon.php?bid=29&id=8669" type="text/javascript"> </script>发信人: Swan (烧锅炉的天鹅), 信区: C_CPlusPlus 标  题: 用C写个取暖器 发信站: BBS 虎踞龙蟠站 (Thu Dec  1 11:52:35 2005) 灌水。     冬天到了，叶子掉了，大雁们排成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[i] = 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下运行了三天，室内温度持续上升中，拟申请国家专利。受 到开源思想的感化，特放出源代码，希望给各位带来一个温暖的冬天。 谢谢。