PROGRAM:

ADDITION OF TWO 8-BIT NUMBERS

LABEL

ADDRESS

MNEMONICS

OPCODE
C3

COMMENT

8000

CLR C

8001

MOV DPTR,#8500H

8004

MOVX A,@DPTR

E0

Get the first data to ACC

8005

MOV R0,A

F8

Move the content of ACC to R0

8006

INC DPTR

A3

Increment the data pointer

8007

MOVX A,@ DPTR

E0

Get the second data to ACC

8008

ADD A,R0

28

Add the contents of ACC and R0

8009

INC DPTR

A3

Increment the data pointer

800A

MOVX @DPTR,A

F0

Store the result in data pointer

800B

LCALL 00BB

90 85 00

12 00 BB

Clear the carry flag

Move the address to data pointer

Stop

Subtraction Of Two 8-Bit Numbers

LABEL

ADDRESS

MNEMONICS

OPCODE
C3

COMMENT

8000

CLR C

8001

MOV DPTR,#8500H

8004

MOVX A,@DPTR

E0

Get the first data to ACC

8005

MOV R0,A

F8

Move the content of ACC to R0

8006

INC DPTR

A3

Increment the data pointer

8007

MOVX A,@ DPTR

E0

Get the second data to ACC

8008

SUBB A,R0

98

Subtract the contents of ACC & R0

8009

INC DPTR

A3

Increment the data pointer

800A

MOVX @DPTR,A

F0

Store the result in data pointer

800B

LCALL 00BB

90 85 00

12 00 BB

Clear the carry flag

Move the address to data pointer

Stop

PROGRAM:
Addition Of Two 16-Bit Numbers

LABEL

ADDRESS

MNEMONICS

OPCODE
C3

COMMENT

8000

CLR C

8001

MOV DPTR,#8500H

8004

MOVX A,@DPTR

E0

Get the first MSB data to ACC

8005

MOV R0,A

F8

Move the content of ACC to R0

8006

INC DPTR

A3

Increment the data pointer

8007

MOVX A,@DPTR

E0

Get the first LSB data to ACC

8008

MOV R1,A

F9

Move the content of ACC to R1

8009

INC DPTR

A3

Increment the data pointer

800A

MOVX A,@DPTR

E0

Get the second MSB data to ACC

800B

MOV R2,A

FA

Move the content of ACC to R2

800C

INC DPTR

A3

Increment the data pointer

800D

MOVX A,@DPTR

E0

Get the second LSB data to ACC

800E

ADD A,R1

29

Add the contents of ACC & R1

800F

INC DPTR

A3

Increment the data pointer

8010

MOVX @DPTR,A

F0

Store the LSB result in data pointer

8011

MOV A,R0

E8

Move the content of R0 to ACC

8012

ADDC A,R2

3A

Add the contents of ACC & R2 with carry

8013

INC DPTR

A3

Increment the data pointer

8014

MOVX @DPTR,A

F0

Store the MSB result in data pointer

8015

LCALL 00BB

90 85 00

12 00 BB

Clear the carry flag

Move the address to data pointer

Stop

PROGRAM:
Multiplication Of Two 8-Bit Numbers

LABEL

ADDRESS

MNEMONICS

OPCODE

8000

CLR C

8001

MOV DPTR,#8500H

8004

MOVX A,@DPTR

8005

MOV B,A

F5 F0

8007

INC DPTR

A3

Increment the data pointer

8008

MOVX A,@DPTR

E0

Get the second data to ACC

8009

MUL AB

A4

Multiply the contents of ACC & B

800A

INC DPTR

A3

Increment the data pointer

800B

MOVX @DPTR,A

F0

Store the LSB result in data pointer

800C

MOV A,B

E5 F0

Move the content of B reg to ACC

800E

INC DPTR

A3

Increment the data pointer

800F

MOVX @DPTR,A

F0

Store the MSB result in data pointer

8010

LCALL 00BB

PROGRAM:

C3

COMMENTS

90 85 00
E0

12 00 BB

Clear the carry flag

Move the address to data pointer
Get the first data to ACC
Move the content of ACC to B reg

Stop

Ascending Order

LABEL

AGAIN

COUNT

COMP

CHNG

ADDRESS

MNEMONICS

OPCODE

8000

CLR C

8001

MOV DPTR,#8500H

8004

MOVX A,@DPTR

E0

Get the count in ACC

8005

MOV R0,A

F8

Initialize outer loop count in R0

8006

MOV R3,A

FB

Get the count in R3

8007

MOV DPTR,#8501H

800A

MOV A,R3

EB

Move the content of R3 to ACC

800B

MOV R1,A

F9

Initialize inner loop count in R1

800C

DJNZ R1,COMP

D9 05

Decrement R1.If not zero, jump to COMP

800E

DJNZ R0,AGAIN

D8 F7

Decrement R0.If not zero, jump to AGAIN

8010

LCALL 00BB

12 00 BB

8013

MOV R2,DPL

AA 82

8015

MOVX A,@DPTR

8016

MOV B,A

75 F0

8018

INC DPTR

A3

Increment the data pointer

8019

MOVX A,@DPTR

E0

Get the next data in ACC

801A

CJNE A,B,CHNG

B5 F0 02

801D

SJMP COUNT

80 ED

Short-jump to the label COUNT

801F

JNC COUNT

50 EB

If carry flag is not set, jump to label COUNT

8021

MOV DPL,R2

8A 82

Load the lower byte DPTR address from R2

8023

MOVX @DPTR,A

F0

Move the ACC data to DPTR

8024

INC DPTR

A3

Increment the data pointer

8025

MOV A,B

E5 F0

8027

MOVX @DPTR,A

8028

SJMP COUNT

PROGRAM:

C3

COMMENTS

90 85 00

90 85 01

E0

F0
80 E2

Clear the carry flag

Move the address 8500 to data pointer

Move the address 8501 to data pointer

Stop
LSB of DPTR is stored in R2
Get the first data in ACC
Move the ACC content to B reg

Compare ACC & B,if not equal, jump to CHNG

Move the content of B reg to ACC

Move the ACC data to DPTR
Short-jump to the label COUNT

Maximum Value In An Array

LABEL

CONT

LAST

CHNG

ADDRESS

MNEMONICS

OPCODE
C3

COMMENTS

8000

CLR C

8001

MOV DPTR,#8500H

8004

MOVX A,@DPTR

E0

Get the count in ACC

8005

MOV R5,A

FD

Move the ACC content to R5

8006

INC DPTR

A3

Increment the data pointer

8007

MOVX A,@DPTR

E0

Get the first data

8008

DEC R5

1D

Decrement the count

8009

MOV 40H,A

800B

INC DPTR

A3

Increment the data pointer

800C

MOVX A,@DPTR

E0

Get the next data

800D

CJNE A,40H,CHNG

8010

90 85 00

F5 40

Clear the carry flag

Move the address 8500 to data pointer

Move the ACC content to 40H address

B5 40 09

Compare A & 40H,if not equal,jump to CHNG

DJNZ R5,CONT

DD F9

Decrement R5.If not zero, jump to label CONT

8012

MOV A,40H

E5 40

Get the largest value

8014

INC DPTR

A3

Increment the data pointer

8015

MOVX @DPTR,A

F0

Store the largest value

8016

LCALL 00BB

8019

JC LAST

40 F5

If carry flag is set, then jump to label LAST

801B

MOV 40H,A

F5 40

Move the larger value in 40H address

801D

SJMP LAST

80 F1

Short-jump to label LAST

PROGRAM:

12 00 BB

Stop

ASCII to HEX Conversion

LABEL

ADDRESS

MNEMONICS

OPCODE

8000

CLR C

8001

MOV DPTR,#8500H

8004

MOVX A,@DPTR

8005

MOV R0,#30H

8007

SUBB A,R0

8008

CJNE A,#0AH,LOOP1

800B

SUBB A,#07H

94 07

Subtract ACC & the data 07H

800D

SJMP LOOP3

80 02

Short jump to the label LOOP3

LOOP1

800F

JNC LOOP2

50 FA

If carry flag is not set, then jump to LOOP2

LOOP3

8011

INC DPTR

A3

Increment the data pointer

8012

MOVX @DPTR,A

F0

Store the result in DPTR

8013

LCALL 00BB

LOOP2

PROGRAM:

C3

COMMENTS

90 85 00

Clear the carry flag

Move the address 8500 to data pointer

E0

Get the input data in ACC

78 30

Store the data 30H in R0

98
B4 0A 04

12 00 BB

Subtract the content of ACC & R0

Compare ACC & 0AH,if not equal,goto LOOP1

Stop

HEX to ASCII Conversion

LABEL

LOOP2
LOOP1
LOOP3

ADDRESS

MNEMONICS

OPCODE

8000

CLR C

8001

MOV DPTR,#8500H

8004

MOVX A,@DPTR

8005

CJNE A,#0AH,LOOP1

8008

ADD A,#37H

24 37

Add ACC & the data 37H

800A

SJMP LOOP3

80 04

Short jump to the label LOOP3

800C

JNC LOOP2

50 FA

If carry flag is not set, then jump to LOOP2

800E

ADD A,#30H

24 30

Add ACC & the data 37H

8010

INC DPTR

A3

Increment the data pointer

8011

MOVX @DPTR,A

F0

Store the result in DPTR

8012

LCALL 00BB

PROGRAM:

C3

COMMENTS

90 85 00
E0
B4 0A 04

12 00 BB

Clear the carry flag

Move the address 8500 to data pointer
Get the input data in ACC
Compare ACC & 0AH,if not equal,goto LOOP1

Stop

BCD to HEX Conversion

LABEL

ADDRESS

MNEMONICS

OPCODE

8000

CLR C

8001

MOV DPTR,#8500H

8004

MOVX A,@DPTR

8005

MOV B,#64H

8008

MUL AB

A4

Multiply the content of ACC & B-reg

8009

MOV R0,A

F8

Move the content of ACC to R0

800A

INC DPTR

A3

Increment the data pointer

800B

MOVX A,@DPTR

E0

Get the input LSB data in ACC

800C

ANL A,#0FH

800E

MOV R1,A

F9

Move the content of ACC to R1

800F

MOVX A,@DPTR

E0

Get the input LSB data in ACC

8010

ANL A,#F0H

8012

SWAP A

8013

MOV B,#0AH

8016

MUL AB

A4

Multiply the content of ACC & B-reg

8017

ADD A,R1

29

Add the content of ACC & R1

8018

ADDC A,R0

38

Add the content of ACC & R0 with carry

8019

INC DPTR

A3

Increment the data pointer

801A

MOVX @DPTR,A

F0

Store the result in DPTR

801B

LCALL 00BB

PROGRAM:

C3

COMMENTS

90 85 00
E0
75 F0 64

54 0F

54 F0
C4
75 F0 0A

12 00 BB

Clear the carry flag

Move the address 8500 to data pointer
Get the input MSB data in ACC
Store the data 64H in B-reg

AND logic ACC with the data 0FH

AND logic ACC with the data F0H

Exchange the LSB with MSB data of ACC
Store the data 0AH in B-reg

Stop

HEX to BCD Conversion

LABEL

CONV

LOOP1

ADDRESS

MNEMONICS

OPCODE

8000

MOV DPTR,#8500H

90 85 00

8003

MOVX A,@DPTR

E0

Get the input data in ACC

8004

MOV R0,A

F8

Move the content of ACC to R0

8005

MOV R1,#00H

79 00

Initialize R1 to 00H

8007

MOV R2,#00H

7A 00

Initialize R2 to 00H

8009

MOV A,#00H

74 00

Initialize ACC to 00H

800B

CLR C

C3

Clear the carry flag

800C

INC A

04

Increment the content of ACC

800D

DA A

D4

Decimal adjust the content of ACC

800E

MOV R1,A

F9

Move the content of ACC to R1

800F

JNC LOOP1

50 01

8011

INC R2

8012

DJNZ R0,CONV

8014

MOV A,R2

EA

Move the content of R2 to ACC

8015

INC DPTR

A3

Increment the data pointer

8016

MOVX @DPTR,A

F0

Store the MSB result in DPTR

8017

MOV A,R1

E9

Move the content of R1 to ACC

8018

INC DPTR

A3

Increment the data pointer

8019

MOVX @DPTR,A

F0

Store the LSB result in DPTR

801A

LCALL 00BB

PROGRAM:

0A
D8 F7

12 00 BB

COMMENTS
Move the address 8500 to data pointer

If carry flag is not set, jump to LOOP1

Increment the content of R2
Decrement R0, if not zero, jump to CONV

Stop

Square Root

LABEL

LOOP1

NEXT

ADDRESS

MNEMONICS

OPCODE

8000

MOV DPTR,#8500H

90 85 00

8003

MOVX A,@DPTR

E0

Get the input data in ACC

8004

MOV R0,A

F8

Move the content of ACC to R0

8005

MOV R1,#01H

79 01

Initialize R1 to 01H

8007

MOV R2,#00H

7A 00

Initialize R2 to 00H

8009

CLR C

C3

Clear the carry flag

800A

MOV A,R0

E8

Move the content of R0 to ACC

800B

SUBB A,R1

99

Subtract the content of ACC & R1

800C

MOV R0,A

F8

Move the content of ACC to R0

800D

INC R2

0A

Increment the content of R2

800E

JZ NEXT

8010

INC R1

09

Increment the content of R1

8011

INC R1

09

Increment the content of R1

8012

SJMP LOOP1

80 F6

Short jump to label LOOP1

8014

MOV A,R2

EA

Move the content of R2 to ACC

8015

INC DPTR

A3

Increment the data pointer

8016

MOVX @DPTR,A

F0

Store the result in DPTR

8017

LCALL 00BB

PROGRAM:
Least Common Multiplier (LCM)

60 04

12 00 BB

COMMENTS
Move the address 8500 to data pointer

If the content of ACC is zero, jump to NEXT

Stop

LABEL

COMP
NEXT

FIRST

LAST

ADDRESS

MNEMONICS

OPCODE

8000

MOV DPTR,#8500H

90 85 00

8003

MOVX A,@DPTR

E0

Get the first input data in ACC

8004

MOV R0,A

F8

Move the content of ACC to R0

8005

MOV 40H,A

F5 40

Move the content of ACC to 40H

8007

INC DPTR

A3

Increment the data pointer

8008

MOVX A,@DPTR

E0

Get the second input data in ACC

8009

MOV R1,A

F9

Move the content of ACC to R1

800A

CJNE A,40H,NEXT

800D

SJMP LAST

80 0F

Short jump to label LAST

800F

JNC FIRST

50 04

If carry flag is not set, jump to label FIRST

8011

CLR C

C3

Clear the carry flag

8012

ADD A,R1

29

Add the content of ACC & R1

8013

SJMP COMP

8015

MOV R2,A

FA

8016

MOV A,40H

E5 40

8018

ADD A,R0

8019

MOV 40H,A

F5 40

801B

MOV A,R2

EA

801C

SJMP COMP

801E

B5 40 02

80 F5

28

COMMENTS
Move the address 8500 to data pointer

Compare ACC & 40H, if not equal goto NEXT

Short jump to label COMP

Move the content of ACC to R2
Move the content of 40H address to ACC
Add the content of ACC & R0
Move the content of ACC to 40H address
Move the content of R2 to ACC

80 ED

Short jump to label COMP

INC DPTR

A3

Increment the data pointer

801F

MOVX @DPTR,A

F0

Store the result in DPTR

8020

LCALL 00BB

PROGRAM:
Greatest Common Divisor (GCD)

12 00 BB

Stop

LABEL

LOOP1

LOOP2

ADDRESS

MNEMONICS

OPCODE
90 85 00

COMMENTS

8000

MOV DPTR,#8500H

8003

MOVX A,@DPTR

E0

Get the first input data in ACC

8004

MOV R0,A

F8

Move the content of ACC to R0

8005

INC DPTR

A3

Increment the data pointer

8006

MOVX A,@DPTR

E0

Get the second input data in ACC

8007

MOV R1,A

F9

Move the content of ACC to R1

8008

MOV R2,#01H

7A 01

Initialize R2 to 01H

800A

MOV R3,#00H

7B 00

Initialize R3 to 00H

800C

CLR C

C3

Clear the carry flag

800D

MOV A,R2

EA

Move the content of R2 to ACC

800E

SUBB A,R0

98

Subtract the content of ACC & R0

800F

JZ LOOP3

60 1D

8011

MOV A,R2

EA

Move the content of R2 to ACC

8012

SUBB A,R1

99

Subtract the content of ACC & R1

8013

JZ LOOP4

60 29

8015

MOV A,R2

EA

8016

MOV B,A

F5 F0

8018

MOV A,R0

E8

Move the content of R0 to ACC

8019

DIV AB

84

Divide ACC with B-reg

801A

MOV A,B

801C

CJNE A,#00H,LOOP2

801F

MOV A,R2

EA

8020

MOV B,A

F5 F0

8022

MOV A,R1

E9

Move the content of R1 to ACC

8023

DIV AB

84

Divide ACC with B-reg

8024

MOV A,B

8026

CJNE A,#00H,LOOP2

8029

MOV A,R2

EA

Move the content of R2 to ACC

802A

MOV R3,A

FB

Move the content of ACC to R3

802B

INC R2

0A

Increment R2

802C

SJMP LOOP1

E5 F0
B4 00 0C

E5 F0
B4 00 02

80 DE

Move the address 8500 to data pointer

If ACC is zero, jump to label LOOP3

If ACC is zero, jump to label LOOP4

Move the content of R2 to ACC
Move the content of ACC to B-reg

Move the content of B-reg to ACC

Comp ACC with 00H,if not equal goto LOOP2
Move the content of R2 to ACC
Move the content of ACC to B-reg

Move the content of B-reg to ACC

Comp ACC with 00H,if not equal goto LOOP2

Short jump to label LOOP1

LOOP3

LAST

LOOP4

LOOP5

802E

MOV A,R2

EA

802F

MOV B,A

F5 F0

8031

MOV A,R1

E9

Move the content of R1 to ACC

8032

DIV AB

84

Divide ACC with B-reg

8033

MOV A,B

8035

CJNE A,#00H,LOOP5

8038

MOV A,R2

EA

Move the content of R2 to ACC

8039

INC DPTR

A3

Increment the data pointer

803A

MOVX @DPTR,A

F0

Move the content of ACC to DPTR

803B

LCALL 00BB

803E

MOV A,R2

EA

803F

MOV B,A

F5 F0

8041

MOV A,R0

E8

Move the content of R0 to ACC

8042

DIV AB

84

Divide ACC with B-reg

8043

MOV A,B

8045

CJNE A,#00H,LOOP5

8048

MOV A,R2

EA

8049

SJMP LAST

80 EE

804B

MOV A,R3

EB

804C

SJMP LAST

80 EB

PROGRAM:
Parity Bit Generation

E5 F0
B4 00 13

12 00 BB

E5 F0
B4 00 03

Move the content of R2 to ACC

Move the content of ACC to B-reg

Move the content of B-reg to ACC

Comp ACC with 00H,if not equal goto LOOP5

Stop
Move the content of R2 to ACC
Move the content of ACC to B-reg

Move the content of B-reg to ACC

Comp ACC with 00H,if not equal goto LOOP5
Move the content of R2 to ACC
Short jump to label LAST
Move the content of R3 to ACC
Short jump to label LAST

LABEL

ADDRESS

MNEMONICS

OPCODE

8000

CLR C

8001

MOV DPTR,#8500H

8004

MOVX A,@DPTR

E0

Get the first data to ACC

8005

MOV R0,A

F8

Move the content of ACC to R0

8006

INC DPTR

A3

Increment the data pointer

8007

MOVX A,@ DPTR

E0

Get the second data to ACC

8008

ADD A,R0

28

Add the contents of ACC and R0

8009

MOV A,0D0H

E5 D0

Move the content of PSW reg to ACC

800B

ANL A,#01H

54 01

AND logic ACC & the data 01H

800D

INC DPTR

A3

Increment the data pointer

800E

MOVX @DPTR,A

F0

Store the result in data pointer

800F

LCALL 00BB

PROGRAM:
Program Using Interrupt

C3

COMMENTS

90 85 00

12 00 BB

Clear the carry flag

Move the address to data pointer

Stop

LABEL

ADDRESS

LOOP

8200

MNEMONICS

OPCODE

COMMENTS

MOV IE,#81H

75 A8 81

Choose the type of Interrupt

8203

MOV DPTR,#A003H

90 A0 03

Assign A003H address to DPTR

8204

MOV A,#80H

8205

MOVX @DPTR,A

8207

MOV DPTR,#A001H

8208

MOV A,#FFH

8209

MOVX @DPTR,A

820A

SJMP LOOP

74 80
F0
90 A0 01
74 FF
F0
80 EF

Move the data 80H to ACC

Move the content of ACC to DPTR
Assign A001H address to DPTR
Move the data FFH to ACC
Move the content of ACC to DPTR
Short jump to label LOOP

Interrupt

LABEL

ADDRESS

MNEMONICS

OPCODE

8000

MOV DPTR,#A001H

90 A0 01

8003

MOV A,#00H

8004

MOVX @DPTR,A

F0

Move the content of ACC to DPTR

8005

RETI

32

Return to the main program

74 00

COMMENTS
Assign A001H address to DPTR
Move the data 00H to ACC