LIST P=PIC10F322 ; lista megad??sa RADIX hex ; alap?©rtelmezet sz??mrendszer megad??sa #include "p10F322.inc" __CONFIG _FOSC_INTOSC & _BOREN_OFF & _WDTE_OFF & _MCLRE_OFF & _LVP_OFF & _LPBOR_OFF CBLOCK PERGESMENTESITES ENDC org 0x0000 ;Programmemória kezd? címe nop INICIALIZALAS CLRF LATA CLRF ANSELA MOVLW B'00001000' ;RA3-on kívül minden kimenetnek állítva MOVWF TRISA BSF LATA,1 ;RA0 kimenet bekapcsolása MOVLW B'00100000' ;Oszcillátor beállítása 500KHz-re MOVWF OSCCON MAIN CLRF PERGESMENTESITES MAIN1 BTFSC PORTA,3 GOTO MAIN INCFSZ PERGESMENTESITES GOTO MAIN1 BSF LATA,0 BCF LATA,1 BSF LATA,2 MAIN2 CLRF PERGESMENTESITES MAIN3 BTFSS PORTA,3 GOTO MAIN2 INCFSZ PERGESMENTESITES GOTO MAIN3 MAIN4 CLRF PERGESMENTESITES MAIN5 BTFSC PORTA,3 GOTO MAIN4 INCFSZ PERGESMENTESITES GOTO MAIN5 BCF LATA,0 BSF LATA,1 BCF LATA,2 MAIN6 CLRF PERGESMENTESITES MAIN7 BTFSS PORTA,3 GOTO MAIN6 INCFSZ PERGESMENTESITES GOTO MAIN7 GOTO MAIN END