org 0h
mulai: mov A,P3
cjne
A,#0FEh,banding1
mov p1,a
mov p0,#0c0h
sjmp mulai
banding1:
cjne
A,#0FDh,banding2
mov p2,a
mov p0,#0f9h
sjmp mulai
banding2:
cjne
A,#0FBh,banding3
mov p2,a
mov p0,#0a4h
sjmp mulai
banding3:
cjne
A,#0F7h,banding4
mov p2,a
mov p0,#0b0h
sjmp mulai
banding4:
cjne
A,#0EFh,banding5
mov p2,a
mov p0,#099h
sjmp mulai
banding5:
cjne
A,#0DFh,banding6
mov p2,a
mov p0,#092h
sjmp mulai
banding6:
cjne
A,#0BFh,banding7
mov p2,a
mov p0,#082h
sjmp mulai
banding7:
cjne A,#07Fh,mulai
mov p2,a
mov p0,#0f8h
sjmp mulai
;
end
EmoticonEmoticon