Push - Membentuk Huruf dan Angka

Praktikum Ke-6 14:20 Lab.Eldig

ORG 0H
MULAI:
 MOV A,P3
 CJNE A,#0FEH,BANDING1
 MOV P0,#0F9H
 SJMP MULAI
 
BANDING1:
   CJNE A,#0FDH,BANDING2
   MOV P0,#0A4H
   SJMP MULAI
   
BANDING2:
   CJNE A,#0FBH,BANDING3
   MOV P0,#0B0H
   SJMP MULAI
   
BANDING3:
   CJNE A,#0F7H,BANDING4
   MOV P0,#99H
   SJMP MULAI
   
BANDING4:
   CJNE A,#0EFH,BANDING5
   MOV P0,#92H
   SJMP MULAI
      
BANDING5:
   CJNE A,#0DFH,BANDING6
   MOV P0,#82H
   SJMP MULAI
   
BANDING6:
   CJNE A,#0BFH,BANDING7
   MOV P0,#0F8H
   SJMP MULAI
         
BANDING7:
   CJNE A,#07FH,MULAI 
    MOV P0,#80H
    SJMP MULAI 
  

END