51单片机模拟电梯汇编程序

  很早以前编的模拟电梯的51单片机程序

    ORG 0000H

 STOP:ORL  P1,#00H

MOV 30H,#01H

      LCALL DISPLAY

LOOP1:LCALL LOOP

      LCALL  KEY80;外部调用1、2、3、4、5、6

      LJMP  LOOP1

 

KEY80:LCALL LOOP          ;电梯在一楼

D80:  CJNE A,#0EEH,D90    ;判断按键1是否按下

      LJMP KEY1

D90:  CJNE A,#0DEH,D81   

      LCALL U11

      LJMP KEY2

D81:  CJNE A,#0BEH,D82

      LCALL U11

      LJMP KEY2

D82:  CJNE A,#7EH,D83

      LCALL U22

      LJMP KEY3

D83:  CJNE A,#0EDH,D84

      LCALL U22

      LJMP KEY3    

D84:  CJNE A,#0DDH,KEY80

      LCALL U33

      LJMP KEY4

 

KEY50: LCALL LOOP         ; 电梯在二楼

D50:  CJNE A,#0EEH,D91   

      LCALL DN11

      LJMP  KEY1

D91 : CJNE A,#0DEH,D92

      LCALL KEY2

D92:  CJNE A,#0BEH,D51

      LCALL KEY2

D51:  CJNE A,#7EH,D52

      LCALL U11

      LJMP  KEY3

D52:  CJNE A,#0EDH,D53

      LCALL U11

      LJMP  KEY3

D53:  CJNE A,#0DDH,KEY50

      LCALL U22

      LJMP  KEY4

 

KEY60: LCALL LOOP         ; 电梯在三楼

D60:  CJNE A,#0EEH,D61   

      LCALL DN22

      LJMP  KEY1

D61:  CJNE A,#0DEH,D62

      LCALL DN11

      LJMP  KEY2

D62:  CJNE A,#0BEH,D93

      LCALL DN11

      LJMP  KEY2

D93:  CJNE A,#7EH,D94

      LCALL KEY3

D94:  CJNE A,#0EDH,D63

      LCALL KEY3

D63:  CJNE A,#0DDH,KEY60

      LCALL U11

      LJMP  KEY4

 

 

KEY70:LCALL LOOP         ; 电梯在四楼

D70:  CJNE A,#0EEH,D71