hi,
can any one guide me to convert the program Downloaded from the site is in (water.asm/water.lst/water.hex) can the same code's can be written in "C" language pl help me to write the same program in the "C" Language I am learning the "C" Language.
the link of the Wireless Water-Level Indicator.http://efymag.com/previousissue.asp?month=January&year=2012&tot=1&id=12
the "water.asm" program is as Follows :-
pl any one help
thanks in advance
can any one guide me to convert the program Downloaded from the site is in (water.asm/water.lst/water.hex) can the same code's can be written in "C" language pl help me to write the same program in the "C" Language I am learning the "C" Language.
the link of the Wireless Water-Level Indicator.http://efymag.com/previousissue.asp?month=January&year=2012&tot=1&id=12
the "water.asm" program is as Follows :-
Rich (BB code):
$mod52
var2 equ 13h
lcd equ P2
buzz equ p3.4
rs equ p3.7
rw equ p3.6
e equ p3.5
org 00H
main: clr rw
mov p2,#00H
mov p1,#0fh
acall lcdin
start:
mov a ,p1
cjne a,#01h,skip1
acall m25;
skip1: mov a ,p1
cjne a,#03h,skip2
acall m50;
sjmp start
skip2: mov a ,p1
cjne a,#07h,skip3
acall m75;
sjmp start
skip3: mov a ,p1
cjne a,#0fh,skip4
acall m100;
sjmp start
skip4: mov a ,p1
cjne a,#00h,skip5
acall low1
sjmp start
skip5: sjmp start;
m25: mov a,#0c0h
acall cmm
mov dptr,#mydata2
mov var2,#15d
bck2: clr a
movc a,@a+dptr
acall dat
inc dptr
djnz var2,bck2
ret
m50: mov a,#0c0h
acall cmm
mov dptr,#mydata3
mov var2,#15d
bck3: clr a
movc a,@a+dptr
acall dat
inc dptr
djnz var2,bck3
ret;
m75: mov a,#0c0h
acall cmm
mov dptr,#mydata4
mov var2,#15d
bck4: clr a
movc a,@a+dptr
acall dat
inc dptr
djnz var2,bck4
ret
m100: mov a,#0c0h
acall cmm
mov dptr,#mydata5
mov var2,#16d
setb buzz
bck5: clr a
movc a,@a+dptr
acall dat
inc dptr
djnz var2,bck5
acall delay
acall delay
acall delay
clr buzz
ret
low1: mov a,#0c0h
acall cmm
mov dptr,#mydata6
mov var2,#15d
setb buzz
bck6: clr a
movc a,@a+dptr
acall dat
inc dptr
djnz var2,bck6
acall delay
clr buzz
ret
lcdin:
mov a,#38h
acall cmm
mov a,#0ch
acall cmm
mov a,#01h
acall cmm
mov a,#06h
acall cmm
mov a,#86h
acall cmm
mov dptr,#mydata1
mov var2,#3
bck1: clr a
movc a,@a+dptr
acall dat
inc dptr
djnz var2,bck1
ret
cmm:
mov lcd,a
clr rs
setb e
acall delay
clr e
acall delay
ret
dat:
mov lcd,a
setb rs
setb e
acall delay
clr e
acall delay
ret
delay:
mov r1,#50
ro1: mov r2,#0ffh
ro2: djnz r2,ro2
djnz r1,ro1
ret;
org 300
mydata1: db 'EFY'
mydata2: db 'Water level 25%'
mydata3: db 'Water level 50%'
mydata4: db 'Water level 75%'
mydata5: db 'Water level 100%'
mydata6: db 'Water level low'
END ;End of program
pl any one help
thanks in advance
Attachments
-
3.7 KB Views: 125
Last edited by a moderator: