Subversion Repositories svnkaklik

Compare Revisions

No changes between revisions

Ignore whitespace Rev 1 → Rev 2

/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