kit.asm

来自「MAKE THE FUNCION LIKE THE INCREDIBLE CAR」· 汇编 代码 · 共 33 行

    
          list p=18f452
          include "p18f452.INC"


        CBLOCK	0X020
        PAKITO
		VAR
        ENDC

		ORG		0X00
		CLRF	TRISC
		CLRF	PORTC

		MOVLW	0X01
		MOVWF	PORTC
		
IZQ		RLCF	PORTC
		MOVLW	0X80
		CPFSEQ	PORTC,W
		BRA     IZQ
		BRA		DER


DER		RRCF	PORTC
		MOVLW	0X01
		CPFSEQ	PORTC,W
		BRA		DER
		BRA		IZQ

    	END