org 0000h

LOOP:

SETB P3.4  ;使P3.4輸出高,關閉光電耦合器PC817內部的LED發光觸發管

LCALL DELAY ;調用延時子程序DELAY

LCALL DELAY ;調用延時子程序DELA

LCALL DELAY ;調用延時子程序DELA

CLR P3.4 ;使P3.4輸出低,打開光電耦合器PC817內部的LED發光觸發管,此時PC817內部的輸出端三極管CE級飽和導通

LCALL DELAY ;調用延時子程序DELA

LCALL DELAY ;調用延時子程序DELA

LCALL DELAY ;調用延時子程序DELA

LCALL DELAY ;調用延時子程序DELA

AJMP LOOP  ;重復循環執行整個程序,整個程序的名字為LOOP



DELAY: MOV R7,#250 ;延時子程序開始,子程序名字為 DEKAY 

D1: MOV R6,#250

D2: DJNZ R6,D2

DJNZ R7,D1

RET


END