?lang_form? ?lang_select? ?lang_submit? ?lang_endform?

library

?curdirlinks? -

Blame information for rev 1

Line No.	Rev	Author	Line
1	1	kaklik	`////////////////////////////////////////////////////////////////////////////////`
2			`// KNIHOVNA PRO OVLADANI POSUVNEHO REGISTRU`
3			`//`
4			`////////////////////////////////////////////////////////////////////////////////`
5			`// definice:`
6			`//#define DATA PIN_A1`
7			`//#define CP PIN_A0`
8			`//#define STROBE PIN_A2`
9
10			`void putreg(unsigned int8 out) // zapise do registru 8bitovou promenou.`
11			`{`
12			`int8 i;`
13			`output_low(STROBE);`
14
15			`for(i=0;i<=7;i++)`
16			`{`
17			`output_bit(DATA,bit_test(out,7-i));`
18			`output_low(CP);`
19			`output_high(CP);`
20			`}`
21			`output_high(STROBE);`
22			`}`
23
24			`void reg_shift_left()`
25			`{`
26			`output_low(CP);`
27			`output_high(CP);`
28
29			`}`
30
31			`void reg_shift_right()`
32			`{`
33			`}`