; list p=16F737 #include ; ;Program Configuration Register 1 ; __CONFIG _CONFIG1, _CP_OFF & _CCP2_RB3 & _DEBUG_OFF & _VBOR_2_0 & _BOREN_0 & _MCLR_OFF & _PWRTE_OFF & _WDT_OFF & _XT_OSC ; ;Program Configuration Register 2 ; __CONFIG _CONFIG2, _BORSEN_0 & _IESO_OFF & _FCMEN_OFF ; ; RC0 - Bal gomb ; RC1 - Jobb gomb ; ; RB0 - Bal kimenet ; RB2 - Jobb kimenet ; ; 4MHz-es kvarc ; ;------------------------------------------------------------------------------- CBLOCK 0x20 TMP ENDC ; ;--------------------------------------------------------------------------------- org 0x00 goto Start ;------------------------------------------------------------------------------------------------------- ;==================================================== ; uC konfig: ; Start bcf STATUS,RP1 bsf STATUS,RP0 ; BANK1 kiválasztás movlw B'00000000' ; PORTA konfig movwf TRISA movlw B'00000000' ; PORTB konfig movwf TRISB movlw B'00000011' ; PORTC konfig movwf TRISC bcf STATUS,RP0 ; BANK0 kiválasztás ;--------------------------------------------------------------------------------------------------------------------------- ; BCF PORTB,0 ; Bal kimenet L (alaphelyzet) BSF PORTB,2 ; Jobb kimenet H (alaphelyzet) ; ; PBCHK BTFSC PORTC,0 ; Gombok állapotának lekérdezése GOTO LOUT BTFSC PORTC,1 GOTO ROUT GOTO PBCHK ; Újra ; LOUT BSF PORTB,0 ; Bal kimenet magasra LTEST BTFSC PORTC,0 ; Gombteszt GOTO LTEST BCF PORTB,0 ; Bal kimenet alaphelyzet GOTO PBCHK ; ; ROUT BCF PORTB,2 ; Jobb kimenet alacsonyra RTEST BTFSC PORTC,1 ; Gombteszt GOTO RTEST BSF PORTB,2 ; Jobb kimenet alaphelyzet GOTO PBCHK ; ; END