Computer-Organization-and-Assembly-Language/p2bcode8.asm at main · LubabaKhalid/Computer-Organization-and-Assembly-Language · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
TITLE AL-028 : An AL Program that will prompt the user to enter a hex digit
              ; character ( "0"..."9" or "A"..."F" ), display it on the next
              ; line in decimal, and ask the user if he or she wants to do it
              ; again. If the user types "y" or "Y", the program repeats; if
              ; the user types anything else, the program terminates. If the
              ; user enters an illegal character, prompt the user to try
              ; again. If the user fails to enter a hex digit character in
              ; three tries, display a message and terminate the program.

 .MODEL SMALL
 .STACK 100H

 .DATA
   PROMPT     DB  'Enter a HEX digit : $'
   DECIMAL    DB  'The equivalent Decimal digit is : $'
   CONTINUE   DB  'Do you want to do it again : $'
   ILLEGAL    DB  'Illegal Character - Enter 0..9 or A..F : $'
   TERMINATE  DB  'You failed to enter a HEX DIGIT, press any key to exit. $'
   NEXT_LINE  DB  0DH,0AH,"$"

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

     @START_1:                    ; jump label
       MOV AH, 9                  ; set string output function
       LEA DX, PROMPT             ; load and display the string PROMPT
       INT 21H

     @START_2:                    ; jump label
       MOV AH, 1                  ; read a character
       INT 21H

       MOV BL, AL                 ; save the character into BL

       CMP BL, "A"                ; compare BL with "A"
       JB @SINGAL_DIGIT           ; jump to label @SINGAL_DIGIT if BL<A

       CMP BL, "F"                ; compare BL with "F"
       JA @ILLEGAL_CHARACTER      ; jump to label @ILLEGAL_CHARACTER if BL>F

       JMP @GREATER_THAN_NINE     ; jump to label @GREATER_THAN_NINE

     @SINGAL_DIGIT:               ; jump label
       CMP BL, "0"                ; comapre BL with "0"
       JB @ILLEGAL_CHARACTER      ; jump to label @ILLEGAL_CHARACTER if BL<0

       CMP BL, "9"                ; compare BL with "9"
       JA @ILLEGAL_CHARACTER      ; jump to label #ILLEGAL_CHARACTER if BL>9

       JMP @LESS_THAN_TEN         ; jump to label @LESS_THAN_TEN

     @ILLEGAL_CHARACTER:          ; jump label
       INC CL                     ; increment CL

       CMP CL, 3                  ; compare CL and 3
       JE @TERMINATE              ; jump to label @TERMINATE if CL=3

       MOV AH, 9                  ; set string output function

       LEA DX, NEXT_LINE          ; load and display the string NEXT_LINE
       INT 21H

       LEA DX, ILLEGAL            ; load and display the string ILLEGAL
       INT 21H

       JMP @START_2               ; jump to label @START_2

     @LESS_THAN_TEN:              ; jump label
       MOV CL, 0                  ; move 0 to CL
       MOV AH, 9                  ; set string output function

       LEA DX, NEXT_LINE          ; load and display the string NEXT_LINE
       INT 21H

       LEA DX, DECIMAL            ; load and display the string DECIMAL
       INT 21H

       MOV AH, 2                  ; print the contents of BL
       MOV DL, BL
       INT 21H

       JMP @CONTINUE              ; jump to label @CONTINUE

     @GREATER_THAN_NINE:          ; jump label
       MOV CL, 0                  ; move 0 to CL
       MOV AH, 9                  ; set string output function

       LEA DX, NEXT_LINE          ; load and display the string  NEXT_LINE
       INT 21H

       LEA DX, DECIMAL            ; load and display the string DECIMAL
       INT 21H

       MOV AH, 2                  ; display the digit 1
       MOV DL, 31H
       INT 21H

       SUB BL, 11H                ; subtract 11H from BL to find 2nd digit

       MOV DL, BL                 ; display the 2nd digit
       INT 21H

     @CONTINUE:                   ; jump label
       MOV AH, 9                  ; set string output function

       LEA DX, NEXT_LINE          ; load and display the string NEXT_LINE
       INT 21H
       INT 21H

       LEA DX, CONTINUE           ; load and display the string CONTINUE
       INT 21H

       MOV AH, 1                  ; read a character
       INT 21H

       CMP AL, "y"                ; compare AL with "y"
       JE @JUMP                   ; jump to label @JUMP if AL=y

       CMP AL, "Y"                ; compare AL with "Y"
       JE @JUMP                   ; jump to label @JUMP if AL=Y

       JMP @END                   ; jump to label @END

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

       JMP @START_1               ; jump to label @START_1

     @TERMINATE:                  ; jump label
       MOV AH, 9                  ; set string output function

       LEA DX, NEXT_LINE          ; load and display the string NEXT_LINE
       INT 21H
       INT 21H

       LEA DX, TERMINATE          ; load and display the string TERMINATE
       INT 21H

       MOV AH, 1                  ; read a character
       INT 21H

     @END:                        ; jump label

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