tolong ya gan

inisialisasinya yaitu mslkn qta pake 2 tombol
1 buat tmbl msuk dn stunya buat tmbl keluar. nilai awal kita kasih 20.
kalau mslkan qta tekan tmbol 1, maka yang ditampilin di lcd itu nilai yang awalnya 20 berkurang satu menjadi 19. trus yng bagian tmbl keluarnya kebalikan tmbl masuk

mohon bantuannya ya mas,,,,

lisa :salam kenal semuanya,ada yang bisa bantu saya tlg buatin program assembly dari bilangan desimal ke biner. tolong ya.. kirimkan ke emal saya ya..chica_lisa@yahoo.com

SONY :Saya mohon bantuannya gimana? cara menampilkan hasil adc0808 ke LCD menggunakan uK AT89s52/ATmega8 Terima kasih

lisa :salam kenal semuanya,ada yang bisa bantu saya tlg buatin program assembly dari bilangan desimal ke biner. tolong ya.. kirimkan ke emal saya ya..chica_lisa@yahoo.com

ada yang bisa bantu saya tlg buatin program assembly dari bilangan desimal ke biner. tolong ya..

yang di bawah ini contoh yang saya buat tapi lum bisa .

org 0h
ratusan equ 30h
puluhan equ 31h
satuan equ 32h
;
org 0h
start: call ADC
call Bin2Dec
call Display2SevenSegmen
sjmp start
;
;========================================
;Subrutin ini digunakan untuk mengambil data ADC
;========================================
PROGRAM:
adc_a bit p2.0
adc_b bit p2.1
adc_c bit p2.2
adc_start bit p2.3
adc_ale bit p2.4
adc_OE bit P2.5
adc_EOC bit P2.6
;
ADC:
ORG 0H
CLR p2.3 ;adc_start
CLR p2.4 ;adc_ale
CLR p2.5 ;adc_OE
SETB p2.6 ;adc_EOC
INIT:
SETB p2.0 ;adc_a
SETB p2.1 ;adc_b
CLR p2.2 ;adc_c
CALL DELAY
SETB p2.3 ;adc_start
CALL DELAY
SETB p2.4 ;adc_ale
CALL DELAY
CLR p2.3 ;adc_start
CLR p2.4 ;adc_ale

EOC: JNB P2.6,EOC
SETB P2.5
CALL DELAY
MOV A,P0
MOV P1,A
SJMP INIT
RET

;=================================================
;Subrutin ini untuk menampilkan data ke 7 Segmen
;dalam bentuk: ratusan, puluhan, and satuan
;data desimal diubah ke segmen dengan menggunakan
;Look up table Data7segmen
;=================================================
Display2SevenSegmen:
mov A, ratusan ;Copy data Ratusan ke A
mov DPTR,#Data7segmen ;Copy Address #Data7segmen ke DPTR
movc A,@A+DPTR ;Copy Isi A+DPTR ke A
mov P1,A ;Copy A ke P0
Setb P3.5 ;Decoder, A=1,
clr P3.6 ;B=0
Setb P3.7 ; dan C=1
call delay ;Panggil waktu tunda
;
mov A,puluhan
mov DPTR,#Data7segmen
movc A,@A+DPTR
mov P1,A
clr P3.5 ;
Setb P3.6
Setb P3.7
call delay
;
mov A,satuan
mov DPTR,#Data7segmen
movc A,@A+DPTR
mov P1,A
Setb P3.5 ;
Setb P3.6
Setb P3.7
call delay
ret
;
delay: mov R0,#0
delay1:mov R2,#0fh
djnz R2,$
djnz R0,delay1
ret
;
;========================================
;Subrutin ini untuk merubah data biner ke desimal
;menjadi 3 digit = ratusan-puluhan-satuan
;=========================================
Bin2Dec:
mov b,#100d
div ab
mov ratusan,a
mov a,b
mov b,#10d
div ab
mov puluhan,a
mov satuan,b
ret
;
Data7segmen:
db 11000000b,11111001b,10100100b,10110000b,10011001b
db 10010010b,10000010b,11111000b,10000000b,10010000b
;
end