Menampilkan karakter ke Display Led 7 segmen

Tabel data untuk menampilkan karakter bilangan desimall ditunjukkan pada tabel berikut:

list program

$mod51

ORG 0H
START: MOV P1,#01H; Aktifkan digit paling kanan
MOV P2,#0C0H; tampilkan karakter ”0”
CALL DELAY; panggil program delay
MOV P2,#0F9H; tampilkan karakter ”1”
CALL DELAY
MOV P2,0A4H; tampilkan karakter ”2”
CALL DELAY
MOV P2,0B0H; tampilkan karakter ”3”
CALL DELAY
MOV P2,#99H; tampilkan karakter ”4”
CALL DELAY
MOV P2,92H; tampilkan karakter ”5”
CALL DELAY
MOV P2,#82H; tampilkan karakter ”6”
CALL DELAY
MOV P2,#0F8H; tampilkan karakter ”7”
CALL DELAY
MOV P2,#80H; tampilkan karakter ”8”
CALL DELAY
MOV P2,#90; tampilkan karakter ”9”
CALL DELAY
SJMP START; ulangi proses dari awal

DELAY: MOV R0,#0FFH
LOOP: MOV R1,#0FFH
LOOP1: DJNZ R1,LOOP1
DJNZ R0,LOOP
RET
END