Program In Assembly For this part, your MAL program must be in a file named p5b.

Question

Program In Assembly

For this part, your MAL program must be in a file named p5b.mal. It must have at least one function in addition to the main program. For the purposes of Part (b), you may assume the following 1. Any line of text typed by a user has at most 80 characters including the newline character. 2. A whitespace character refers to a space, a tab or the new line character. 3. A word is any sequence of characters that does not contain a whitespace character. In this part, you are required to write a MAL program that prompts the user for a line of text and reads the line typed by the user. If the line contains just white space characters your program should simply output the message "Line contains only white space characters." and stop. Otherwise, your program should compute and output the following (a) The number of non-whitespace characters in the line (b) The number of words in the line. c) The maximum length of a word in the line. (d) The minimum length of a word in the line. (e) The word of maximum length in the line. (If there are two or more words of maximum length in the line, then the program should print the word of maximum length that appears last in the line.)

Explanation / Answer

Program to enter line user

.DATA
PROMPT_1 DB 'Enter a line of text : $'
PROMPT_2 DB 0DH,0AH,'First Capital Letter : $'
PROMPT_3 DB 0DH,0AH,'Last Capital Letter : $'
PROMPT_4 DB 0DH,0AH,' ***** No Capital Letters *****$'

FLAG DB 0
FIRST_LETTER DB 5BH
LAST_LETTER DB 40H

.CODE
MAIN PROC
MOV AX, @DATA ; initialize DS
MOV DS, AX

LEA DX, PROMPT_1 ; load and display the string PROMPT_1
MOV AH, 9
INT 21H

MOV AH, 1 ; set input function

@INPUT: ; jump label
INT 21H ; read a character

MOV BL, AL ; set BL=AL

CMP BL, 0DH ; compare BL with CR
JE @END_INPUT ; jump to label @END_INPUT if BL=CR

CMP BL, "A" ; compare BL with "A"
JL @INPUT ; jump to label @INPUT if BL<A

MOV FLAG, 1 ; set FLAG=1

CMP BL, "Z" ; compare BL with "Z"
JG @INPUT ; jump to label @INPUT if BL>Z

CMP BL, FIRST_LETTER ; compare BL with variable FIRST_LETTER
JG @NEXT ; jump to label @NEXT if BL>FIRST_LETTER
MOV FIRST_LETTER, BL ; set FIRST_LETTER=BL

@NEXT: ; jump label
CMP BL, LAST_LETTER ; compare BL with variable LAST_LETTER
JL @INPUT ; jump to label @INPUT if BL<LAST_LETTER
MOV LAST_LETTER, BL ; set LAST_LETTER=BL

JMP @INPUT ; jump to label @INPUT

@END_INPUT: ; jump label

CMP FLAG, 1 ; compare FLAG with 1   
JE @DISPLAY ; jump to label @DISPLAY if FLAG=1

LEA DX, PROMPT_4 ; load and display the string PROMPT_4
MOV AH, 9
INT 21H

JMP @END ; jump to label @END

@DISPLAY: ; jump label
LEA DX, PROMPT_2 ; load and display the string PROMPT_2
MOV AH, 9
INT 21H

MOV AH, 2 ; set output function
MOV DL, FIRST_LETTER ; set DL=FIRST_LETTER
INT 21H ; print a character

LEA DX, PROMPT_3 ; load and display the string PROMPT_3
MOV AH, 9
INT 21H

MOV AH, 2 ; set output function
MOV DL, LAST_LETTER ; set DL=LAST_LETTER
INT 21H ; print a character

@END: ; jump label

MOV AH, 4CH ; return control to DOS
INT 21H
MAIN ENDP
END MAIN

.MODEL SMALL
.STACK 100H

.CODE
MAIN PROC
MOV AH, 1 ; read a character
INT 21H

MOV BL, AL ; save input character into BL

MOV AH, 2 ; carriage return
MOV DL, 0DH
INT 21H

MOV DL, 0AH ; line feed
INT 21H

MOV AH, 2 ; display the character stored in BL   
MOV DL, BL
INT 21H

MOV AH, 4CH ; return control to DOS
INT 21H

MAIN ENDP
END MAIN

Related Questions

Navigate

• Browse (All)
• Browse P
• Subjects

---

---

Integrity-first tutoring: explanations and feedback only — we do not complete graded work. Learn more.