9 |
• About
10 |
11 |
• How To Use
12 |
13 |
• License
14 |
15 |
• Related
16 |
17 |
• License
18 |
19 |
20 |
21 |
22 |
23 |
24 |
25 |
26 | ## About
27 |
28 | this is a larg group of assembly programs compiled and ready to use with both Code and Exe files ..
29 |
30 | you will find each program with three files at least..it is as follows :
31 |
32 | .asm(code file), .obj(object file), .exe(exutable file)..
33 |
34 |
35 | all these programs are coded and compiled using [GUI Turbo Assembler (TASM)](https://sourceforge.net/projects/guitasm8086/).
36 |
37 |
38 | ## How To Use
39 |
40 | To clone and edit these programs, you'll need [Git](https://git-scm.com) and [GUI Turbo Assembler (TASM)](https://sourceforge.net/projects/guitasm8086/).
41 |
42 |
43 | -From your command line:
44 |
45 | ```bash
46 | # Clone this repository
47 | $ git clone https://github.com/Mohamed-94/Group-of-Assembly-Programs-Samples--8086-85-Processors-family-
48 |
49 | # Go into the repository
50 | $ cd Group-of-Assembly-Programs-Samples--8086-85-Processors-family-
51 |
52 | ```
53 |
54 | *Note: If you're using Linux Bash for Windows, [see this guide](https://www.howtogeek.com/261575/how-to-run-graphical-linux-desktop-applications-from-windows-10s-bash-shell/) or use `node` from the command prompt.
55 |
56 | ## Credit:
57 | a lot of these programms had been written with the help of an old Arabian book, you can find it [here](https://www.kutub.info/library/book/2549)
58 |
59 | ## Related
60 |
61 | - [Mega-Number](https://github.com/Mohamed-94/Mega-Number) - Mega Number V.1.0 Desktop app.
62 |
63 |
64 | ## You may also like...
65 |
66 | - [Super Calculator](https://github.com/Mohamed-94/Super-Calculator_Cpp_CommandLine) - C++ CommandLine
67 | - [Dll for SQL Connection](https://github.com/Mohamed-94/DLL-for-SQL-Connection) - A Dll library for sql parsing.
68 |
69 | ## License
70 |
71 | MIT
72 |
73 | ---
74 |
75 | > GitHub [@Mohamed-94](https://github.com/Mohamed-94) ·
76 |
77 |
78 |
--------------------------------------------------------------------------------
/sun.asm:
--------------------------------------------------------------------------------
1 | TITLE SUN
2 | .MODEL SMALL
3 | .STACK 100H
4 | .DATA
5 | CR EQU 0DH
6 | LF EQU 0AH
7 | PROMPT DB 'TYPE A LINE OF TEXT',CR,LF,'$'
8 | NOCAP_MSG DB CR,LF,'NO CAPITALS $'
9 | CAP_MSG DB CR,LF,'FIRST CAPITAL ='
10 | FIRST DB ']$'
11 | DB ' LAST CAPITAL = '
12 | LAST DB '@ $'
13 | .CODE
14 | MAIN PROC
15 | ; initialize DS
16 | MOV AX,@DATA
17 | MOV DS,AX
18 | ;display opening message
19 | LEA DX,prompt
20 | MOV AH,09H
21 | INT 21H
22 | ;read and process a line of text
23 | MOV AH,01H
24 | INT 21H
25 | WHILE_:
26 | CMP AL,CR
27 | JE END_WHILE
28 | ;if char is capital
29 | CMP AL,'A'
30 | JNGE END_IF
31 | CMP AL,'Z'
32 | JNLE END_IF
33 | ; if character precede first capital
34 | CMP AL,FIRST
35 | JNL CHECK_LAST
36 | MOV FIRST,AL
37 | CHECK_LAST:
38 | ; if character follow last capital
39 | CMP AL,LAST
40 | JNG END_IF
41 | MOV LAST,AL
42 | END_IF:
43 | INT 21H
44 | JMP WHILE_
45 | END_WHILE:
46 | MOV AH,9
47 | ;if no capital were typed
48 | CMP FIRST,']'
49 | JNE CAPS
50 | LEA DX,NOCAP_MSG
51 | JMP DISPLAY
52 | CAPS:
53 | LEA DX,CAP_MSG
54 | DISPLAY:
55 | ;INT 21H
56 | ;exit to DOS
57 | MOV AH,4CH
58 | INT 21H
59 | MAIN ENDP
60 | END MAIN
61 |
62 | ;MOV AH,1
63 | ;REPEAT:
64 | ;INT 21H
65 | ;CMP AL ,'
66 | ;JNE REPEAT
67 |
68 | ;MOV CX,80
69 | ;MOV AH , 2
70 | ;MOV DL , *'
71 | ;Top: INT 21h
72 | ;LOOP top
73 |
74 | ;MOV AH , 1
75 | ;INT 21h
76 | ;CMP AL , y'
77 | ;JE then
78 | ;CMP AL ,Y'
79 | ;JE Then
80 | ;JMP else_
81 | ;Then: MOV DL,AL
82 | ;MOV AH , 2
83 | ;INT 21h
84 | ;JMP End_if
85 | ;else:
86 | ;MOV AH ,4ch
87 | ;INT 21h
88 | ;End_if:
89 |
90 |
91 | ;MOV AH , 1
92 | ;INT 21h
93 | ;CMP AL , A'
94 | ;JNGE End_IF
95 | ;CMP AL , Z'
96 | ;JNLE End_IF
97 | ;MOV DL , AL
98 | ;MOV AH , 2
99 | ;INT 21h
100 | ;End_IF:
101 |
102 |
103 | ;CMP AL , 1
104 | ;JE ODD
105 | ;CMP AL , 3
106 | ;JE ODD
107 | ;CMP AL , 2
108 | ;JE EVEN
109 | ;CMP AL , 4
110 | ;JE EVEN
111 | ;JMP END_CASE
112 | ;ODD: MOV DL , O'
113 | ;JMP DISPLAY
114 | ;EVEN: MOV DL , E'
115 | ;DISPLAY: MOV AH ,2
116 | ;INT 21H
117 | ;END_CASE:
118 |
119 |
120 | ;MOV AX,@DATA
121 | ;MOV DS,AX
122 | ;LEA DX,MSG
123 | ;MOV AH,2
124 | ;MOV CX,256
125 | ;MOV DL,0
126 | ;Print_Loop:
127 | ;INT 21H
128 | ;INC DL
129 | ;DEC CX
130 | ;JNZ PRINT_LOOP
131 | ;MOV AH,4CH
132 | ;INT 21H
133 | ;MAIN ENDP
134 | ;END MAIN
135 |
--------------------------------------------------------------------------------
/Compare.asm:
--------------------------------------------------------------------------------
1 |
2 | .MODEL SMALL
3 | .STACK 100H
4 | .DATA
5 | printCh dw '?'
6 | MSGS DB 0DH,0AH,'Start Time is $'
7 | Hs DB '?'
8 | Ms DB '?'
9 | Scs DB '?'
10 | HSs DB '?'
11 | MSGe DB 0DH,0AH,'Finish Time is $'
12 | He DB '?'
13 | Me DB '?'
14 | Se DB '?'
15 | HSe DB '?'
16 | MSGR DB 0DH,0AH,'Run Time is $'
17 | .CODE
18 | MAIN PROC
19 | ;initialization
20 | MOV AX , @DATA
21 | MOV DS , AX
22 | ; Get start time
23 | MOV AH,2CH
24 | INT 21H
25 | MOV Hs , CH
26 | MOV Ms , CL
27 | MOV Scs , DH
28 | MOV HSs , DL
29 | MOV AX,0B800h ;color active display
30 | page
31 | MOV DS,AX
32 | MOV AH,17H
33 | MOV BX,9
34 | DISPLAY_ALL:
35 | MOV AL,41h
36 | AGAIN:
37 | MOV DI,0
38 | MOV CX,2000d
39 | ;fill active display page
40 | FILL_BUF:
41 | MOV [DI],AX
42 | ADD DI,2
43 | LOOP FILL_BUF ;loop until done
44 | ADD AX,01H
45 | CMP AL,'Z'
46 | JLE AGAIN
47 | DEC BX
48 | JNZ DISPLAY_ALL
49 | ; Get finish time
50 | MOV AX , @DATA
51 | MOV DS , AX
52 | MOV AH,2CH
53 | INT 21H
54 | MOV He , CH
55 | MOV Me , CL
56 | MOV Se , DH
57 | MOV HSe , DL
58 | ; display start time
59 | MOV AH , 9
60 | LEA DX , MSGs
61 | INT 21H
62 | XOR AX , AX
63 | MOV AL , Hs
64 | CALL OUTDEC
65 | MOV DL , ':'
66 | MOV AH , 2
67 | INT 21H
68 | XOR AX , AX
69 | MOV AL , Ms
70 | CALL OUTDEC
71 | MOV DL , ':'
72 | MOV AH , 2
73 | INT 21H
74 | ;
75 | XOR AX , AX
76 | MOV AL , Scs
77 | CALL OUTDEC
78 | MOV DL , '.'
79 | MOV AH , 2
80 | INT 21H
81 | ;
82 | XOR AX , AX
83 | MOV AL , HSs
84 | CALL OUTDEC
85 | MOV DL , ':'
86 | MOV AH , 2
87 | INT 21H
88 | ; display finish time
89 | MOV AH , 9
90 | LEA DX , MSGe
91 | INT 21H
92 | XOR AX , AX
93 | MOV AL , He
94 | CALL OUTDEC
95 | MOV DL , ':'
96 | MOV AH , 2
97 | INT 21H
98 | ;
99 | XOR AX , AX
100 | MOV AL , Me
101 | CALL OUTDEC
102 | MOV DL , ':'
103 | MOV AH , 2
104 | INT 21H
105 | ;
106 | XOR AX , AX
107 | MOV AL , Se
108 | CALL OUTDEC
109 | MOV DL , '.'
110 | MOV AH , 2
111 | INT 21H
112 | ;
113 | XOR AX , AX
114 | MOV AL , Hse
115 | CALL OUTDEC
116 | MOV DL , ':'
117 | MOV AH , 2
118 | INT 21H
119 | ; display run time
120 | MOV AH , 9
121 | LEA DX , MSGR
122 | INT 21H
123 | XOR AX , AX
124 | MOV AL , He
125 | SUB AL , Hs
126 | CALL OUTDEC
127 | MOV DL , ':'
128 | MOV AH , 2
129 | INT 21H
130 | XOR AX , AX
131 | MOV AL , Me
132 | SUB AL , Ms
133 | CALL OUTDEC
134 | MOV DL , ':'
135 | MOV AH , 2
136 | INT 21H
137 | XOR AX , AX
138 | MOV AL , Se
139 | SUB AL , Scs
140 | CALL OUTDEC
141 | MOV DL , '.'
142 | MOV AH , 2
143 | INT 21H
144 | XOR AX , AX
145 | MOV AL , HSe
146 | SUB AL , HSs
147 | CALL OUTDEC
148 | ; dos exit
149 | MOV AH,4CH
150 | INT 21H
151 | MAIN ENDP
152 | Include DES_NUM.asm
153 | END MAIN
--------------------------------------------------------------------------------
/DES_NUM.asm:
--------------------------------------------------------------------------------
1 | .MODEL SMALL
2 | .STACK 100H
3 | .DATA
4 | .CODE
5 | OUTDEC PROC
6 | ; Prints AX as a signed decimal integer
7 | ; input : AX
8 | ; Output : None
9 | PUSH AX
10 | PUSH BX
11 | PUSH CX
12 | PUSH DX
13 | ;if AX < 0
14 | OR AX , AX
15 | JGE @END_IF1
16 | ;Then
17 | PUSH AX
18 | MOV DL , '-'
19 | MOV AH,2
20 | INT 21H
21 | POP AX
22 | NEG AX
23 | @END_IF1:
24 | XOR CX , CX ;Get Decimal Digit
25 | MOV BX , 10D
26 | @REPEAT1:
27 | XOR DX , DX
28 | DIV BX
29 | PUSH DX
30 | INC CX
31 | OR AX , AX
32 | JNE @REPEAT1
33 | ;Convert Digits to characters and print them
34 | MOV AH , 2
35 | @PRINT_LOOP:
36 | POP DX
37 | OR DL , 30H
38 | INT 21H
39 | LOOP @PRINT_LOOP
40 | POP DX
41 | POP CX
42 | POP BX
43 | POP AX
44 | RET
45 | OUTDEC ENDP
46 | INDEC PROC
47 | ; Reads a number in range -32768 to 32767
48 | ; input : None
49 | ; Output : AX = Binary equivalent Of Number
50 | PUSH BX
51 | PUSH CX
52 | PUSH DX
53 | @BEGIN: MOV AH , 2
54 | MOV DL , '?'
55 | INT 21H
56 | XOR BX , BX ; total =0
57 | XOR CX , CX
58 | ;Read A Character
59 | MOV AH , 1
60 | INT 21H
61 | ;Case Char of
62 | CMP AL ,'-'
63 | JE @MINUS
64 | CMP AL , '+'
65 | JE @PLUS
66 | JMP @REPEAT2
67 | @MINUS: MOV CX , 1
68 | @PLUS: INT 21H
69 | @REPEAT2:;If Character Between 0 AND 9
70 | CMP AL , '0'
71 | JNGE @NOT_DIGIT
72 | CMP AL , '9'
73 | JNLE @NOT_DIGIT
74 | ; Convert Character To Digit
75 | AND AX ,000FH
76 | PUSH AX
77 | ; TOTAL = TOTAL * 10 + DIGIT
78 | MOV AX , 10 ;Get 10
79 | MUL BX ;AX = TOTAL * 10
80 | POP BX ;RETRIEVE DIGIT
81 | ADD BX , AX ; TOTAL =
82 | ;Read A Character
83 | MOV AH , 1
84 | INT 21H
85 | CMP AL,0DH
86 | JNE @REPEAT2
87 | MOV AX , BX
88 | OR CX , CX
89 | JE @EXIT
90 | NEG AX
91 | @EXIT: POP DX
92 | POP CX
93 | POP BX
94 | RET
95 | @NOT_DIGIT:
96 | MOV AH , 2
97 | MOV DL , 0DH
98 | INT 21H
99 | MOV DL , 0AH
100 | INT 21H
101 | JMP @BEGIN
102 | INDEC ENDP
103 | SELECT PROC
104 | ;SORTS A BYTE ARRAY BY THE
105 | ;SELECTSORT METHOD
106 | ;INPUTS:SI= ARRAY OFFSET ADDRESS
107 | ; BX=NUMBER OF ELEMENTS
108 | ;OUTPUTS:SI=OFFSET OF SORTED ARRAY
109 | ;USES:SWAP
110 | PUSH BX
111 | PUSH CX
112 | PUSH DX
113 | PUSH SI
114 | DEC BX
115 | JE END_SORT
116 | MOV DX , SI
117 | SORT_LOOP:
118 | MOV SI , DX
119 | MOV CX , BX
120 | MOV DI , SI
121 | MOV AL , [DI]
122 | FIND_BIG:
123 | INC SI
124 | CMP [SI], AL
125 | JNG NEXT
126 | MOV DI , SI
127 | MOV AL , [DI]
128 | NEXT:
129 | LOOP FIND_BIG
130 | CALL SWAP
131 | DEC BX
132 | JNE SORT_LOOP
133 | END_SORT:
134 | PUSH SI
135 | PUSH DX
136 | PUSH CX
137 | PUSH BX
138 | SELECT ENDP
139 | SWAP PROC
140 | ;INPUT: SI=ONE ELEMENT
141 | ; DI=OTHER ELEMENT
142 | ;OUTPUT:EXCHANGED ELEMENTS
143 | PUSH AX
144 | MOV AL , [SI]
145 | XCHG AL , [DI]
146 | MOV [SI] , AL
147 | POP AX
148 | RET
149 | SWAP ENDP
150 | MULTIPLY PROC
151 | PUSH AX
152 | PUSH BX
153 | XOR DX ,DX
154 | JNZ REPEAT_A
155 | TEST BX ,1
156 | JZ END_IF
157 | ADD DX ,AX
158 | END_IF:
159 | SHL AX ,1
160 | SHR BX ,1
161 | REPEAT_A:
162 | POP BX
163 | POP AX
164 | RET
165 | MULTIPLY ENDP
166 | READ_STR PROC NEAR
167 | ;READS AND STORES A STRING
168 | ;INPUT: DI ODFFSET OF THE STRING
169 | ;OUTPUT: DI OFFSET OF THE STRING
170 | ; BX=NUMBER OF CHARACTERS
171 | PUSH DX
172 | PUSH DI
173 | CLD
174 | XOR BX , BX
175 | MOV AH , 1
176 | INT 21H
177 | WHILE1:
178 | CMP AL , 0DH
179 | JE END_WHILE1
180 | ;IF CHARACTER IS BACHSPACE
181 | CMP AL , 8H
182 | JNE ELSE1
183 | DEC DI
184 | DEC BX
185 | JMP READ
186 | ELSE1:
187 | STOSB
188 | INC BX
189 | READ:
190 | INT 21H
191 | JMP WHILE1
192 | END_WHILE1:
193 | POP DI
194 | POP AX
195 | RET
196 | READ_STR ENDP
--------------------------------------------------------------------------------