Question

.model small
.stack

.data
intro db 10,13,"Inserisci un carattere: ",'$'
finale db 10,13,"Il carattere inserito e' una lettera maiuscola.",'$'
finale2 db 10,13,"Il carattere inserito e' una lettera minuscola.",'$'
finale3 db 10,13,"Il carattere inserito e' un carattere speciale.",'$' 
finale4 db 10,13,"Il carattere inserito e' una cifra numerica.",'$'
errore db 10,13,"Il carattere inserito non rientra nel range verificabile.",'$'
domanda db 10,13,"Inserire un nuovo carattere? [s/n]: ",'$'
var1 db ?
risp db ?

.code
mov ax,@data
mov ds,ax

start:

lea dx,intro
mov ah,09h
int 21h

mov ah,01h
int 21h
mov var1,al

cmp var1,32
JL errore1
cmp var1,125
JG errore1
cmp var1,47
JLE speciale
cmp var1,57
JLE numero
cmp var1,64
JLE speciale
cmp var1,90
JLE maiuscola
cmp var1,96
JLE speciale
cmp var1,122
JLE minuscola
cmp var1,125
JLE speciale


middle:
JMP start

maiuscola:
lea dx,finale
mov ah,09h
int 21h

jmp domanda1

minuscola:
lea dx,finale2
mov ah,09h
int 21h

jmp domanda1

speciale:
lea dx,finale3
mov ah,09h
int 21h

jmp domanda1

numero:
lea dx,finale4
mov ah,09h
int 21h

jmp domanda1

domanda1:
lea dx,domanda
mov ah,09h
int 21h

mov ah,01h
int 21h
mov risp,al

cmp risp,115
je middle
jmp fine

fine:
mov ah,4ch
int 21h

errore1:
lea dx,errore
mov ah,09h
int 21h

JMP fine

end start

使用tasm和tlink不会返回错误但是一旦我运行它（使用DosBox），视频输出只显示奇怪的ASCII符号而不是文本（简介，结局，结局2）。如果用户想要/检查输入，那么在我修改它以便重新启动之前它工作得很好......

Answer 1

最后一行应该是

end

而不是

end start

此外，在ax之后清除mov ds,ax。我建议写一个main proc会更好。

运行汇编程序时输出奇怪

1 个答案: