查看完整版本: 4K 程序极品---------Enjoy it :) 看了他编的code 你会自杀的!!太完美了!!

逆天笑 2004-2-8 14:15

4K 程序极品---------Enjoy it :) 看了他编的code 你会自杀的!!太完美了!!

4K 程序极品---------Enjoy it :) <br>
这个程序(omni.com)是97年的Mekka ’97 4K Intro比赛的一等奖作品,也是我认为最好的 <br>
4K作品之一。整个程序全长4095字节,其中包含133字节的自解压程序(类RAR压缩),未解 <br>
压的程序长4782字节。三维场景包含144个立方体,367个面,362个点,15个不同的64*64 <br>
的纹理…… <br>
观看方法: <br>
开始菜单->运行->debug。然后把下面这一堆文本整个粘贴(点击左上角图标,编辑-》粘 <br>
贴)进去,如果你有标准的Sound Blaster声卡,还能听到MIDI音乐。(我机器是ac97的没有 <br>
声音,但有动画) <br>
代码如下: <br>
e100 33 f6 bf 0 20 b5 10 f3 a5 8c c8 5 0 2 50 68 13 1 cb e 1f be a1 1 bf 0 1 <br>
<br>
<br>
e11b 6 57 b8 11 1 bb 21 13 89 7 4b 4b 48 79 f9 ad 86 e0 8b c8 bd ff ff e8 20 <br>
<br>
<br>
e134 0 3d 0 1 74 1a 7f 3 aa eb f3 2d ff 0 50 e8 f 0 5a f7 d8 8b d8 26 8a 1 aa <br>
<br>
<br>
e14f 4a 75 f9 eb de cb 57 bb 21 13 8b c1 40 f7 27 f7 f5 8b fb ba 11 1 4f 4f 4a <br>
<br>
<br>
e168 39 5 7f f9 52 8b c5 f7 25 f7 37 2b c8 95 f7 65 2 f7 37 95 2b e8 fe e fe <br>
<br>
<br>
e181 10 79 6 c6 6 fe 10 7 46 d0 14 d1 d1 d1 e5 79 ec 5a b8 11 1 ff 7 4b 4b 48 <br>
<br>
<br>
e19b 3b d0 75 f7 5f c3 83 f7 83 a6 5d 59 82 cd b2 8 42 46 9 57 a9 c5 ca aa 1b <br>
<br>
<br>
e1b4 4f 52 b4 92 3f ab 6e 9e a8 1d c6 3 fc e 6a e7 ae bb 5f 7b 10 b8 b4 f7 8 <br>
<br>
<br>
e1cd e2 bf 36 4e 39 9d 79 29 3f a f9 36 52 16 fb 5 e8 e5 a6 c2 e9 b0 43 d3 a3 <br>
<br>
<br>
e1e6 cf d3 fd fd cb d1 4c 5e e0 63 58 86 bb 3e 9 c1 20 bc cc 91 a3 47 81 70 b3 <br>
<br>
<br>
e1ff d6 1a 9e c2 c9 12 e7 4e ad f4 5f e3 30 e9 9 39 d7 e8 f9 f4 d2 44 e8 d7 22 <br>
<br>
<br>
e218 be e2 ce 88 25 cf 30 4a a8 29 ae 3f 47 c6 2d 85 e9 73 54 13 b e6 e0 34 65 <br>
<br>
<br>
e231 e2 50 8a 89 18 5f ce 70 99 3 5f 42 bf eb 7 ae d0 ca 5 22 8d 22 a5 b7 f0 <br>
<br>
<br>
e24a 90 81 bc 7a bc dc 5 db c0 6a 2 e5 57 38 be 60 cb ac ba a5 3b 9d f1 77 38 <br>
<br>
<br>
e263 a6 84 d1 3c af 49 d8 6a 45 a2 76 60 21 12 c0 c2 44 f2 5e bb e5 37 a9 2b <br>
<br>
<br>
e27b ec 4a 8c 4c f2 f7 a9 58 71 2b ba 6d d6 6a e5 60 46 e0 da e5 b9 90 e5 a3 <br>
<br>
<br>
e293 f7 7f 31 60 58 f0 c4 88 10 4e 3c a3 ee 4e 11 55 8f a 92 eb db ad 7a 9c f <br>
<br>
<br>
e2ac db 5a 28 96 da 87 ae 91 91 2d e3 5e ea df 6 95 71 67 71 40 ce d1 2e 31 6d <br>
<br>
<br>
e2c5 c1 9c d8 6a 76 9b 4a e8 36 44 d6 76 d 30 5 ff d4 1b ac 1f 32 65 31 bf 55 <br>
<br>
<br>
e2de 26 b a4 55 e1 5d 5e 16 ed 97 48 6c 77 fb 81 86 e f9 18 bd d4 f4 8b de 1d <br>
<br>
<br>
e2f7 ba d 47 75 3 89 4b 3e dc 27 86 1c d0 17 89 48 d1 a6 8d d4 2b 54 4e 8f b0 <br>
<br>
<br>
e310 2 e1 6b 1a 75 78 ea 21 91 13 c0 cf 78 a0 ab f3 35 c6 b4 c8 90 8d d7 45 e7 <br>
<br>
<br>
e329 c 5b a4 ba 52 10 64 f5 4a 50 b7 ec 46 22 15 23 84 30 81 5c df 61 5a 8f 67 <br>
<br>
<br>
e342 c4 63 57 6d f7 26 92 a3 1f e5 3 a5 0 54 41 8 48 7c 26 90 33 82 9c 91 b0 <br>
<br>
<br>
e35b ab 78 5d df 99 e0 b9 fc 5 36 ac d9 49 91 ab 20 a2 63 48 89 ce 5c 60 64 f0 <br>
<br>
<br>
e374 63 d9 a8 38 3b d3 e6 4c 8c 23 34 4e 20 51 93 5e 6d b4 7a 22 9b 4c f2 d3 <br>
<br>
<br>
e38c c4 f8 3 6f 47 40 f4 f8 45 9b 83 f3 83 6 31 d0 0 17 82 83 dc 67 f9 62 77 <br>
<br>
<br>
e3a5 90 3b d9 ec f3 55 96 b8 d9 db 79 55 f1 e5 8c 5e f2 e5 2e b0 b 6e e2 81 25 <br>
<br>
<br>
e3be 93 8e b5 dd 5b 46 f9 af ed 6 12 cf c9 1d f0 f7 3b 16 2d c6 58 73 8d e9 5f <br>
<br>
<br>
e3d7 fd 5a b6 a1 94 4d 1a 8 ff eb b7 6 80 c7 86 83 b6 b9 fd 1c e0 c c3 2e a0 <br>
<br>
<br>
e3f0 2f b 3e 3 6b 29 e1 27 85 1c ea 6d df b3 a3 ed 65 4a 9a 59 3b 54 e 4b ae <br>
<br>
<br>
e409 9e 27 f0 4d 3b c 4c 46 b7 e5 57 1b 1f 1f bb 80 86 f5 b7 ef 73 52 bf 2c c7 <br>
<br>
<br>
e422 ed a b7 81 2 f3 90 3e ee cc 6c eb f 38 1 6c 68 b1 d 45 78 b2 f f6 83 b0 <br>
<br>
<br>
e43c c4 33 df b1 d1 91 98 1e 81 a5 e2 59 9f f4 8c b6 72 8 a7 8c f6 e a3 b2 1f <br>
<br>
<br>
e455 d9 d3 23 f0 7c 5e 5f 68 61 8b 45 da 1d 91 ec 8d 4e ea 1a 38 85 94 aa ac <br>
<br>
<br>
e46d f2 4 f6 c4 e5 92 8e 9a 4e 83 e1 73 e8 cf 2a 5c 2b 7e f1 30 2 8a e6 28 1a <br>
<br>
<br>
e486 3b ce bc 96 aa 7f eb 87 cd 8b 96 2d 9 59 7a a0 1a 43 62 9a 9e 4f ff 8e d9 <br>
<br>
<br>

xiyu139 2004-2-8 14:23

Re:4K 程序极品---------Enjoy it :) 看了他编的code 你会自杀的!!太完美了!!

看了一遍,在我的机器上有声音,感觉有点象DOOM,不过这个程序好在哪里我是不知道的,可能评审的专家自有他们的标准吧,我是门外汉,看看热闹^_^

monkeyking 2004-2-9 14:57

Re:4K 程序极品---------Enjoy it :) 看了他编的code 你会自杀的!!太完美了!!

呵呵,楼上的,你说话可真是轻松啊。<br>
你知道这样的模拟3D效果,如果没有SDK的支持单独开发是很费事费力的,并且需要大量的空间,小小的4KB,做下这么多内容,还不能获奖吗?<br>
3D效果里的图形变换,纹理贴图都是高难度的算法,呵呵,有兴趣你可以接触一下DX,就是我们玩游戏的时候,经常需要安装的哪个东东。现在最新的版本是9.0。另外一个3D标准就是OPENGL,这是一个工业标准,DX是微软开发的WINDOWS平台下的多媒体支持系统,除了图象还包括网络、音频和游戏控制API(APPLICATION PROGRAM INTERFACE 应用程序编程接口),而OPENGL只制定了图形标准。如果你玩CS时设置过视频选项,就一定会记得,那里同时提供这两个选择。

俫依噢哆 2004-2-9 14:59

Re:4K 程序极品---------Enjoy it :) 看了他编的code 你会自杀的!!太完美了!!

云里舞里

monkeyking 2004-2-9 14:59

Re:4K 程序极品---------Enjoy it :) 看了他编的code 你会自杀的!!太完美了!!

以上都是我随手写的,如果各位有兴趣可以在网上搜索更多的信息。<br>
楼主的所贴代码是通过编译后形成的2进制代码(当然,显示时,被转化成16进制的代码了)

逆天笑 2004-2-9 21:27

Re:4K 程序极品---------Enjoy it :) 看了他编的code 你会自杀的!!太完美了!!

楼上~~<br>
<br>
这么厉害哈~~~<br>
<br>
开学约个时间向你请教~<br>
<br>
:)

红茶杨威利 2004-2-9 22:11

Re:4K 程序极品---------Enjoy it :) 看了他编的code 你会自杀的!!太完美了!!

笑笑开学转校吗?<br>
<br>
这只猴子可不是湘大产的......<br>
<br>
就读于北京工业大学

xiyu139 2004-2-9 22:17

Re:4K 程序极品---------Enjoy it :) 看了他编的code 你会自杀的!!太完美了!!

大概意思懂了,有些东西我们还学过哪

逆天笑 2004-2-9 23:18

Re:4K 程序极品---------Enjoy it :) 看了他编的code 你会自杀的!!太完美了!!

。。。<br>
<br>
那我盗了北京的大学生的版~~~嘿嘿

77 2004-2-9 23:36

Re:4K 程序极品---------Enjoy it :) 看了他编的code 你会自杀的!!太完美了!!

看不懂

红茶杨威利 2004-2-9 23:48

Re:4K 程序极品---------Enjoy it :) 看了他编的code 你会自杀的!!太完美了!!

16位的代码.....只有改游戏的时候看得懂.....

果非 2004-2-22 04:56

Re:[注意]喜欢张庭的来看看啊!

<a target=_blank href=http://www.netandtv.com/newspage/pic2004-2/small200424183147498539.jpg>http://www.netandtv.com/newspage/pic2004-2/small200424183147498539.jpg</a>

果非 2004-2-22 04:57

Re:[注意]喜欢张庭的来看看啊!

<a target=_blank href=http://www.cnhongbo.com/sjsquare/e/e48/leadbbsfile/1.jpg>http://www.cnhongbo.com/sjsquare/e/e48/leadbbsfile/1.jpg</a>

☆冰☆泠☆ 2004-2-22 05:00

Re:[注意]喜欢张庭的来看看啊!

<br>
帮你帖一下<br>
<IMG SRC=../leadbbsfile/upload/2004/02/22/045911.jpg border=0 alt=按此在新窗口浏览图片 onclick="javascript:window.open(this.src);" onLoad="javascript:if(this.width>570)this.width=570;" onMouseover="javascript:if(this.width>570)this.width=570;" style="cursor:hand" align=absmiddle><br>
<br>
<IMG SRC=../leadbbsfile/upload/2004/02/22/045932.jpg border=0 alt=按此在新窗口浏览图片 onclick="javascript:window.open(this.src);" onLoad="javascript:if(this.width>570)this.width=570;" onMouseover="javascript:if(this.width>570)this.width=570;" style="cursor:hand" align=absmiddle><br>
<br>
<IMG SRC=../leadbbsfile/upload/2004/02/22/045947.jpg border=0 alt=按此在新窗口浏览图片 onclick="javascript:window.open(this.src);" onLoad="javascript:if(this.width>570)this.width=570;" onMouseover="javascript:if(this.width>570)this.width=570;" style="cursor:hand" align=absmiddle><br>

☆冰☆泠☆ 2004-2-22 05:05

Re:[注意]喜欢张庭的来看看啊!

喜欢张庭 我来补充<br>
<br>
<IMG SRC=../leadbbsfile/upload/2004/02/22/050159.jpg border=0 alt=按此在新窗口浏览图片 onclick="javascript:window.open(this.src);" onLoad="javascript:if(this.width>570)this.width=570;" onMouseover="javascript:if(this.width>570)this.width=570;" style="cursor:hand" align=absmiddle><br>
<br>
<IMG SRC=../leadbbsfile/upload/2004/02/22/050353.jpg border=0 alt=按此在新窗口浏览图片 onclick="javascript:window.open(this.src);" onLoad="javascript:if(this.width>570)this.width=570;" onMouseover="javascript:if(this.width>570)this.width=570;" style="cursor:hand" align=absmiddle><br>
<br>
<IMG SRC=../leadbbsfile/upload/2004/02/22/050425.jpg border=0 alt=按此在新窗口浏览图片 onclick="javascript:window.open(this.src);" onLoad="javascript:if(this.width>570)this.width=570;" onMouseover="javascript:if(this.width>570)this.width=570;" style="cursor:hand" align=absmiddle><br>
<br>
<IMG SRC=../leadbbsfile/upload/2004/02/22/050508.jpg border=0 alt=按此在新窗口浏览图片 onclick="javascript:window.open(this.src);" onLoad="javascript:if(this.width>570)this.width=570;" onMouseover="javascript:if(this.width>570)this.width=570;" style="cursor:hand" align=absmiddle><br>
<br>
<IMG SRC=../leadbbsfile/upload/2004/02/22/050540.jpg border=0 alt=按此在新窗口浏览图片 onclick="javascript:window.open(this.src);" onLoad="javascript:if(this.width>570)this.width=570;" onMouseover="javascript:if(this.width>570)this.width=570;" style="cursor:hand" align=absmiddle><br>

果非 2004-2-22 06:13

Re:[注意]喜欢张庭的来看看啊!

Thank you!<br>
哪个院的?

feng4ever 2004-2-22 12:02

Re:[注意]喜欢张庭的来看看啊!

蛮<IMG SRC=http://www.eoshow.com/leadbbsfile/cn/ke1.gif border=0 onLoad="javascript:if(this.width>570)this.width=570;" onMouseover="javascript:if(this.width>570)this.width=570;" align=absmiddle><IMG SRC=http://www.eoshow.com/leadbbsfile/cn/ai3.gif border=0 onLoad="javascript:if(this.width>570)this.width=570;" onMouseover="javascript:if(this.width>570)this.width=570;" align=absmiddle> <IMG SRC=http://www.eoshow.com/leadbbsfile/cn/bu.gif border=0 onLoad="javascript:if(this.width>570)this.width=570;" onMouseover="javascript:if(this.width>570)this.width=570;" align=absmiddle>过张廷<IMG SRC=http://www.eoshow.com/leadbbsfile/cn/suan.gif border=0 onLoad="javascript:if(this.width>570)this.width=570;" onMouseover="javascript:if(this.width>570)this.width=570;" align=absmiddle><IMG SRC=http://www.eoshow.com/leadbbsfile/cn/bu.gif border=0 onLoad="javascript:if(this.width>570)this.width=570;" onMouseover="javascript:if(this.width>570)this.width=570;" align=absmiddle><IMG SRC=http://www.eoshow.com/leadbbsfile/cn/shang.gif border=0 onLoad="javascript:if(this.width>570)this.width=570;" onMouseover="javascript:if(this.width>570)this.width=570;" align=absmiddle><IMG SRC=http://www.eoshow.com/leadbbsfile/cn/shi.gif border=0 onLoad="javascript:if(this.width>570)this.width=570;" onMouseover="javascript:if(this.width>570)this.width=570;" align=absmiddle><IMG SRC=http://www.eoshow.com/leadbbsfile/cn/mei2.gif border=0 onLoad="javascript:if(this.width>570)this.width=570;" onMouseover="javascript:if(this.width>570)this.width=570;" align=absmiddle><IMG SRC=http://www.eoshow.com/leadbbsfile/cn/nv.gif border=0 onLoad="javascript:if(this.width>570)this.width=570;" onMouseover="javascript:if(this.width>570)this.width=570;" align=absmiddle><br>
<br>

哈巴狗 2004-2-22 15:07

Re:[注意]喜欢张庭的来看看啊!

不认识

扣扣 2004-2-22 17:28

Re:[注意]喜欢张庭的来看看啊!

<IMG SRC=http://www.eoshow.com/leadbbsfile/cn/you4.gif border=0 onLoad="javascript:if(this.width>570)this.width=570;" onMouseover="javascript:if(this.width>570)this.width=570;" align=absmiddle>酒窝<IMG SRC=http://www.eoshow.com/leadbbsfile/cn/de.gif border=0 onLoad="javascript:if(this.width>570)this.width=570;" onMouseover="javascript:if(this.width>570)this.width=570;" align=absmiddle>说<br>
<br>

yoyo821 2004-2-22 18:55

Re:[注意]喜欢张庭的来看看啊!

喜欢看她演的绝色双娇

果非 2004-2-29 01:21

Re:[注意]喜欢张庭的来看看啊!

我也喜欢这片子啊!

dreamfly 2004-2-29 01:24

Re:[注意]喜欢张庭的来看看啊!

觉得她好老拉,但是还是非常喜欢她

前夕前线 2004-2-29 02:22

Re:[注意]喜欢张庭的来看看啊!

还是可以~偶觉得可以~

牙擦仔 2004-2-29 05:48

Re:[注意]喜欢张庭的来看看啊!

我也喜欢她!

果非 2004-2-29 06:07

Re:[注意]喜欢张庭的来看看啊!

笑的好有意味!

前夕前线 2004-2-29 06:28

Re:[注意]喜欢张庭的来看看啊!

<table width=100% bgcolor=#cccccc cellpadding=5 cellspacing=1 class=TBone><tr><td bgcolor=#f7f7f7 class=TBBG9><b>下面引用由<u>果非</u>发表的内容:</b><br>
<br>
笑的好有意味! </td></tr></table><br>
偶觉得笑起来一个样子,美德点变化~

前夕前线 2004-2-29 06:28

Re:[注意]喜欢张庭的来看看啊!

<table width=100% bgcolor=#cccccc cellpadding=5 cellspacing=1 class=TBone><tr><td bgcolor=#f7f7f7 class=TBBG9><b>下面引用由<u>前夕前线</u>发表的内容:</b><br>
<br>
偶觉得笑起来一个样子,没得点变化~ </td></tr></table><br>

☆冰☆泠☆ 2004-2-29 11:55

Re:[注意]喜欢张庭的来看看啊!

好喜欢!超喜欢!大酒窝美女~~~~~~ 爱死你了!!

木四oοΟ○ 2004-2-29 12:28

Re:[注意]喜欢张庭的来看看啊!

<table width=100% bgcolor=#cccccc cellpadding=5 cellspacing=1 class=TBone><tr><td bgcolor=#f7f7f7 class=TBBG9><b>下面引用由<u>果非</u>发表的内容:</b><br>
<br>
Thank you!<br>
哪个院的? </td></tr></table><br>
晕……

丹皮儿 2004-2-29 12:34

Re:[注意]喜欢张庭的来看看啊!

张庭,我也很喜欢<br>

永不后悔 2004-3-4 15:29

re:这是用什么鸟东西编的.

这是用什么鸟东西编的.

半个圆圈 2004-3-4 16:08

re:靠!这个都没见个!少见多怪!什么叫汇...

靠!这个都没见个!少见多怪!<br>
什么叫汇编都不知道!

小毅 2004-3-4 16:15

re:好高深.

好高深.<br>

pippo09 2004-3-4 23:44

re:看过,感觉很神奇。。。

看过,感觉很神奇。。。

小毅 2004-3-5 01:18

re:刚才试了好神奇哦

刚才试了<br>
好神奇哦

monkeyking 2004-3-5 22:34

re:TO 半个圆圈你错了,汇编不是如此的...

TO 半个圆圈<br>
你错了,汇编不是如此的。虽然汇编接近机器语言,但是同样有很多与机器语言不同的,仍旧需要编译器将他转成激起语言。并且面对不同体系的机器,其机制指令是不相同的。<br>
楼主的代码是真正的机器码,只不过在现实的时候使用16进制,以减少文件大小。

阿秀 2004-3-19 22:59

re:[QUOTE][b]下面引用由[u]红茶...

<table width=100% bgcolor=#cccccc cellpadding=5 cellspacing=1 class=TBone><tr><td bgcolor=#f7f7f7 class=TBBG9><b>下面引用由<u>红茶杨威利</u>发表的内容:</b><br>
<br>
16位的代码.....只有改游戏的时候看得懂.....</td></tr></table><br>
<br>
<br>
<br>
呵呵~~是不是有的时候为了改错某个值,搞得整个游戏云里雾里的啊~~<br>
<br>
记得以前玩三国的时候改得我那个孔明巨变态的~~哈哈```<br>
<br>
游戏是改出来的~!<br>

monkeyking 2004-3-20 19:19

re:以下是我帮别人写的汇编课设代码,实现了时...

以下是我帮别人写的汇编课设代码,实现了时钟功能,程序启动时,获得系统时间,然后独立计时。让非计算机专业的认识一下汇编。<br>
<br>
<br>
;代码段<br>
COSEG SEGMENT<br>
ASSUME CS:COSEG<br>
<br>
;=====================<br>
;子程序SLEEP,用来延迟时间<br>
SLEEP PROC NEAR<br>
<br>
SLEEP1:<br>IN AL,61H ;装载61H<br>AND AL,10H<br>CMP AL,AH<br>JE SLEEP1<br>MOV AH,AL<br>LOOP SLEEP1<br>RET<br>
SLEEP ENDP <br>
<br>
;=====================<br>
;子程序TIMECOUNT,时间计数器<br>
TIMECOUNT PROC <br>
<br>INC DH ;秒累加<br>CMP DH,60 ;判断秒是否等于60<br>JNE TIMECOUNT1 ;不等于60返回主程序<br>MOV DH,0 ;等于60时秒清零<br>INC CL ;分钟累加<br>CMP CL,60 ;判断分钟是否等于60<br>JNE TIMECOUNT1 ;不等于60返回主程序<br>MOV CL,0 ;等于60时分钟清零<br>INC CH ;小时累加<br>CMP CH,24 ;判断小时是否等于24<br>JNE TIMECOUNT1 ;不等于24返回主程序<br>MOV CH,0 ;等于24时小时清零 <br>
TIMECOUNT1:<br>RET<br>
TIMECOUNT ENDP<br>
<br>
;=====================<br>
;主程序<br>
START:<br>MOV BH,10<br>MOV AX,0 ;所有寄存器清零<br>MOV AH,2CH ;调用DOS中断2C取得当前系统时间<br>INT 21H<br>
<br>
;=====================<br>
DISPLAY:<br>
;=====================<br>
;显示小时<br>MOV AX,0<br>MOV AL,CH<br>DIV BH<br>ADD AH,48<br>ADD AL,48<br>MOV BL,AH ;因为BL不需要使用,所以将AH的数值备份到BL中<br>MOV DL,AL ;显示十位<br>MOV AH,02H ;调用02H,准备显示字符<br>INT 21H ;调用DOS中断<br>MOV DL,BL ;显示个位<br>INT 21H<br>MOV DL,':' ;分隔符<br>INT 21H<br>
;======================<br>
;显示分钟<br>MOV AX,0<br>MOV AL,CL<br>DIV BH<br>ADD AH,48<br>ADD AL,48<br>MOV DL,AL ;显示十位<br>MOV BL,AH ;因为BL不需要使用,所以将AH的数值备份到BL中<br>MOV AH,02H<br>INT 21H<br>MOV DL,BL ;显示个位<br>INT 21H<br>MOV DL,':' ;分隔符<br>INT 21H<br>
;=====================<br>
;显示秒<br>MOV AX,0<br>MOV AL,DH<br>DIV BH<br>ADD AH,48<br>
ADD AL,48<br>
MOV DL,AL ;显示十位<br>
<br>MOV BL,AH ;因为BL不需要使用,所以将AH的数值备份到BL中<br>MOV AH,02H<br>INT 21H<br>MOV DL,BL ;显示个位<br>INT 21H<br>
;======================<br>
;延迟一秒<br>MOV BL,CL ;BL未使用,保存CL的值至BL<br>MOV DL,CH ;DL暂时未使用,保存CH的值至DL<br>MOV CX,33144 ;CX为15.08μm的倍数<br>CALL SLEEP<br>MOV CX,33144 ;CX为15.08μm的倍数<br>CALL SLEEP<br>
<br>
;======================<br>
;清除屏幕<br>MOV CX,8 ;循环计数器置为8<br>MOV AL,DL ;AL暂时未使用,DL数值保存至AL<br>
LOP: <br>MOV DL,8 ;8为退格符<br>MOV AH,02H <br>INT 21H ;显示退格符实现清屏<br>LOOP LOP ;因为在屏幕上已显示了8个字符,所以循环8次<br>
<br>
;======================<br>
;调用时间计数器<br>MOV CL,BL ;这两

雁南飞 2004-3-21 15:32

re:好看

好看

lgqhss 2004-4-29 13:17

re:[img]http://image2.s...

<IMG SRC=http://image2.sina.com.cn/ent/s/h/2002-06-05/2_28-3-326-58_2002060510530.jpg border=0 onLoad="javascript:if(this.width>570)this.width=570;" onMouseover="javascript:if(this.width>570)this.width=570;" align=absmiddle>

俫依噢哆 2004-4-29 13:25

re:[IMGA]http://image2....

<IMG SRC=http://image2.sina.com.cn/ent/s/h/2002-06-05/2_28-3-326-58_2002060510530.jpg border=0 alt=按此在新窗口浏览图片 onclick="javascript:window.open(this.src);" onLoad="javascript:if(this.width>570)this.width=570;" onMouseover="javascript:if(this.width>570)this.width=570;" style="cursor:hand" align=absmiddle>

俫依噢哆 2004-4-29 13:26

re:[IMGA]http://www.net...

<IMG SRC=http://www.netandtv.com/newspage/pic2004-2/small200424183147498539.jpg border=0 alt=按此在新窗口浏览图片 onclick="javascript:window.open(this.src);" onLoad="javascript:if(this.width>570)this.width=570;" onMouseover="javascript:if(this.width>570)this.width=570;" style="cursor:hand" align=absmiddle>

俫依噢哆 2004-4-29 13:27

re:[IMGA]http://www.cnh...

<IMG SRC=http://www.cnhongbo.com/sjsquare/e/e48/leadbbsfile/1.jpg border=0 alt=按此在新窗口浏览图片 onclick="javascript:window.open(this.src);" onLoad="javascript:if(this.width>570)this.width=570;" onMouseover="javascript:if(this.width>570)this.width=570;" style="cursor:hand" align=absmiddle>

楚楚动刃 2008-1-1 17:36

张庭和编程 有关系??

gchay 2008-2-10 20:32

确实不错,写AP也有N久了,DX也搞过一段时间,写window程序的人也就跟着微软尾巴后面走

雪舞漫天飞 2008-5-15 21:31

.....小声地问一句..我粘贴进去了怎么没反映
页: [1]
查看完整版本: 4K 程序极品---------Enjoy it :) 看了他编的code 你会自杀的!!太完美了!!