A program to find the factorial of a number.
Code:
DATA SEGMENT
NUM DB 05H
RESULT DW 0H
DATA ENDS
CODE SEGMENT
ASSUME CS: CODE, DS: DATA
START:
MOV AX,DATA
MOV DS,AX
MOV SI, OFFSET NUM
MOV DI, OFFSET RESULT
MOV CX, [SI]
MOV AX,CX
DEC CX
JUMP:
MUL CX
DEC CX
JNZ JUMP
MOV [DI],AX
CODE ENDS
END START
END
Output:
A program to generate Fibonacci Sequence.
Code:
ASSUME DATA:DS, CODE:CS
DATA SEGMENT
NUM_1 DB ?
NUM_2 DB ?
NUM_3 DB ?
V1 DB ?
V2 DB ?
NL DB ' ', 0DH,0AH,'$'
DATA ENDS
CODE SEGMENT
MOV AX,@DATA
MOV DX,AX
MOV CX,10
MOV CH,0
MOV NUM_1,0
MOV NUM_2,1
MOV DL,NUM_1
OR DL,30H
MOV AH,02H
INT 21H
MOV DL,NUM_2
OR DL,30H
MOV AH,02H
INT 21H
L1:
MOV AL,NUM_1
ADD AL,NUM_2
MOV AH,0
MOV BL,AL
MOV DL,10
DIV DL
ADD AX,3030H
MOV V1,AL
MOV V2,AH
MOV DL,V1
MOV AH,02H
INT 21H
MOV DL,V2
MOV AH,02H
INT 21H
SHIFT:
MOV AL,NUM_2
MOV NUM_1,AL
MOV NUM_2,BL
LOOP L1
MOV AX,4C00H
INT 21H
ENDS
END CODE
Output:
