顯示‘中華’二字（用字模提取工具）

 

;在屏幕上顯示‘中華’，（字模提取工具）
;思路分析：將提取到的十六進制字節型字模數據均除以2
;放到內存段轉化成二進制
;（1）主程序（2）除法子程序div2（3）顯示子程序show
;ps:每個段的長度不超過64kB
assume cs:code
data segment
DB 002H,000H,012H,000H,002H,000H,012H,010H,002H,010H,022H,030H,07FH,0F8H,062H,0C0H
DB 042H,010H,0A3H,000H,042H,011H,02EH,008H,042H,010H,022H,008H,042H,010H,021H,0F8H
DB 07FH,0F0H,024H,000H,002H,000H,004H,000H,002H,001H,0FFH,0F8H,002H,000H,004H,000H
DB 002H,000H,004H,000H,002H,000H,004H,000H,000H,000H,000H,000H,000H,000H,000H,000H
db 512 dup(0)
data ends

code segment
start:mov ax,data
      mov ds,ax
      mov si,0
      mov di,64  ;空內存段的首地址

      mov cx,64   ;data段總共32個字節
   s: mov al,ds:[si]
      mov ah,0
      mov bl,2
      call div2
      inc si
      loop s

      mov di,64   ;轉化後的數據填充到內存段的首地址
      call show

      mov ax,4c00h
      int 21h
;名稱：div2
;功能:將16進制轉化成二進制數放到內存段中
;參數:ds:[si]指向字符串首地址,ds:[di]指向餘數存放的首地址
  div2:  push cx

         mov cx,8
   div2s0:div bl
          mov dl,al ;商暫存於dl中
   mov al,0
         push ax ;餘數入棧
         mov al,dl ;上次除法的商恢復到ax中
  loop div2s0

  mov cx,8
 div2s1: pop ax
         mov ds:[di],ah  ;餘數放入內存段中
  inc di
  loop div2s1

  pop cx
  ret
;名稱：show
;功能：按字節顯示字符，當爲0時顯示*，當爲1時顯示笑臉
;參數：ds:[di]指向字符串首地址
   show:push ax
        push cx
 push si
        mov ax,0b800h
        mov es,ax
 mov bx,5*160
 mov si,2*10
 mov cx,16     ;總共16行
shows0: push cx
 mov cx,32    ;總共32列
 shows1:mov al,ds:[di]
 cmp al,1
 jne next
 mov byte ptr es:[bx+si],03h;爲1則將此處變爲紅心
 mov byte ptr es:[bx+si+1],04h
 inc di
        add si,2
       loop shows1
       add bx,160
       mov si,2*10
       pop cx
       loop shows0

   next:mov byte ptr es:[bx+si],0 ;爲0則將此處變爲0
        inc di
 add si,2
 loop shows1
 add bx,160
 mov si,2*10
 pop cx
 loop shows0
     pop si
     pop cx
     pop ax
     ret

code ends

end start