My code is that ;
'----------------------------------
@ DEVICE pic16F648A 'Device 16F648A
@ DEVICE pic16F648A, WDT_OFF 'Watch Dog
@ DEVICE pic16F648A, PWRT_ON 'Power on Timer
@ DEVICE pic16F648A, PROTECT_OFF 'Cod Protect Off
@ DEVICE pic16F648A, MCLR_OFF 'MCLR pin is not used
@ DEVICE pic16F648A, INTRC_OSC_NOCLKOUT 'Internal osilator used
DEFINE OSC 4 ' Osilator frekans
CMCON=7
TRISA=255
TRISB=0
PORTB=0
BUTTONINPUT VAR PORTA.0
LED VAR PORTB.0
KILLER VAR PORTB.1
Counter VAR BYTE
Counter=0
Loop:
While BUTTONINPUT=0
High LED
Counter=Counter+1
IF Counter=50 Then High KILLER
Pause 100
Wend
Low LED
Low KILLER
Counter=0
GoTo Loop
End
Bookmarks