8085 store numbers in reverse order December 5, 2009

gnusim8085

;store numbers in reverse order in memory locations
lxi h,var
mov c,m;counter
inx h
lxi d,varr4
back: mov a,m
stax d
inx h
dcx d
dcr c
jnz back
hlt
var: db 04h
var1: db 03h
var2: db 07h
var3: db 08h
var4: db 05h
varr1: db 00h
varr2: db 00h
varr3: db 00h
varr4: db 00h

8085 count number of 1′s in a byte December 5, 2009

install gnusim8085

;count the number of 1's
lxi h,var
mvi c,08h;counter
mov a,m
mvi b,00h;count number of 1's
back: rar
jnc skip
inr b
skip: dcr c
jnz back
mov a,b
sta result
hlt
var: db 19h
result: db 00h

8085 multiply repeated addition December 5, 2009

gnusim8085

;multiply two 8 bit numbers without shifting
lxi h,var;multiplicand
mvi d,00h
mov e,m
inx h
mov c,m;multiplier as counter for repeated addition
mvi h,00h
mvi l,00h
back: dad d
dcr c
jnz back
shld result
hlt
var: db 08h
var2: db 07h
result: db 00h
result2: db 00h

8085 blocks of data transfer December 5, 2009

gnusim8085

;blocks of data transfer
lxi h,var
mov c,m;counter
inx h
lxi d,varr1
back: mov a,m
stax d
inx h
inx d
dcr c
jnz back
hlt
var: db 03h
var1: db 02h
var2: db 04h
var3: db 01h
varr1: db 00h
varr2: db 00h
varr3: db 00h

8085 add 2 numbers using lxi December 5, 2009

;using lxi
lxi h,var1
mov a,m
inx h
mov b,m
sub b
inx h
mov m,a
hlt
var1: db 08h
var2: db 03h
var3: db 00h

8085 division of two 8bit numbers December 5, 2009

gnusim8085

;division of 8bit number
lhld var;dividend
lda var2;divisor
mov b,a
mvi c,08h
back: dad h
mov a,h
sub b
jc forward
mov h,a
inr l
forward: dcr c
jnz back
shld var3
hlt
var: db 0ch
var1: db 00h
var2: db 05h
var3: db 00h
var4: db 00h

8085 multiply two 8bit numbers December 5, 2009

install gnusim8085

;mutiply two 8bit numbers and store
;using shifting
lxi h,var1
mvi d,00h
mov e,m
inx h
mov a,m
mvi c,08h;counter
mvi h,00h
mvi l,00h
back: dad h
ral
jnc ahead
dad d
ahead: dcr c
jnz back
shld result
hlt
var1: db 08h;mutiplicand
var2: db 07h;multiplier
result: db 00h
result2: db 00h

8085 to find the number of +ve and no. of -ve numbers December 5, 2009

install gnusim8085

;find the number of +ve no and 
;number of -ve nos from a given series
;find the sum of all +ve numb
;store them
lxi h,var
mov c,m;counter
mvi b,00h;number of +ve numb
mvi d,00h;number of -ve numb
mvi e,00h;sum
back: inx h
mov a,m
adi 00h
jp ahead
inr d
jmp ahead2
ahead: inr b
add e
mov e,a
ahead2: dcr c
jnz back
mov a,b
sta positive
mov a,d
sta negative
mov a,e
sta sump

hlt
var: db 08h
var1: db 18h
var2: db 29h
var3: db 34h
var4: db 87h
var5: db 88h
var6: db 91h
var7: db 05h
var8: db 90h
positive: db 00h
negative: db 00h 
sump: db 00h

to find the smallest and largest number 8085 December 5, 2009

install gnusim8085

;to find the smallest and largest 
;number from the given series
lxi h,var
mov c,m ;counter
inx h
dcr c
mov b,m;for largest
mov d,m;for smallest
mov a,m
back: cmp b
jc ahead
mov b,a
ahead: cmp d
jnc ahead2
mov d,a
ahead2: inx h
mov a,m 
dcr c
jnz back
inx h
mov m,d
inx h
mov m,b
hlt
var: db 05h
var1: db 02h
var2: db 02h
var3: db 07h
var4: db 0Ah
var5: db 0Ah
smallest: db 00h
largest: db 00h

add n consecutive numbers 8085 December 5, 2009

gnusim8085

;to add n consecutive numbers
lxi h,var
mov c,m
mvi b,01h
mvi e,00h
mvi a,00h
back: add b
jnc skip
inr e
skip: inr b
dcr c
jnz back
sta result
mov a,e
sta carry
hlt
var: db 0Ah
result: db 00h
carry: db 00h

add n 8bit numbers , sum may be 16 bit or more 8085 December 5, 2009

gnusim8085

;to add n 8bit numbers
;sum may be 16bit or more
lxi h,var
mov c,m
inx h
mov a,m
dcr c
mvi b,00h
l1: inx h
add m
jnc l2
inr b
l2: dcr c
jnz l1
inx h
mov m,a
inx h
mov m,b
mvi a,00h
ral
inx h
mov m,a
hlt
var: db 04h
var1: db 9fh
var2:  db 9fh
var3: db 91h
var4: db 92h
var5: db 00h
var6: db 00h

sum of n given numbers 8085 December 5, 2009

run in gnusim8085

;sum of n numbers stored in cons locations
;without carry & add with carry
lxi h,var
mov c,m ;counter
inx h
mov a,m
dcr c
mvi b,00h
back: inx h
add  m
jnc skip
inr b
skip: dcr c
jnz back
inx h
mov m,a
inx h
mov m,b
hlt
var: db 04h
var1: db 02h
var2: db 01h
var3: db 70h
var4: db 90h
var5: db 00h
var6: db 00h

ADD two 8bit numbers 8085 December 5, 2009

run in gnusim8085

lda var1
mov b,a
lda var2
add b
sta var3
hlt
var1: db 04h
var2: db 09h
var3: db 00h

Bubble sort 8085 December 5, 2009

[ install gnusim8085 ]

;bubble sort
mvi b,03h
start: lxi h,var1
mvi c,03h
back: mov a,m
inx h
cmp m
jc ahead
mov d,m
mov m,a
dcx h
mov m,d
inx h
ahead: dcr c
jnz back
dcr b
jnz start
hlt
var1: db 02h
var2: db 10h
var3: db 07h
var4: db 03h

Find Factorial 8085 November 16, 2009

[ first install gnusim8085 using
#sudo apt-get install gnusim8085 (ubuntu)
#yum install gnusim8085 (fedora)
]

now just assemble and run the written code below:

lxi sp,27ffh
lda var2
cpi 02h
jc last
mvi d,00h
mov e,a
dcr a
mov c,a
call facto
xchg
shld var
jmp end
last: lxi h,0001h
end: shld var
hlt
facto: lxi h,0000h
mov b,c
back: dad d
dcr b
jnz back
xchg
dcr c
cnz facto
ret
var: db 00h
var2: db 03h ; input the number 3 here, donot give number more than 5