さて、私は Intel ベースのコンピューターの宿題のアセンブリに取り組んでいます。教授は、簡単にするために 16 ビットで作業するように指示しています。割り当ては、ユーザーが入力した数値を取得し、それを ASCII から整数に変換してから、その整数を配列に格納することです。私はこの部分がうまく機能しています。次に、配列から整数を取り出して ASCII に変換し、画面に出力します。これも、印刷するまで、ほとんどの場合問題なく機能しています。
私は tasm を使用しており、デバッガーでコードをトレースすると、必要な数値が表示されますが、多くの空白といくつかの奇妙な文字に囲まれています。次に、コマンドプロンプトでコードを実行しようとすると、本当にめちゃくちゃな文字が表示され、クラッシュするようです。
編集:印刷は正常に機能するようになりましたが、残りは思ったよりもバグが多いことに気付きました。たとえば、2559 未満の数値を入力すると問題なく動作するように見えますが、2560 以上の数値を入力するとゼロ除算エラーが発生します。これについての助けをいただければ幸いです。
コードがどのように機能
するか 数値の入力を求めるプロンプトが表示されます (数値は任意の符号なし 16 ビット整数である必要があります)
数値を入力して Enter キーを押します
別の数値を入力します Enter キーを押します 別の数値を入力します Enter キーを
押します (上に入力できるはずです)この方法で 10 個の数字に)
数字の入力が完了したら、マイナス記号 "-"
を入力します。入力した数字が繰り返されます。
ここに私のコードがあります:
.MODEL small
.STACK 200h
CR EQU 13
LF EQU 10
.DATA
;variables used by InputNumber procedure
BinaryValue dw 0
CharacterCount dw 0
Index dw 0
Multiplier dw 1
InputString db 7 dup (0)
prompt2 db 'Enter A Number:', '$'
;variables used by LoadArray prcedure
prompt1 db 'You may enter up to 10 positive integers then enter a -1', CR, LF, '$'
userFlag db 0
numberArray dw 10 dup (0)
numArraySize dw 0
;variables for PrintArray
prompt3 db 'Array data is:', '$'
numSize dw 0
.CODE
Main proc
MOV ax, @data
MOV ds, ax
CALL LoadArray
CALL PrintArray
MOV ax, 4c00h
INT 21h
Main endp
LoadArray proc
; informs the user to enter numbers then enter a -1
MOV ah, 09h
MOV dx, offset prompt1
INT 21h
Mov di, 0
While1:
Mov BinaryValue, 0
Mov CharacterCount, 0
Mov Index, 0
Mov Multiplier, 1
Call InputNumber
Cmp userFlag, 0
Jne endWhile1
Mov bx, BinaryValue
Mov numberArray[di], bx
Inc di
Inc di
jmp While1
endWhile1:
Mov numArraySize, di
RET
LoadArray endp
InputNumber proc
MOV ah, 09h
MOV dx, offset prompt2
INT 21h
;Get character from keyboard
Mov ah, 01h
Int 21h
;while that character is not the enter key keep getting keys from the keyboard
Mov si, CharacterCount
while2:
Cmp al, 0Dh
Je endWhile2
Cmp al, 2Dh
Je endOfProc
Mov InputString[si], al
Inc si
Mov ah, 01h
Int 21h
jmp while2
endWhile2:
Mov CharacterCount, si
;initializing multiplier and index to the values needed
Mov Multiplier, 1
Dec si
Mov Index, si
;loop through InputString array pulling out each character, convert it by removing its ascii bits and muliplying it by its place value
Mov cx, CharacterCount
Mov CharacterCount, 0
convertLoop:
Mov al, InputString[si]
And ax, 0Fh
Mul Multiplier
Add BinaryValue, ax
Mov ax, 10
Mul Multiplier
Mov Multiplier, ax
Dec si
Loop convertLoop
RET
endOfProc:
Mov userFlag, 1
RET
InputNumber endp
PrintArray proc
MOV ah, 09h
MOV dx, offset prompt3
INT 21h
Mov si, 0
doWhile1:
Mov bx, numberArray[si]
Mov BinaryValue, bx
call DisplayNumber
Inc si
Inc si
Cmp si, numArraySize
jb doWhile1
RET
PrintArray endp
DisplayNumber proc
Mov ax, BinaryValue
;determine size of the number in BinaryValue
loop1:
Mov bl, 10
Div bl
cmp al, 0
je end1
Inc numSize
Mov ah, 0
jmp loop1
end1:
Inc numSize
Mov di, numSize
Mov InputString[di], '$'
dec di
Mov ax, 0
Mov ax, BinaryValue
while3:
cmp ax, 10
jb endWhile3
Div bl
Or ah, 30h
Mov InputString[di], ah
Mov ah, 0
dec di
jmp While3
endWhile3:
Or al, 30h
Mov InputString[di], al
;print the ascii characters stored in InputString to the screen
Mov dx, word ptr InputString[di]
Mov ah, 09h
Int 21h
Ret
DisplayNumber endp
end main
後の課題で必要になるので、機能するまでこれに取り組みます。どんな助けでも本当に感謝しています。コードをクリーンアップする方法、またはコードをより読みやすくする方法 (スタイルを含む) についての提案であっても。