;LED-Steuerung ini: bsf status,5 ;Wechsel zu Bank 1 movlw 38h ;GP0:GP2 als OUT ;GP3:GP5 als IN bcf wpu,0 ;Pull-Up für GP0 Disabled bcf wpu,1 ;Pull-Up für GP1 Disabled bcf wpu,2 ;Pull-Up für GP2 Disabled movwf trisio bcf status,5 ;Wechsel zu Bank 0 ;sw1: btfss gpio,5 ;Schalter 1 abfrage ; goto sw1 led1: bcf gpio,1 ;GP1 auf Low setzen call loop bsf gpio,0 ;GP0 auf High setzen call loop ;In die Schleife springen led2: bcf gpio,0 ;GP0 auf Low setzen call loop bsf gpio,1 ;GP1 auf High setzen call loop goto led1 loop movlw 255 ;Zeitschleife movwf 21h loop2: movwf 20h loop3: decfsz 20h,1 goto loop3 decfsz 21h,1 goto loop2 return ;Zeitschleife ende