belejar bahasa aseembler

rina

New member
hallo,,.?

Saya lagi belajar bahasa pemrograman aseembler, setiap saya buat program selalu error pada penyimpanan file  :'(,.
ada masukkkan?  ???
 
Bahasa assembler anda digunakan untuk aplikasi (mikrokontroler) jenis apa? trus program anda seperti apa... sulit untuk menganalisa jika tidak ada programnya...
 
sama om..gua jga nubi ni. belum paham betul mengenai bahasa pemrograman asm. kemarin" saya coba bikin progm contoh program nya gini. tolong koreksi program gua oM..




F3_add data 50h
STRIP_add data 51h
BA_add DATA 52h
ND_add DATA 53H
UN_ADD DATA 54H
NG_ADD DATA 55H
Display_add DATA 56H
LoopDetik DATA 57H
Tampil DATA 6AH
DetikLama DATA 6BH
ON equ 00H
OFF equ 0FFH

org 00H
ajmp Start
org 3H
reti
org 0BH
reti
org 13H
reti
org 1BH
reti
org 23H
reti

Start:
acall RST
acall InitRTC
mov Tampil,#ON
mov LoopDetik,#2FH

Loop:
acall CekTampil
acall baca_karakter
acall DisplayData1
mov DPTR,#RTC_add+RegC
movx A,@DPTR
anl A,#080H
Jnb ACC.7,Loop
clr ACC.7
movx @DPTR,A
ajmp Loop

InitRTC:
mov DPTR,#RTC_add+RegA
mov A,#20H
movx @DPTR,A
inc DPTR
mov A,#16H
movx @DPTR,A
ret

RST:
mov r1,#0FFH
RSTdelay1:
mov r0,#0FFH
RSTdelay2:
djnz r0,RSTdelay2
djnz r1,RSTdelay1
ret

CekTampil:
mov R1,Tampil
cjne R1,#ON,EndCekTampil
djnz LoopDetik,EndCekTampil
mov Tampil,#OFF
setb P3.2
mov LoopDetik,#2FH

EndCekTampil:
ret

;------------------------------------
; proses yg dilakukan setiap satu detik
;------------------------------------

baca_karakter:
mov a,#12h
mov F3_add,A
mov a,#03h
mov STRIP_add,A
mov a,#45h
mov BA_add,A
mov a,#67h
mov ND_add,A
mov a,#86h
mov UN_ADD,A
mov a,#90h
mov NG_ADD,A
ret
SetTampil:
mov Tampil,#ON
clr P3.2
clr P3.0
ret

DisplayData1:
mov A,F3_add
mov Display_add,#24H
acall Display
mov A,STRIP_add
mov Display_add,#26H
acall Display
mov A,BA_add
mov Display_add,#40H
acall Display
mov A,ND_add
mov Display_add,#42H
acall Display
mov A,UN_add
mov Display_add,#44H
acall Display
mov A,NG_Add
mov Display_add,#46H
acall Display
ret

;====================================
; Display to 7-seq
;------------------------------------
Display:
acall DisplayDigit_1
mov P2,Display_add
acall delay1
mov P2,#00H
acall DisplayDigit_2
inc Display_add
mov P2,Display_add
acall delay1
mov P2,#00H
ret

DisplayDigit_1:
mov B,A
anl A,#0F0h
swap A
acall KonversiAngka
mov P1,A
ret
DisplayDigit_2:
mov A,B
anl A,#0Fh
acall KonversiAngka
mov P1,A
ret

;---------------------------------
; delay
;---------------------------------
delay1:
mov R7,#09Fh
tunggu:
djnz R7,tunggu
ret

;-------------------------------------
;Konversi Angka 0-9 ke 7-seq
;-------------------------------------
KonversiAngka:
mov DPTR,#TabelKonversiAngka
movc A,@A+DPTR
ret

TabelKonversiAngka:
org TabelKonversiAngka
      ;mati = 0 F=1 3=2 -=3  B=4 A=5 N=6 D=7 U=8 G=9
db 00h,69h,3Eh,20h,67h,7Bh,5Bh,37h,57h,7Eh
end


Ouputnya,,tulisan F3-THREE BANDUNG pada tampilan 7 seq, kepengen belajar dot matrix om..ada yang bisa bantu ga...???
 

Welcome to EDABoard.com

Sponsor

Back
Top