CKT is getoond In fig
zo gebruiker h 4 dip-schakelaar in te stellen van msg en scroll
Ik program in keil
laden door ISP USB loader
vragen
WhatsApp mij
9408492091
pmvanker
mijn programma
org 0000h
MOV r5, #30
belangrijkste:
aaan selecteren
TP2: aaan type1
dec r5
djnz r5, tp2
MOV r5, #30
sjmp belangrijkste
rotatetype:
TP3: aaan type1
dec r5
djnz r5, tp3
MOV r5, #30
niettoteenhogeropvra rotate1
niettoteenhogeropvra rotate2
JB p3.7, belangrijkste
sjmp rotatetype
Selecteer:
JB p3.4, s1
aaan Welkom
RET
S1:
JB p3.5, s2
aaan praful
S2:
JB p3.6, s3
niettoteenhogeropvra utpal
S3:
JB p3.7, s4
niettoteenhogeropvra rotatetype
S4: ret
rotate1:MOV r0, #30 h
MOV r1, #31 h
MOV,
MOV b, een
BK: mov,
MOV
Inc r0
Inc r1
cjne r0, #37 h, bk
MOV a, b
MOV
RET
rotate2:MOV r0, #40 h
MOV r1, #41 h
MOV,
MOV b, een
bk1:MOV a,
MOV
Inc r0
Inc r1
cjne r0, #47 h, bk1
MOV a, b
MOV
RET
Type1: mov r6, #08
MOV r0, #30 h
MOV r1, #40 h
MOV a, #01
TP1:MOV p0, een
MOV p1,
MOV p2,
aaan sd
RL een
Inc r0
Inc r1
djnz r6, tp1
RET
Welkom:
MOV 30u, #11101100b
MOV 40h, #11001011b
MOV 31h, #01100110b
MOV 41h, #00110110b
MOV 32h, #11101110b
MOV 42h, #00111111b
MOV 33h, #01101110b
MOV 43h, #00111110b
MOV 34h, #01101110b
MOV 44h, #00011010b
MOV 35h, #11001110b
MOV 45h, #11011001b
MOV 36h, #01100110b
MOV 46h, #00110110b
MOV 37h, #0FFH
MOV 47h, #0FFH
RET
Praful:
MOV 30u, #01100110b
MOV 40h, #11110010b
MOV 31h, #01100110b
MOV 41h, #11100010b
MOV 32h, #01100110b
MOV 42h, #11010010b
MOV 33h, #01100110b
MOV 43h, #11110110b
MOV 34h, #11101110b
MOV 44h, #00011011b
MOV 35h, #11101110b
MOV 45h, #00111111b
MOV 36h, #0ffh
MOV 46h, #0ffh
MOV 37h, #0FFH
MOV 47h, #0FFH
RET
Utpal:
MOV 30u, #11101110b
MOV 40h, #00011011b
MOV 31h, #00111011b
MOV 41h, #11111110b
MOV 32h, #01100110b
MOV 42h, #11110010b
MOV 33h, #01100110b
MOV 43h, #11010010b
MOV 34h, #11101110b
MOV 44h, #00111111b
MOV 35h, #0ffh
MOV 45h, #0ffh
MOV 36h, #0ffh
MOV 46h, #0ffh
MOV 37h, #0FFH
MOV 47h, #0FFH
RET
Foutbericht ' Stop:
MOV 30u, #01101100b
MOV 40h, #00000000b
MOV 31h, #00111011b
MOV 41h, #11111110b
MOV 32h, #01101110b
MOV 42h, #00011010b
MOV 33h, #01100110b
MOV 43h, #11110010b
MOV 34h, #0ffh
MOV 44h, #0ffh
MOV 35h, #0ffh
MOV 45h, #0ffh
MOV 36h, #0ffh
MOV 46h, #0ffh
MOV 37h, #0FFH
MOV 47h, #0FFH
RET
SD:
MOV r4, #5
sd1:MOV r3, #0ffh
djnz r3 $
djnz r4, sd1
RET
einde