我写得扫雷程序，用了子程序嵌套，呵呵，很爽！说明一下玩法，SXY,YXY,QXY,END分别代表踩雷，挖雷，取消挖雷和结束游戏，XY表示横纵坐标


STACK SEGMENT STACK
DB 10H DUP (0)
STACK ENDS
DATA SEGMENT
MESSAGE DB "YOU ARE BOMED !! $"
MESSAGE1 DB "GAME OVER !! $"
MESSAGE3 DB "THE REMAIN BOME IS : $"
MESSAGE4 DB "WOULD YOU LIKE TO START AGAIN? (Y\N) $"
XX0 DB 0,0,0,0,0,0,0
XX1 DB 0,0,0,0,0,1,0
XX2 DB 0,1,0,0,0,1,0
XX3 DB 0,1,0,0,0,1,0
XX4 DB 0,1,0,0,0,1,0
XX5 DB 0,1,0,0,0,1,0
XX6 DB 0,0,0,0,0,0,0
ADDR1 DW XX0,XX1,XX2,XX3,XX4,XX5,XX6
XXX0 DB 0,0,0,0,0,0,0
XXX1 DB 0,0,0,0,0,0,0
XXX2 DB 0,0,0,0,0,0,0
XXX3 DB 0,0,0,0,0,0,0
XXX4 DB 0,0,0,0,0,0,0
XXX5 DB 0,0,0,0,0,0,0
XXX6 DB 0,0,0,0,0,0,0
ADDR2 DW XXX0,XXX1,XXX2,XXX3,XXX4,XXX5,XXX6
XY DB 05H
DB ?
DB 05H DUP (?)
D1 DB 0 
DATA ENDS
CODE SEGMENT
ASSUME CS:CODE,DS:DATA
STA:
MOV AX,STACK
MOV SS,AX
MOV AX,DATA
MOV DS,AX
START1:
CALL XIANSHI
MOV CX,31H
MOV DI,OFFSET XXX0
MOV SI,OFFSET XX0
LP5:
MOV AL,[SI]
MOV BYTE PTR [DI],AL
INC SI
INC DI
LOOP LP5
START:
MOV DX,OFFSET XY
MOV AH,0AH
INT 21H
MOV DL,0DH
MOV AH,02H
INT 21H
MOV DL,0AH
MOV AH,02H
INT 21H
CMP BYTE PTR XY[2],"Y"
JNE  NEXT13

MOV AL,XY[4]
MOV SI,12*160
S1:
ADD SI,160
DEC AL
CMP AL,30H
JNE S1

MOV AL,XY[3]
MOV AH,00H
SUB AL,30H
ADD AL,AL
MOV BX,AX
MOV BYTE PTR ES:[SI+40*2+BX],"Y"

XOR BX,BX
MOV BL,BYTE PTR XY[3]
SUB BL,30H
MOV CL,BYTE PTR XY[4]
SUB CL,30H

MOV SI,OFFSET ADDR2
MOV CH,00H
SHL CX,01H
ADD SI,CX
MOV DI,[SI]
MOV BYTE PTR [DI+BX],00H

JMP START
NEXT13:
CMP BYTE PTR XY [2],"Q"
JNE NEXT14
MOV AL,XY[4]
MOV SI,12*160
S2:
ADD SI,160
DEC AL
CMP AL,30H
JNE S2
MOV AL,XY[3]
MOV AH,00H
SUB AL,30H
ADD AL,AL
MOV BX,AX
MOV BYTE PTR ES:[SI+40*2+BX],30H

XOR BX,BX
MOV BL,BYTE PTR XY[3]
SUB BL,30H
MOV CL,BYTE PTR XY[4]
SUB CL,30H
PUSH CX
MOV SI,OFFSET ADDR1
MOV CH,00H
SHL CX,01H
ADD SI,CX
MOV DI,[SI]
MOV AL,BYTE PTR [DI+BX]
POP CX
MOV SI,OFFSET ADDR2
MOV CH,00H
SHL CX,01H
ADD SI,CX
MOV DI,[SI]
MOV BYTE PTR [DI+BX],AL


JMP START


NEXT14:
CMP BYTE PTR XY[2],'S'
JE NEXT9
JMP NEXT10
NEXT9:
XOR BX,BX
MOV BL,BYTE PTR XY[3]
SUB BL,30H
MOV CL,BYTE PTR XY[4]
SUB CL,30H
MOV SI,OFFSET ADDR1
PUSH SI
PUSH CX
MOV CH,00H
SHL CX,01H
ADD SI,CX
MOV DI,[SI]
CMP BYTE PTR [DI+BX],01H
JNE NEXT11    
JMP NEXT12
NEXT11:
POP CX
POP SI
DEC BX
DEC CL
MOV CH,00H
SHL CX,1
ADD SI,CX
MOV DH,00H
MOV CX,03H
LP1:
PUSH CX
MOV CX,03H
MOV DI,[SI]
LP:
CMP BYTE PTR [DI+BX],01H
JNE NEXT
INC DH
NEXT:
INC DI
LOOP LP
POP CX
INC SI
INC SI
LOOP LP1
ADD DH,30H
MOV BYTE PTR D1[0],DH
JMP END3
XIANSHI PROC NEAR
MOV AX,0B800H
MOV ES,AX
XOR BX,BX
MOV AH,30H
MOV CX,06H
LP2:
MOV BYTE PTR ES:[160*12+40*2+BX],AH
INC AH
ADD BX,02H
LOOP LP2
MOV DX,05H
MOV AH,31H
MOV SI,160*13
LP7:
XOR BX,BX
CALL WRITE
INC AH
ADD SI,160
DEC DX
JNE LP7 
JMP END2
WRITE PROC NEAR
MOV CX,06H
LP3:
CMP CX,06H
JNE NEXT7
MOV BYTE PTR ES:[SI+40*2+BX],AH
JMP N3
NEXT7:
MOV BYTE PTR ES:[SI+40*2+BX],30H
N3:ADD BX,02H
LOOP LP3
RET
WRITE ENDP
END2:
RET
XIANSHI ENDP
END3:
MOV AL,XY[4]
MOV SI,12*160
S:
ADD SI,160
DEC AL
CMP AL,30H
JNE S
MOV AL,XY[3]
MOV AH,00H
SUB AL,30H
ADD AL,AL
MOV BX,AX
MOV DL,D1[0]
MOV BYTE PTR ES:[SI+40*2+BX],DL
JMP START
NEXT12:
MOV DX,OFFSET MESSAGE
MOV AH,09H
INT 21H
NEXT10:
XOR DX,DX
MOV SI,OFFSET XXX0
MOV CX,31H
LP6:
CMP BYTE PTR [SI],01H
JNE NEXT15
INC DH
NEXT15:
INC SI
LOOP LP6
PUSH DX 
MOV DX,OFFSET MESSAGE3
MOV AH,09H
INT 21H
POP DX
ADD DH,30H
MOV DL,DH
MOV AH,02H
INT 21H
MOV DL,0AH
MOV AH,02H
INT 21H
MOV DL,0DH
MOV AH,02H
INT 21H
MOV DX,OFFSET MESSAGE4
MOV AH,09H
INT 21H
MOV AH,01H
INT 21H
CMP AL,"Y"
JNE NEXT20
MOV DL,0AH
MOV AH,02H
INT 21H
MOV DL,0DH
MOV AH,02H
INT 21H 
JMP START1
NEXT20: 
MOV DX,OFFSET MESSAGE1
MOV AH,09H
INT 21H 
MOV AH,4CH
INT 21H
CODE ENDS
END STA