2016-11-06 60 views
0
.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符號來代替文字(介紹,大結局,finale2)。 它工作得很好之前我爲了,如果用戶想/檢查輸入重啓修改了它......奇怪的輸出運行時的彙編程序

+0

不確定,但也許你應該在每個字符串後面加一個零字節。 –

+0

@ Jean-FrançoisFabreDOS只有在使用輸出函數時才需要** $ ** **字符串。 –

回答

1

的最後一行應該是

end 

,而不是

end start 

此外,在mov ds,ax之後清除ax。 我建議寫一個main proc將是更好的做法。

+0

是啊!改變'結束開始'到'結束'工作! – Gabriele

+0

在'MOV DS,AX'之後清除'AX'會有什麼意義?謹慎解釋? –

+0

它的*好習慣*就是這樣。 – AghaKhan