;调试了一下午，放弃了，程序实在找不出错了，用的windows7，cmd和command不行，装了虚拟机也不行，只要往0:[36]里写值就溢栈，不可能再装个实DOS调了，先放这里。
;按评论达人指出的错误进行了编辑修改了。

assume cs:code

stack segment
        db 128 dup(0)
stack ends

code segment
start:        mov ax,stack
        mov ss,ax
        mov sp,32

        mov ax,0
        mov es,ax        
        push es:[36]
        pop es:[200h]
        push...

assume cs:code

data segment
        db 0,0,'/',0,0,'/',0,0,20h,0,0,':',0,0,':',0,0,'$'
data ends

code segment
start:        mov ax,data
        mov ds,ax

        mov di,9
        mov si,0
        mov cl,3

s:        push cx
        mov ax,di
        out 70h,al
        in al,71h
        mov ah,al
        mov cl,4
        shr ah,cl
        and al,00001111b
        add ah,30h
        ad...

assume cs:code

data segment
        db 'Hello World!'
data ends

code segment
start:        mov ax,0 
        mov es,ax 
        mov word ptr es:[7ch*4],0200h 
        mov word ptr es:[7ch*4][2],0000h 

        mov ax,cs 
        mov ds,ax 
        mov si,offset int7c 
        mov di,200h 
      ...

assume cs:code

data segment
        db 'Hello World!',0
data ends

code segment
start:        ;安装中断例程
        mov ax,0
        mov es,ax
        mov word ptr es:[7ch*4],0200h
        mov word ptr es:[7ch*4][2],0000h

        mov ax,cs
        mov ds,ax
        mov si,offset int7c
        mov di,200h
        mov cl,offset int7cf-offset int7c
        cld
        rep movs...

;0号中断程序

assume cs:code

code segment
start:        mov ax,cs
        mov ds,ax
        mov si,offset int0
        mov ax,0
        mov es,ax
        mov di,0200h
        mov cx,offset int0_E-offset int0
        cld
        rep movsb

        mov ax,0
        mov es,ax
        mov word ptr es:[0],020dh
        mov word ptr es:[2],0
mov ax,4c00h
int 21h

int0:        db 'Div...

assume cs:codesg

datasg segment
        db "Beginner's All-purpose Symblic Instruction Code.",0
datasg ends

codesg segment
begin:        mov ax,datasg
        mov ds,ax
        mov si,0
        call letterc

mov ax,4c00h
int 21h

letterc:
ltc_s:        mov al,ds:[si]
        mov cl,al
        mov ch,0
        jcxz ltc_ok
        cmp al,061h
        jb ...

;计划用“year”五位、“income”十位、“FTE”七位、“AVG”五位列表，加间隔五位，一行需32位，占32字节，偏移20h为一行。加表头一共22行。结果显屏为逐行显示。

assume cs:code 

data1 segment 
        db '1975','1976','1977','1978','1979','1980','1981','1982' 
        db '1983','1984','1985','1986','1987','1988','1989','1990' 
        db '1991','1992','1993','1...

;终于调试成功了，累晕了，不想再优化了，记下几点：
;(1)用SS做逆序用的中转段，没用栈，也可以直接用data段，位移偏离就行
;(2)用位移偏离归零判断循环结束，有时候比数据为零判断要方便，尤其调试中老往栈里压东东
;(3)栈操作是双字节操作，以为取单字节数据不方便，犯糊涂了，其实位移两位地push，再位移两位地pop，赋值给单字节数据就行，写完了才想起
;(4)很欣慰屏显子程序直接调用了，一点不用改，得记着子程序把数据接口描述全面清楚了，比保存现场更保险
;(5)子程序多了，象jcxz　ok这种标号就冲突大了，以后用子程序_OK之类的格式好

assume cs:codes...

;名称：divdw
;功能：进行不会溢出的除法，被除数为dword型，除数为word型，结果为dword型
;参数：(ax)=被除数低16位、(dx)=被除数高16位、(cx)=除数
;返回：(dx)=结果的高16位、(ax)=结果的低16位、(cx)=余数

assume cs:codesg

codesg segment
start:        mov ax,4240h
        mov dx,000fh
        mov cx,0ah
        call divdw
mov ax,4c00h
int 21h

divdw:        mov bp,ax        ;保存低位数据
        mov ax,dx        ;高位数...

;名称：show_str
;功能：在指定的位置，用指定颜色显示用0结束的字符串
;参数：(dh)=行号，范围0~24。(dl)=列号，范围0~79。(cl)=颜色。ds:si指向字

符串首地址

assume cs:codesg

datasg segment
        db 'Welcome to masm!',0
datasg ends

codesg segment
start:
        mov dh,8
        mov dl,3
        mov cl,2
        mov ax,datasg
        mov ds,ax
        mov si,0
        call show_str

mov ...