Subversion Repositories svnkaklik

Rev

Go to most recent revision | Details | Last modification | View Log

Rev Author Line No. Line
6 kaklik 1 
;--- Spozdeni v nasobcich 1ms ----
2 
_delay1ms:
3 
	movlw	100		; 1 ms
4 
	movwf	_delay_us
5 
	call	_delay10us
6 
 
7 
	decfsz	_delay_ms, f
8 
	goto	_delay1ms
9 
	return
10 
 
11 
;--- Spozdeni v nasobcich 10us ----
12 
_delay10us:			; Prodleva (CT1 * 10us)+3us
13 
	nop
14 
	nop
15 
	nop
16 
	nop
17 
	nop
18 
	nop
19 
	nop
20 
	decfsz	_delay_us, f
21 
	goto	_delay10us
22 
	return
23 
 
24 
;----------------------------
25 
; Definice promenych pro spozdeni
26 
;----------------------------
27 
	cblock
28 
	_delay_ms	; Citac ms
29 
	_delay_us	; Citac 10us
30 
	endc
31