鱼C论坛

 找回密码
 立即注册
查看: 3699|回复: 8

[技术交流] 也晒下实验七。。

[复制链接]
发表于 2011-5-10 21:03:24 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能^_^

您需要 登录 才可以下载或查看,没有账号?立即注册

x
看了你们的代码,都是一个loop解决哦。真厉害。。。我先把我的贴出来。。。等下我看看我的也能不能搞成一个loop解决。。小鸟代码。。
assume cs:codesg  
data segment
db  '1975','1976','1977','1978','1979','1980','1981','1982','1983'
db  '1984','1985','1986','1987','1988','1989','1990','1991','1992'
db  '1993','1994','1995'
;以上是表示21年的21个字符串

dd  16,22,382,1356,2390,8000,16000,24486,50065,97479,140417,197514
dd  345980,590827,803530,1183000,184300,2759000,3753000,4649000,5937000

;以上是表示21年公司总收入的21个dword数据

dw 3,7,9,13,20,38,130,220,476,778,1001,1442,2258,2793,4037,5635,8226
dw 11542,14430,15257,17800

;以上是表示21年公司雇员人数的21个Word数据

data ends

table segment 
db 21 dup('year summ ne ?? ')
table ends


;要求将data中的数据以如下格式写入table段中,并计算21年中的人均收入(取整),结果也按照下面的格式保存在table段中。
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
;  思路:   总体上讲循环21次而中间将有小循环。。思考还要开辟一个栈。。  

stack segment
db 32 dup(0)    
stack ends
;开辟32个字节的栈空间备用

codesg segment
start:
        mov ax,stack
        mov ss,ax
        mov sp,32     ;初始化栈
        mov ax,data
        mov ds,ax     ;设置数据段 
        mov ax,table                  
        mov es,ax      ;操作段送es
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
;第一个loop 把年份复制过去

        mov cx,21
        mov bx,0
        mov bp,0

s0:
        push cx
        mov si ,0
        mov cx,4
s1:
        mov al,byte ptr ds:[si][bp]
        mov es:[si][bx],al
        inc si
        loop s1
        add bx,16
        add bp,4
        pop cx
        loop s0
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
;第二个loop拷贝
        mov bp,84                        ;总收入开始相对于ds:0的偏移是84
        mov di,0                           ;di 做ds的偏移
        mov cx,21                        ;第二次循环次数。
        mov bx,0                        ;bx 做es的偏移
s2:
        mov byte ptr es:[bx+4],32       ;空格的ASCII码为32
        mov byte ptr es:[bx+9],32 
        mov byte ptr es:[bx+0FH],32 
        mov byte ptr es:[bx+0FH],32     ;第4,9,C,f 为空格
        mov ax,ds:[bp]                                        ;收入低十六位
        mov es:[bx+5],ax              
        mov dx,ds:[bp+2]                                ;收入高十六位
        mov es:[bx+7],dx               ;放在dx中,做除法需要
        div word ptr ds:[168+di]
        mov es:[bx+0DH],ax              ;取整送入
        mov ax,ds:[168+di]
        mov es:[bx+10],ax               ;雇员数量        
;
        add bx,16
        add di,2
        add bp,4
        loop s2        
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
        mov ax,4c00H
        int 21H
codesg ends
end start 
1.jpg

评分

参与人数 2荣誉 +2 鱼币 +2 收起 理由
loop + 2 + 1 代码清晰明了,非常棒~
china0008 + 1 学习精神值得鼓励

查看全部评分

想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
发表于 2011-5-10 21:22:53 | 显示全部楼层
可以简化的。。。一次循环就能实现。。
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
 楼主| 发表于 2011-5-10 21:34:52 | 显示全部楼层
回复 陌路狂奔 的帖子

嗯。。。coding !呆会发上来。。
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
发表于 2011-5-10 22:20:03 | 显示全部楼层
你怎么有糖吃,只因为晒了图?强烈反对!
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
发表于 2011-5-11 06:48:28 | 显示全部楼层
本帖最后由 loop 于 2011-5-11 06:49 编辑


在这里说明一下,每个版主的看帖子的角度不同,并不是所有的帖子都会进行奖励。版主会根据帖子的可读性、代码是否清晰明了,是否需要版主进行2次编辑等,来参照是否进行奖励。

所以请不要在此进行闹板,如觉得版主不公正,不合理,带有情绪化,请移步至“投诉建议区”进行投诉\举报。

                                                            鱼C的发展离不开大家的支持和监督。
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
发表于 2011-5-11 09:34:46 | 显示全部楼层
回复 loop 的帖子

         开个玩笑,版主没必要那么严肃吧?比汇编还严肃!
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
 楼主| 发表于 2011-5-11 13:01:38 | 显示全部楼层
本帖最后由 风扫地 于 2011-5-11 13:07 编辑

....重写了。。嘿嘿。。一个loop  小有成就感下。。
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
 楼主| 发表于 2011-5-11 13:03:20 | 显示全部楼层
本帖最后由 风扫地 于 2011-5-11 17:45 编辑

又写了一下。挖哈哈。。。。一个loop 完成。。。。楼上的哥哥啊。。我是乖孩子。。所以有糖吃。。哼哼。。
assume cs:codesg  
data segment
db  '1975','1976','1977','1978','1979','1980','1981','1982','1983'
db  '1984','1985','1986','1987','1988','1989','1990','1991','1992'
db  '1993','1994','1995'
;以上是表示21年的21个字符串

dd  16,22,382,1356,2390,8000,16000,24486,50065,97479,140417,197514
dd  345980,590827,803530,1183000,184300,2759000,3753000,4649000,5937000

;以上是表示21年公司总收入的21个dword数据

dw 3,7,9,13,20,38,130,220,476,778,1001,1442,2258,2793,4037,5635,8226
dw 11542,14430,15257,17800

;以上是表示21年公司雇员人数的21个Word数据

data ends

table segment 
db 21 dup('year summ ne ?? ')
table ends


;要求将data中的数据以如下格式写入table段中,并计算21年中的人均收入(取整),结果也按照下面的格式保存在table段中。
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>


codesg segment
start:
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
        mov ax,data
        mov ds,ax     ;设置数据段 
        mov ax,table
        mov es,ax
        mov cx,21
        mov bx,0              ;es 段移动     每次递增 16
        mov bp,0              ;年份移动   总收入移动   每次递增四
        mov si,0              ;雇员移动     每次递增2
s0:
        mov byte ptr es:[bx+4],32
    mov byte ptr es:[bx+9],32
        mov byte ptr es:[bx+0Ch],32
        mov byte ptr es:[bx+0Fh],32              ;第 4  9  c  f 都为空格 ASCII码值为32
        mov ax, ds:[0+bp]
        mov es:[bx+0] ,ax
        mov ax,ds:[2+bp]
        mov es:[bx+2],ax            ;年份搬移
        
        mov  ax,ds:[84+bp+0]               ;送低十六位 除法准备
        mov es:[bx+5],ax                  ;低十六位搬移
        mov dx,ds:[84+bp+2]               ;送高十六位 除法准备
        mov es:[bx+7],ds                  ;高十六位搬移
        div word ptr ds:[168+si]
        mov es:[bx+0Dh],ax                ;总收入和平均收入搬移完成
        
        mov ax,ds:[168+si]
        mov es:[bx+0Ah],ax              ;搬移雇员人数
        
        add bx,16
        add bp,4
        add si,2
        
        loop s0
        
        
        
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
        mov ax,4c00H
        int 21H
codesg ends
end start 
temp.jpg

点评

学的很扎实,以后多交流多讨论,鱼C有你更精彩~  发表于 2011-5-11 17:28
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
发表于 2011-6-6 21:18:26 | 显示全部楼层
哪个人均收入那行代码我始终没看懂。。。。。那数据怎么取的值  求解释
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Archiver|鱼C工作室 ( 粤ICP备18085999号-1 | 粤公网安备 44051102000585号)

GMT+8, 2024-11-18 22:23

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

快速回复 返回顶部 返回列表