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