/roboti/solarni/dalsi_verze/main.BAK |
---|
0,0 → 1,64 |
/* Program pro ovladani slunecniho robota */ |
/* (chodi se zapojenim Dark Walker rev.3 */ |
/* $Header: /programy/PIC_C/robot/solarni_robot/dalsi_verze/main.c 7 14.05.03 23:21 Kaklik $ */ |
#include "D:\@Kaklik\programy\PIC_C\robot\solarni_robot\dalsi_verze\main.h" |
#define LED PIN_B3 // LED |
#define ON_TIME 75 // Cas sepnuti rele |
#define meridlo PIN_B2 // Napetovy supervisor |
#define RESET PIN_B0 // Pridrzeni RESETu |
void rele1() // Sepnuti prvniho rele |
{ |
output_low(PIN_A1); |
output_low(PIN_B4); |
delay_ms(ON_TIME); |
output_high(PIN_A1); |
output_high(PIN_B4); |
} |
void motor() // Sepnuti motoru |
{ |
output_low(pin_A2); |
output_low(pin_B1); |
output_low(PIN_A4); |
delay_ms(ON_TIME); |
output_high(pin_A2); |
output_high(pin_B1); |
output_high(PIN_A4); |
} |
void main() |
{ |
setup_counters(RTCC_INTERNAL,WDT_18MS); |
output_high(RESET); // vypnuti resetu od supervizoru |
port_b_pullups (true); // zapnuti pullapu ,aby se poznal sepnuty |
// nebo rozepnuty kontakt |
output_high(LED); // |
delay_ms(ON_TIME); // bliknuti LED |
output_low(LED); // |
if (!input(pin_B5)) // zmereni spravneho sepnuti rele1 (spatne kdys |
{ // sepnuto) |
port_b_pullups (false); // vypnuti pullapu |
goto chyba; // kdys je uz sepnuto nemusi se znova spinat |
// ani cekat na nabiti kondenzatoru |
} |
port_b_pullups (false); // vypnuti pullapu za spravneho prubehu |
rele1(); // sepnuti rele1 |
delay_ms(28000); // cekani na nabiti kondenzatoru (casovy limit |
// pred rozjetim je 30 vterin 2 vteriny jsou |
// rezerva na nabiti kondenzatoru pro PIC) |
chyba: |
motor(); // zapnuti motoru |
output_low(RESET); // zapnuti resetu od supervisoru |
} |
/roboti/solarni/dalsi_verze/main.HEX |
---|
0,0 → 1,21 |
:1000000000308A004828000083168510831285106E |
:100010008316061283120612C7308C008C0B0E2832 |
:1000200000000000831685108312851483160612C3 |
:10003000831206167E281030840000080319282831 |
:10004000262800000000000000000000800B21288E |
:1000500083288316051183120511831686108312D7 |
:1000600086108316051283120512C7308C008C0B84 |
:10007000372800000000831605118312051583162A |
:10008000861083128614831605128312051688289B |
:1000900084011F30830508308C008C1D57280730E1 |
:1000A0008101813084000008C0390F38800064006D |
:1000B000813084000008C0390C04800083160610CB |
:1000C0008312061483168113861183128615C73096 |
:1000D0008C008C0B692800000000831686118312A7 |
:1000E0008611831686168312861A7A28831681173C |
:1000F00086288312831681178312042870308F009C |
:10010000FA3090001B288F0B802883168312292831 |
:0A0110008316061083120610630028 |
:02400E00F03F81 |
:00000001FF |
;PIC16F84 |
/roboti/solarni/dalsi_verze/main.LST |
---|
0,0 → 1,225 |
CCS PCW C Compiler, Version 3.110, 15448 |
Filename: d:\@kaklik\programy\pic_c\robot\solarni_robot\dalsi_verze\main.LST |
ROM used: 141 (14%) |
Largest free fragment is 883 |
RAM used: 3 (4%) at main() level |
4 (6%) worst case |
Stack: 1 locations |
* |
0000: MOVLW 00 |
0001: MOVWF 0A |
0002: GOTO 048 |
0003: NOP |
.................... /* Program pro ovladani slunecniho robota */ |
.................... /* (chodi se zapojenim Dark Walker rev.3 */ |
.................... /* $Header: /programy/PIC_C/robot/solarni_robot/dalsi_verze/main.c 7 14.05.03 23:21 Kaklik $ */ |
.................... |
.................... #include "D:\@Kaklik\programy\PIC_C\robot\solarni_robot\dalsi_verze\main.h" |
.................... #include <16F84.h> |
.................... //////// Standard Header file for the PIC16F84 device //////////////// |
.................... #device PIC16F84 |
.................... #list |
.................... |
.................... #use delay(clock=32768) |
* |
001B: MOVLW 10 |
001C: MOVWF 04 |
001D: MOVF 00,W |
001E: BTFSC 03.2 |
001F: GOTO 028 |
0020: GOTO 026 |
0021: NOP |
0022: NOP |
0023: NOP |
0024: NOP |
0025: NOP |
0026: DECFSZ 00,F |
0027: GOTO 021 |
0028: GOTO 083 (RETURN) |
.................... #fuses LP,PUT,NOWDT |
.................... |
.................... |
.................... |
.................... #define LED PIN_B3 // LED |
.................... #define ON_TIME 75 // Cas sepnuti rele |
.................... #define meridlo PIN_B2 // Napetovy supervisor |
.................... #define RESET PIN_B0 // Pridrzeni RESETu |
.................... |
.................... void rele1() // Sepnuti prvniho rele |
.................... { |
.................... output_low(PIN_A1); |
* |
0004: BSF 03.5 |
0005: BCF 05.1 |
0006: BCF 03.5 |
0007: BCF 05.1 |
.................... output_low(PIN_B4); |
0008: BSF 03.5 |
0009: BCF 06.4 |
000A: BCF 03.5 |
000B: BCF 06.4 |
.................... delay_ms(ON_TIME); |
000C: MOVLW C7 |
000D: MOVWF 0C |
000E: DECFSZ 0C,F |
000F: GOTO 00E |
0010: NOP |
0011: NOP |
.................... output_high(PIN_A1); |
0012: BSF 03.5 |
0013: BCF 05.1 |
0014: BCF 03.5 |
0015: BSF 05.1 |
.................... output_high(PIN_B4); |
0016: BSF 03.5 |
0017: BCF 06.4 |
0018: BCF 03.5 |
0019: BSF 06.4 |
001A: GOTO 07E (RETURN) |
.................... } |
.................... |
.................... void motor() // Sepnuti motoru |
.................... { |
.................... output_low(pin_A2); |
* |
0029: BSF 03.5 |
002A: BCF 05.2 |
002B: BCF 03.5 |
002C: BCF 05.2 |
.................... output_low(pin_B1); |
002D: BSF 03.5 |
002E: BCF 06.1 |
002F: BCF 03.5 |
0030: BCF 06.1 |
.................... output_low(PIN_A4); |
0031: BSF 03.5 |
0032: BCF 05.4 |
0033: BCF 03.5 |
0034: BCF 05.4 |
.................... delay_ms(ON_TIME); |
0035: MOVLW C7 |
0036: MOVWF 0C |
0037: DECFSZ 0C,F |
0038: GOTO 037 |
0039: NOP |
003A: NOP |
.................... output_high(pin_A2); |
003B: BSF 03.5 |
003C: BCF 05.2 |
003D: BCF 03.5 |
003E: BSF 05.2 |
.................... output_high(pin_B1); |
003F: BSF 03.5 |
0040: BCF 06.1 |
0041: BCF 03.5 |
0042: BSF 06.1 |
.................... output_high(PIN_A4); |
0043: BSF 03.5 |
0044: BCF 05.4 |
0045: BCF 03.5 |
0046: BSF 05.4 |
0047: GOTO 088 (RETURN) |
.................... } |
.................... |
.................... |
.................... void main() |
.................... { |
0048: CLRF 04 |
0049: MOVLW 1F |
004A: ANDWF 03,F |
.................... |
.................... setup_counters(RTCC_INTERNAL,WDT_18MS); |
004B: MOVLW 08 |
004C: MOVWF 0C |
004D: BTFSS 0C.3 |
004E: GOTO 057 |
004F: MOVLW 07 |
0050: CLRF 01 |
0051: MOVLW 81 |
0052: MOVWF 04 |
0053: MOVF 00,W |
0054: ANDLW C0 |
0055: IORLW 0F |
0056: MOVWF 00 |
0057: CLRWDT |
0058: MOVLW 81 |
0059: MOVWF 04 |
005A: MOVF 00,W |
005B: ANDLW C0 |
005C: IORWF 0C,W |
005D: MOVWF 00 |
.................... |
.................... output_high(RESET); |
005E: BSF 03.5 |
005F: BCF 06.0 |
0060: BCF 03.5 |
0061: BSF 06.0 |
.................... |
.................... port_b_pullups (true); |
0062: BSF 03.5 |
0063: BCF 01.7 |
.................... |
.................... output_high(LED); |
0064: BCF 06.3 |
0065: BCF 03.5 |
0066: BSF 06.3 |
.................... delay_ms(ON_TIME); |
0067: MOVLW C7 |
0068: MOVWF 0C |
0069: DECFSZ 0C,F |
006A: GOTO 069 |
006B: NOP |
006C: NOP |
.................... output_low(LED); |
006D: BSF 03.5 |
006E: BCF 06.3 |
006F: BCF 03.5 |
0070: BCF 06.3 |
.................... |
.................... if (!input(pin_B5)) |
0071: BSF 03.5 |
0072: BSF 06.5 |
0073: BCF 03.5 |
0074: BTFSC 06.5 |
0075: GOTO 07A |
.................... { |
.................... port_b_pullups (false); |
0076: BSF 03.5 |
0077: BSF 01.7 |
.................... goto chyba; |
0078: GOTO 086 |
0079: BCF 03.5 |
.................... } |
.................... |
.................... port_b_pullups (false); |
007A: BSF 03.5 |
007B: BSF 01.7 |
.................... rele1(); |
007C: BCF 03.5 |
007D: GOTO 004 |
.................... |
.................... delay_ms(28000); |
007E: MOVLW 70 |
007F: MOVWF 0F |
0080: MOVLW FA |
0081: MOVWF 10 |
0082: GOTO 01B |
0083: DECFSZ 0F,F |
0084: GOTO 080 |
0085: BSF 03.5 |
.................... |
.................... chyba: |
.................... motor(); |
0086: BCF 03.5 |
0087: GOTO 029 |
.................... output_low(RESET); |
0088: BSF 03.5 |
0089: BCF 06.0 |
008A: BCF 03.5 |
008B: BCF 06.0 |
.................... } |
.................... |
008C: SLEEP |
/roboti/solarni/dalsi_verze/main.PJT |
---|
0,0 → 1,32 |
[PROJECT] |
Target=main.HEX |
Development_Mode= |
Processor=0x684A |
ToolSuite=CCS |
[Directories] |
Include=C:\PROGRAM FILES\PICC\devices\;C:\PROGRAM FILES\PICC\dr |
Library= |
LinkerScript= |
[Target Data] |
FileList=main.c; |
BuildTool=C-COMPILER |
OptionString=+FM |
AdditionalOptionString= |
BuildRequired=1 |
[main.c] |
Type=4 |
Path= |
FileList= |
BuildTool= |
OptionString= |
AdditionalOptionString= |
[mru-list] |
1=main.c |
[Windows] |
0=0000 main.c 0 0 796 451 3 0 |
/roboti/solarni/dalsi_verze/main.SYM |
---|
0,0 → 1,17 |
00C @SCRATCH |
00D @SCRATCH |
00D _RETURN_ |
00F main.@SCRATCH |
010 delay_ms.P1 |
delay_us.P1 |
001B delay_ms |
0004 rele1 |
0029 motor |
0048 main |
0086 chyba |
Project Files: |
d:\@kaklik\programy\pic_c\robot\solarni_robot\dalsi_verze\main.c |
D:\@Kaklik\programy\PIC_C\robot\solarni_robot\dalsi_verze\main.h |
C:\PROGRAM FILES\PICC\devices\16F84.h |
/roboti/solarni/dalsi_verze/main.c |
---|
0,0 → 1,64 |
/* Program pro ovladani slunecniho robota */ |
/* (chodi se zapojenim Dark Walker rev.3 */ |
/* $Header: /programy/PIC_C/roboti/solarni/dalsi_verze/main.c 1 19.09.05 20:39 Jakub $ */ |
#include "D:\@Kaklik\programy\PIC_C\robot\solarni_robot\dalsi_verze\main.h" |
#define LED PIN_B3 // LED |
#define ON_TIME 75 // Cas sepnuti rele |
#define meridlo PIN_B2 // Napetovy supervisor |
#define RESET PIN_B0 // Pridrzeni RESETu |
void rele1() // Sepnuti prvniho rele |
{ |
output_low(PIN_A1); |
output_low(PIN_B4); |
delay_ms(ON_TIME); |
output_high(PIN_A1); |
output_high(PIN_B4); |
} |
void motor() // Sepnuti motoru |
{ |
output_low(pin_A2); |
output_low(pin_B1); |
output_low(PIN_A4); |
delay_ms(ON_TIME); |
output_high(pin_A2); |
output_high(pin_B1); |
output_high(PIN_A4); |
} |
void main() |
{ |
setup_counters(RTCC_INTERNAL,WDT_18MS); |
output_high(RESET); // vypnuti resetu od supervizoru |
port_b_pullups (true); // zapnuti pullapu ,aby se poznal sepnuty |
// nebo rozepnuty kontakt |
output_high(LED); // |
delay_ms(ON_TIME); // bliknuti LED |
output_low(LED); // |
if (!input(pin_B5)) // zmereni spravneho sepnuti rele1 (spatne kdyz |
{ // sepnuto) |
port_b_pullups (false); // vypnuti pullapu |
goto chyba; // kdyz je uz sepnuto nemusi se znova spinat |
// ani cekat na nabiti kondenzatoru |
} |
port_b_pullups (false); // vypnuti pullapu za spravneho prubehu |
rele1(); // sepnuti rele1 |
delay_ms(28000); // cekani na nabiti kondenzatoru (casovy limit |
// pred rozjetim je 30 vterin 2 vteriny jsou |
// rezerva na nabiti kondenzatoru pro PIC) |
chyba: |
motor(); // zapnuti motoru |
output_low(RESET); // zapnuti resetu od supervisoru |
} |
/roboti/solarni/dalsi_verze/main.cod |
---|
Cannot display: file marked as a binary type. |
svn:mime-type = application/octet-stream |
Property changes: |
Added: svn:mime-type |
+application/octet-stream |
\ No newline at end of property |
/roboti/solarni/dalsi_verze/main.err |
---|
0,0 → 1,0 |
No Errors |
/roboti/solarni/dalsi_verze/main.h |
---|
0,0 → 1,4 |
#include <16F84.h> |
#use delay(clock=32768) |
#fuses LP,PUT,NOWDT |
/roboti/solarni/dalsi_verze/main.sta |
---|
0,0 → 1,30 |
ROM used: 141 (14%) |
883 (86%) including unused fragments |
1 Average locations per line |
5 Average locations per statement |
RAM used: 3 (4%) at main() level |
4 (6%) worst case |
Lines Stmts % Files |
----- ----- --- ----- |
61 28 100 d:\@kaklik\programy\pic_c\robot\solarni_robot\dalsi_verze\main.c |
5 0 0 D:\@Kaklik\programy\PIC_C\robot\solarni_robot\dalsi_verze\main.h |
111 0 0 C:\PROGRAM FILES\PICC\devices\16F84.h |
----- ----- |
354 56 Total |
Page ROM % RAM Functions: |
---- --- --- --- ---------- |
0 14 10 1 delay_ms |
0 23 16 0 rele1 |
0 31 22 0 motor |
0 69 49 1 main |
Segment Used Free |
--------- ---- ---- |
0000-0003 4 0 |
0004-03FF 137 883 |
/roboti/solarni/dalsi_verze/main.tre |
---|
0,0 → 1,6 |
ÀÄmain |
ÀÄmain 0/69 Ram=1 |
ÃÄ??0?? |
ÃÄrele1 0/23 Ram=0 |
ÃÄdelay_ms 0/14 Ram=1 |
ÀÄmotor 0/31 Ram=0 |
/roboti/solarni/dalsi_verze/prg.bat |
---|
0,0 → 1,6 |
call picpgr stop |
call picpgr erase pic16f84 |
call picpgr program main.hex hex pic16f84 |
call picpgr run |
pause |
call picpgr stop |
/roboti/solarni/dalsi_verze/vssver.scc |
---|
Cannot display: file marked as a binary type. |
svn:mime-type = application/octet-stream |
Property changes: |
Added: svn:mime-type |
+application/octet-stream |
\ No newline at end of property |