[汇编作业] 【王爽汇编】课程设计1，源码及详细分析。

assume ds:data,cs:code,SS:stack,ES:table
        
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'
        
  ;收入
  dd 16,22,382,1356,2390,8000,16000,24486,50065,97479,140417,197514
  dd 345980,690827,803530,1183000,1843000,2759000,3753000,4649000,593700
        
  ;人数
  dw 3,7,9,13,28,38,130,220,476,778,1001,1442,2258,2793,4037,5635,8226
  dw 11542,14430,45257,17800
data ends

;栈
stack segment
  Db 160 dup(0)
stack ends

;保存年份 收入 人数 平均工资 ，里面的空格我写了40个，这里面都是保存转换成ascii码后的数据
table segment
  DB 21 dup('                                         ')
table ends

code segment
start:
  MOV AX,data
  MOV DS,AX

  MOV AX,table
  MOV ES,AX

  MOV AX,stack
  MOV SS,AX
  MOV sp,160

  MOV CX,21
  MOV bx,0     ;索引年份和收入，每一个数据都是4个字节
  MOV SI,0     ;索引目标空间
  MOV DI,0     ;索引人数，每一个数据都是2个字节
  S:
    CALL chuansong   ;写入年份

    ;写入收入
    MOV AX,84[bx]     ;收入的低16位
    MOV DX,84[bx+2]   ;收入的高16位
    
    PUSH si
    add SI,8          ;从偏移地址为8的空间开始写入
    CALL xssr
    POP SI

    ;下面的写入人数，和计算平均工资，简单看看就能看懂，都是调用一个方法

    ;写入人数
    MOV AX,DS:168[di]
    MOV DX,0
  
    PUSH SI
   
    add SI,18
    CALL xssr
     
    POP SI


    ;写入平均工资

    PUSH CX 
    
    MOV AX,84[bx]
    MOV DX,84[bx+2]
    MOV CX,DS:168[di]
    
    CALL chufa     ;计算平均工资  
    
    POP cx

    ; 这里又和上面一样了
    PUSH si
    add SI,30
    CALL xssr
    POP SI

    ADD DI,2
    ADD bx,4
    ADD SI,40
  LOOP S

  ; 这下面就是 输出了很简单，我就不解释了，好累。
  MOV AX,0b800h
  MOV ES,AX
  MOV AX,table
  MOV DS,AX

  MOV DI,0
  MOV bx,0
  MOV CX,21
  s4:
    PUSH CX
    PUSH di

    MOV CX,40
    s5:
    MOV AL,[bx]
    MOV ES:[di],AL 
    MOV BYTE ptr ES:[DI+1],7

    ADD DI,2
    INC bx 
    LOOP s5
    
    POP DI
    POP cx
    ADD DI,160
    
  LOOP s4

  MOV AX,4c00h
  INT 21h


 



  ;因为年份本身就是以ascii码存放的，所以就不要转换，直接写到目标空间就行了
  chuansong:
    PUSH CX  
    PUSH SI
    PUSH bx
    PUSH ax
    
    MOV CX,4
    NF:
      MOV AL,[bx]
      MOV ES:[si],AL

      INC si
      INC bx 
    LOOP NF

    POP ax
    POP bx
    POP si
    POP CX
    RET 


  ;16位除法
  ;参数，（被除数）高位dx，低位cx，除数cx
  ;返回值，高位dx，低位cx，余数cx
  chufa:
    PUSH bx
    
    MOV bx,AX    ;先保存低16位
    MOV AX,DX    ;先计算高16位，将高16位给ax
    
    MOV DX,0     ;为了不影响 16 位除法运算 所以我清空dx ，这里不明白的可以百度 一下 div 16运算
    DIV CX
    PUSH AX      ;保存高位

    MOV AX,bx    ;bx 先前保存的是低16位 ，现在还原继续球低16位运算
    DIV CX

    MOV CX,DX    ;将余数给cx  ，ax存商的低16位，dx存高16位
    POP DX
    
    POP bx 
    RET




  ;
  xssr:
    PUSH CX 
    PUSH SI
    PUSH DI 
    
     ;di是用来记录 当前 数据的 位数  假如数据是1234  那di就是=4，
     ;这个di我用来将数据倒置，因为取余数，后的数据就变成 4321 了，数据就不对，
     ;所以我每次取一个余数就push 一次，然后记录次数，最后就pop出去，这样就能使数据不会倒过来
    
    MOV DI,0  
  H:
    
    MOV CX,10     ; 10进制除以10 取余数
    
    CALL chufa    ;取出余数，余数是放在cx里面，其实是在cl里面

    ADD CL,30h    ;将余数转换为ascii码， +30H，这里不明白为什么是加30H ，自己去对照ascii码表
    
    MOV CH,0      ;现在开始将每一次的余数压栈， 因为栈运算是操作2个字节，所以我用将ch置0，cl本身就是存放的余数。
    PUSH CX 
    
    INC DI        ;每一次入栈记录 次数
    
    MOV CX,DX     ;判断商是否为0 ，为零就不要在取余数了， dx存放高位商，前面解释过了
    JCXZ pdax     ;如果高位商为零， 说明 整个商 可能为零， 不过高位商不为零，那低位商也就不需要判断了，，说实话真麻烦
    
  JMP H  
  
  pdax:
    MOV CX,AX    ;判断 低位商是否为0
    JCXZ OK      ;如果这里被执行，说明 整个商为零，然后就开始pop了，真正的写入数据到目标空间
    JMP H
  OK:
    MOV CX,DI    ;di 为余数的个数，也就代表push了几次，所以我们就要循环pop几次
    zha:
      
      POP AX     ;将余数出栈
      MOV ES:[si],AL  ;前面入栈的时候  cl 为余数，ch为0， 所有al 对应 cl 
      INC SI     
    LOOP zha 
    POP DI 
    POP si
    POP CX 
    ret
code ends
end start