bububu calpshit

	.MODEL SMALL
	.STACK 100H
	.DATA
A DW ?
B DB ?
REM DB ?
TOT DB ?

MESS DB 10, 13, "ENTER FIRST NUMBER: $"
MESS1 DB 10, 13, "ENTER SECOND NUMBER: $"
MESS2 DB 10, 13, "CANNOT DIVIDE BY 0!$"
MESS3 DB 10, 13, "THE REMAINDER IS: $"
TOTMESS DB 10, 13, "THE TOTAL QUOTIENT IS: $"

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

	MOV DX, OFFSET MESS
	MOV AH, 9H
	INT 21H

	MOV AH, 1H
	INT 21H
	MOV A, AX
	SUB A, 48

	MOV DX, OFFSET MESS1
	MOV AH, 9H
	INT 21H

	MOV AH, 1H
	INT 21H
	MOV B, AL
	SUB B, 48

	CMP B, 0
	JNE LABEL1
	JE LABEL2
	JMP EXIT


LABEL1:
	MOV DX, OFFSET TOTMESS
	MOV AH, 9H
	INT 21H

	MOV AX, A
	MOV AH, 00
	DIV B
	MOV TOT, AL
	MOV REM, AH

	ADD TOT, 48
	MOV AH, 2H
	MOV DL, TOT
	INT 21H

	MOV DX, OFFSET MESS3
	MOV AH, 9H
	INT 21H


	ADD REM, 48
	MOV AH, 2H
	MOV DL, REM
	INT 21H
	JMP EXIT

LABEL2:
	MOV DX, OFFSET MESS2
	MOV AH, 9H
	INT 21H
	JMP EXIT


EXIT:
	MOV AH, 4CH
	INT 21H
	RET
	MAIN ENDP
	END MAIN