mpc22.txt

来自「用汇编语言实现的类似DOS下打字的游戏」· 文本 代码 · 共 73 行

;mainpic 
WRITE MACRO A
	push dx
	push ax
	LEA DX,A
	MOV AH,9
	INT 21H
	pop ax
	pop dx
ENDM
data1 segment
	game db 'GAME$'
	result db 'RESULT$'
	exit db 'EXIT$'
data1 ends
stack1 segment stack
	db 200 dup (?)		
stack1 ends
code1 segment
	assume cs:code1,ss:stack1,ds:data1

mlist  proc far

	mov dx,0102h	;写主菜单字幕
	mov ah,	2
	int 10h
	
	mov cx,1
	write game		
	
	add dl,30
	mov ah,2
	int 10h
	write result

	add dl,30
	mov ah,2
	int 10h
	write exit

	mov dx,011fh	;写间隔线
	mov ah,2
	int 10h
	
	mov al,0bah
	mov ah,0ah
	int 10h 	

	mov dx,013Dh
	mov ah,2
	int 10h
	
	mov al,0bah
	mov ah,0ah
	int 10h 	


	mov dx,0201h	;写封口线
	mov ah,2
	int 10h

	mov al,0c4h
	mov cx,78
	mov ah,0ah
	int 10h
	
	ret
mlist endp
code1	ends
	;end