/Designs/Measuring_instruments/AWS01B/SW/PIC16F887/HMC5883L.c
1,105 → 1,75
//Knihovna pro senzor HMC5883L
//(c) Jan Chroust 2013
 
 
void set_mag (void) //uvodni nastaveni na kontinualni mereni, rozsah ± 8.1 Ga, frekvence mereni 15HZ
//------------------------------
// Low level routines
//------------------------------
void hmc5883l_write_reg(int8 reg, int8 data)
{
i2c_start(); //nastavení Configuration Register A
I2C_Write(MAG_ADDR_W);
I2C_Write(0x00);
I2C_Write(0x70);
i2c_stop();
Delay_ms(6);
i2c_start(); //nastavení Configuration Register B
I2C_Write(MAG_ADDR_W);
I2C_Write(0x01);
I2C_Write(MAG_ROZ810);
i2c_stop();
 
Delay_ms(6);
 
i2c_start(); //nastveni Mode Register
I2C_Write(MAG_ADDR_W);
I2C_Write(0x02);
I2C_Write(0x00);
i2c_stop();
Delay_ms(6);
i2c_start();
i2c_write(HMC5883L_WRT_ADDR);
i2c_write(reg);
i2c_write(data);
i2c_stop();
}
 
void set_mag_roz (unsigned int8 h) //nastavy rozsah
//------------------------------
int8 hmc5883l_read_reg(int8 reg)
{
int8 retval;
 
//
i2c_start();
I2C_Write(MAG_ADDR_W);
I2C_Write(0x01);
I2C_Write(h);
i2c_stop();
i2c_start();
i2c_write(HMC5883L_WRT_ADDR);
i2c_write(reg);
i2c_start();
i2c_write(HMC5883L_READ_ADDR);
retval = i2c_read(0);
i2c_stop();
 
Delay_ms(6);
 
return(retval);
}
 
 
byte mag_read(byte reg) //pro cteni reg
//------------------------------
typedef struct
{
i2c_start();
I2C_Write(MAG_ADDR_W);
I2C_write(reg);
i2c_stop();
i2c_start();
I2C_Write(MAG_ADDR_R);
reg=i2c_read(0);
return reg;
}
signed int16 x;
signed int16 y;
signed int16 z;
}hmc5883l_result;
 
// This global structure holds the values read
// from the HMC5883L x,y,z registers.
hmc5883l_result compass = {0,0,0};
 
signed int16 mag_vypocet(unsigned int8 h, unsigned int8 l) //prepocet na 16bit cislo
//------------------------------
void hmc5883l_read_data(void)
{
signed int16 x;
x = (((unsigned int16) h << 8) + l );
return x;
}
unsigned int8 x_lsb;
unsigned int8 x_msb;
 
unsigned int8 y_lsb;
unsigned int8 y_msb;
 
signed int16 mag_readX(void) //nacteni osy x
{
unsigned int8 h,l;
signed int16 x;
h=mag_read(0x03);
l=mag_read(0x04);
x=mag_vypocet(h,l);
return x;
}
unsigned int8 z_lsb;
unsigned int8 z_msb;
 
i2c_start();
i2c_write(HMC5883L_WRT_ADDR);
i2c_write(HMC5883L_X_MSB_REG); // Point to X-msb register
i2c_start();
i2c_write(HMC5883L_READ_ADDR);
 
signed int16 mag_readY(void) //nacteni osy x
{
unsigned int8 h,l;
signed int16 x;
h=mag_read(0x07);
l=mag_read(0x08);
x=mag_vypocet(h,l);
return x;
}
x_msb = i2c_read();
x_lsb = i2c_read();
 
z_msb = i2c_read();
z_lsb = i2c_read();
 
signed int16 mag_readZ(void) //nacteni osy x
{
unsigned int8 h,l;
signed int16 x;
h=mag_read(0x05);
l=mag_read(0x06);
x=mag_vypocet(h,l);
return x;
y_msb = i2c_read();
y_lsb = i2c_read(0); // do a NACK on last read
 
i2c_stop();
// Combine high and low bytes into 16-bit values.
compass.x = make16(x_msb, x_lsb);
compass.y = make16(y_msb, y_lsb);
compass.z = make16(z_msb, z_lsb);
}
 
 
/Designs/Measuring_instruments/AWS01B/SW/PIC16F887/HMC5883L.h
1,6 → 1,12
#define MAG_ADDR_R 0x3D //addresa pro cteni
#define MAG_ADDR_W 0x3C
// i2c slave addresses
#define HMC5883L_WRT_ADDR 0x3C
#define HMC5883L_READ_ADDR 0x3D
 
// Register addresses
#define HMC5883L_CFG_A_REG 0x00
#define HMC5883L_CFG_B_REG 0x01
#define HMC5883L_MODE_REG 0x02
#define HMC5883L_X_MSB_REG 0x03
 
//Konstanty nastavujici rozsah
//pro void set_mag_roz (unsigned int8 h)
/Designs/Measuring_instruments/AWS01B/SW/PIC16F887/main.c
8,7 → 8,9
#include "SHT25.h"
#include "MPL3115.h"
#include "HMC5883L.h"
#include ".\common\dbloader.h"
 
 
unsigned int16 timer0_overflow_count;
float anemo=0;
unsigned int8 rain;
41,14 → 43,10
 
float wind_direction(void) //vypocet azimutu smeru vetru
{
signed int16 X,Y,Z;
float b;
X = mag_readX();
delay_ms(10);
Y = mag_readY();
hmc5883l_read_data(); // reads magnetometer data to global variables
 
b = atan2((float)Y,(float)X); // vypocet azimutu z kartezskych souradnic
b = atan2((float)compass.y,(float)compass.x); // vypocet azimutu z kartezskych souradnic
b = (b/3.141596)*180; // prevod na stupne
b += 180;
return b;
97,8 → 95,13
rain=0;
 
welcome();
set_mag(); //nastaveni magnetometru pro smer vetru
 
// Init the HMC5883L. Set Mode register for
// continuous measurements.
hmc5883l_write_reg(HMC5883L_CFG_A_REG, 0x18); // no average, maximal update range
hmc5883l_write_reg(HMC5883L_CFG_B_REG, 0xE0); // maximal range
hmc5883l_write_reg(HMC5883L_MODE_REG, 0x00);
 
//nastaveni SHT25
SHT25_soft_reset();
sht_config = SHT25_RH12_T14 | SHT25_HEATER_OFF; //vypnuti topeni v SHT25
/Designs/Measuring_instruments/AWS01B/SW/PIC16F887/main.h
21,8 → 21,7
#use delay(clock=8000000)
 
//set I2C
#use i2c(master, sda=PIN_C4, scl=PIN_C3,FAST=100000)
#use i2c(Master,Slow,sda=PIN_C4,scl=PIN_C3)
 
//set RS232
#use rs232(baud=38400,parity=N,xmit=PIN_C7,rcv=PIN_C6,bits=8) //rcv TXD xmit RXD
 
#use rs232(baud=38400,parity=N,xmit=PIN_C6,rcv=PIN_C7,bits=8)
/Designs/Measuring_instruments/AWS01B/SW/PIC16F887/main.hex
1,739 → 1,712
:1000000015308A003B2D0000FF00030E8301A10084
:100010000A08A0008A010408A2007708A300780853
:10002000A4007908A5007A08A600831383120B1E8A
:100030001B288B1836288C308400001C21280C18B3
:1000400039288B1E25280B193C28220884002308F8
:10005000F7002408F8002508F9002608FA0020080F
:100060008A00210E8300FF0E7F0E09008A110A12FA
:1000700086298A110A122A298A110A127F298E30AA
:10008000F70083163C08F8003B08F900FA01F8086D
:10009000031D54287908F800F9010830F702F80820
:1000A000031D5428F7015C280310F81B5B28F90D89
:1000B000F80DF7035428F8138312080083163B0841
:1000C00003192429C7003F0803192429C702031C68
:1000D0006E287F30C7070318242974288130C7028F
:1000E000031C2429031924294708F700F801F90102
:1000F000FA01C6013C08C500C5173D08C4003E080A
:10010000C3001930C7004208C30203189728013002
:10011000C40203189728C50203189728C6020318BB
:100120009728C60AC50AC40A4208C307C928410855
:10013000C4020318B2280130C5020318B228C6024F
:100140000318B228C60AC50A4108C4074208C307F3
:10015000031CC928C40A031DC928C50A031DC928D0
:10016000C60AC92840088038C5020318C8280130CB
:10017000C6020318C828C60A40088038C5074108C7
:10018000C407031CA628C50A031DA628C60AA6285C
:100190007A14C70BCC28D7280310C30DC40DC50D86
:1001A000C60D0310FA0DF90DF80DC80D8328481C73
:1001B000DF280310F80CF90CFA0CC80CE228F7033E
:1001C00003192429C81B0B290310C30DC40DC50D29
:1001D000C60D4208C3020318F7280130C4020318F1
:1001E000F728C5020318F728C602031C1A2941087C
:1001F000C402031802290130C50203180229C602ED
:10020000031C1A2940088038C50203180B29013045
:10021000C602031C1A29FA0A031D1A29F90A031D2A
:100220001A29F80A031D1A29F70A03192429F80CB8
:10023000F90CFA0C3C08C7004008C706C71F222962
:10024000F8172829F8132829F701F801F901FA010C
:10025000831208002C088316BA0083122B08831619
:10026000B900BC01FF30BB001030BD00F701FA013E
:10027000BA0CB90C031C42293B08F7070318FA0A09
:100280003C08FA07FA0CF70CF90CF80CBD0B3829EE
:100290007908BA007808B900831201088316B907F3
:1002A0000318BA0A3A08BC003908BB0083123F2081
:1002B0007A088316BE007908BD007808BC0077086C
:1002C000BB008030C200C101C0017E30BF0083127C
:1002D0005E207A08B0007908AF007808AE00770891
:1002E000AD00AC01AB0181018F018E0183160910B5
:1002F0000130831289060C108A110A122528AB0AD4
:100300000319AC0A0B118A110A122528B10A8B10A5
:100310008A110A1225280D050D052310CD32F4325D
:100320006F396F36EF33E931EB30A039F430EE340A
:10033000E332A0127310A82129103218B119A03B82
:10034000F73BAE36EC306217633DA0060A0030176B
:100350003100A424641DA036E1346E176310B21C72
:10036000311B2019B018B316301AAD183410B11B58
:100370003A1A321DB0195A10EB306B36E93520129B
:1003800000012310F6327210F037F230E43420000E
:100390006136F434ED32F42FF42DC32EA0306C3AD4
:1003A000E936653ADF30DB365D106136F434ED3224
:1003B000F42FF02DD0305D1000017334F42FF42DA4
:1003C000C32EA039683A5F34DB12A52EA039683AF3
:1003D000DF316F37E6346710D7346E325F326939F8
:1003E000E531F4346F37A020EE32ED375B38EC396D
:1003F000AF39DD31E832E3350D050D050000A813F6
:10040000280883168700831287130830F800082A0B
:100410000000F817192AF813DC0C03188717031CBF
:1004200087137817192A7813F80B0C2A172A00005B
:1004300087170B308400840B1B2A0000F81B0B2A43
:10044000781B132A0800831603178C170C1400005E
:1004500000000318522A83120C087F390313D000BE
:1004600003170D080313D10003170F080313D2005D
:100470005008DC00FF21510803178D0003135208B8
:1004800003178F0083168C170C14000000008312D2
:100490000313CF0B4C2A4F2A83160317522A712AB3
:1004A0008316031783120C0D0E0D7F390313D00032
:1004B00003170D080313D10003170F080313D2000D
:1004C0005008DC00FF21510803178D000313520868
:1004D00003178F008D0A03198F0A03100313CF0B24
:1004E000232A0800831603178C170C140000000041
:1004F00083120C087F390319B62A0313CF000317A0
:100500000D080313D00003170F080313D1004F0881
:10051000DC00FF21500803178D0003135108031757
:100520008F0083168C170C140000000083120C0D32
:100530000E0D7F390319B62A0313CF0003170D08D8
:100540000313D00003170F080313D1004F08DC007A
:10055000FF21500803178D000313510803178F0064
:100560008D0A03198F0A0313722A03170313080055
:100570008B3003178D0001308F0003101D300313E3
:10058000CF002322A73003178D0001308F00031303
:1005900072229A3003178D0001308F000314183037
:1005A0000313CF0023220D30DC00FF210A30DC00D2
:1005B000FF212030DC00FF21A93003178D0001301E
:1005C0008F00031372222030DC00FF210D30DC008D
:1005D000FF210A30DC00FF21C13003178D000130FC
:1005E0008F0003137222C83003178D0001308F0073
:1005F00003137222DD3003178D0001308F000310CA
:100600000F300313CF0023222530DC00FF21E5301B
:1006100003178D0001308F00031431300313CF0016
:1006200023228A110A16B82D0830F800000087111D
:10063000A81128088316870000008312E10D071215
:10064000031C282B28162808831687002C2B8312BE
:10065000281228088316870000008312A81528088E
:10066000831687008312871D332BF80B162B00008F
:100670008711A81128088316870000008312281606
:10068000280883168700000000008312A815280898
:10069000831687008312871D4B2BF8010000071A71
:1006A00078148711A811280883168700831207126F
:1006B0002812280883168700831208005930840006
:1006C000831300080319712B0230F800F701F70BB0
:1006D000672BF80B662B9730F700F70B6D2B800B11
:1006E000642B080028162808831687000000831250
:1006F000A815280883168700000083120712281205
:10070000280883168700000083128711A811280883
:10071000831687003C308312E1001423E101142387
:100720007030E10014232812280883168700000087
:100730008312A8152808831687008312871D9E2B15
:100740000000A22B0000281628088316870000004E
:1007500006308312D9005E232816280883168700E6
:1007600000008312A8152808831687000000831252
:1007700007122812280883168700000083128711A9
:10078000A8112808831687003C308312E100142347
:100790000130E1001423E030E1001423281228087E
:1007A0008316870000008312A81528088316870087
:1007B0008312871DD92B0000DD2B00002816280886
:1007C00083168700000006308312D9005E232816A6
:1007D00028088316870000008312A81528088316AE
:1007E000870000008312071228122808831687004A
:1007F000000083128711A8112808831687003C3057
:100800008312E10014230230E1001423E1011423D8
:10081000281228088316870000008312A8152808CC
:10082000831687008312871D132C0000172C0000ED
:100830002816280883168700000006308312D90086
:100840005E238A110A16BB2D2816280883168700F6
:1008500000008312A8152808831687000000831261
:1008600007122812280883168700000083128711B8
:10087000A81128088316870080308312E100142312
:10088000FE30E10014232812280883168700000098
:100890008312A8152808831687008312871D4E2C03
:1008A0000000522C0000281628088316870000003C
:1008B00083128A110A16BE2D0830E2007708E30081
:0800000014308A00332C0000CB
:10002000FF00030E8301A1000A08A0008A01040852
:10003000A2007708A3007808A4007908A5007A0830
:10004000A600831383120B1E27288B1842288C309E
:100050008400001C2D280C1845288B1E31280B19F4
:100060004828220884002308F7002408F8002508FF
:10007000F9002608FA0020088A00210E8300FF0EEE
:100080007F0E09008A110A1292298A110A12362952
:100090008A110A128B298E30F70083163C08F8006B
:1000A0003B08F900FA01F808031D60287908F800F8
:1000B000F9010830F702F808031D6028F7016828E5
:1000C0000310F81B6728F90DF80DF7036028F813E3
:1000D0008312080083163B0803193029C7003F0824
:1000E00003193029C702031C7A287F30C707031879
:1000F000302980288130C702031C30290319302998
:100100004708F700F801F901FA01C6013C08C500EB
:10011000C5173D08C4003E08C3001930C700420897
:10012000C3020318A3280130C4020318A328C50280
:100130000318A328C6020318A328C60AC50AC40ABE
:100140004208C307D5284108C4020318BE2801305D
:10015000C5020318BE28C6020318BE28C60AC50A6F
:100160004108C4074208C307031CD528C40A031D5D
:10017000D528C50A031DD528C60AD52840088038C9
:10018000C5020318D4280130C6020318D428C60AB1
:1001900040088038C5074108C407031CB228C50AB7
:1001A000031DB228C60AB2287A14C70BD828E32840
:1001B0000310C30DC40DC50DC60D0310FA0DF90DC6
:1001C000F80DC80D8F28481CEB280310F80CF90C0B
:1001D000FA0CC80CEE28F70303193029C81B17299D
:1001E0000310C30DC40DC50DC60D4208C30203188C
:1001F00003290130C40203180329C5020318032987
:10020000C602031C26294108C40203180E29013026
:10021000C50203180E29C602031C2629400880388F
:10022000C502031817290130C602031C2629FA0A41
:10023000031D2629F90A031D2629F80A031D26296C
:10024000F70A03193029F80CF90CFA0C3C08C7001E
:100250004008C706C71F2E29F8173429F813342978
:10026000F701F801F901FA01831208003208831638
:10027000BA00831231088316B900BC01FF30BB00FD
:100280001030BD00F701FA01BA0CB90C031C4E295D
:100290003B08F7070318FA0A3C08FA07FA0CF70CB0
:1002A000F90CF80CBD0B44297908BA007808B9009C
:1002B000831201088316B9070318BA0A3A08BC006A
:1002C0003908BB0083124B207A088316BE007908D8
:1002D000BD007808BC007708BB008030C200C101B7
:1002E000C0017E30BF0083126A207A08B600790808
:1002F000B5007808B4007708B300B201B1018101FC
:100300008F018E01831609100130831289060C10AB
:100310008A110A123128B10A0319B20A0B118A1183
:100320000A123128B70A8B108A110A1231280D05DA
:100330000D052310CD32F4326F396F36EF33E931CA
:10034000EB30A039F430EE34E332A0127310A82160
:1003500029103218B119A03BF73BAE36EC306217CA
:10036000633DA0060A0030173100A424641DA036A6
:10037000E1346E176310B21C311B2019B018B3168C
:10038000301AAD183410B11B3A1A321DB0195A1078
:10039000EB306B36E935201200012310F632721073
:1003A000F037F230E43420006136F434ED32F42FCB
:1003B000F42DC32EA0306C3AE936653ADF30DB36D7
:1003C0005D106136F434ED32F42FF02DD0305D1035
:1003D00000017334F42FF42DC32EA039683A5F3432
:1003E000DB12A52EA039683ADF316F37E63467108B
:1003F000D7346E325F326939E531F4346F37A0207B
:10040000EE32ED375B38EC39AF39DD31E832E335C8
:100410000D050D050000831603178C170C14000042
:10042000000003183B2A83120C087F390313D600FF
:1004300003170D080313D70003170F080313D80081
:1004400056080C1E212A9900570803178D00031324
:10045000580803178F0083168C170C140000000037
:1004600083120313D50B352A382A831603173B2A28
:100470005B2A8316031783120C0D0E0D7F390313AD
:10048000D60003170D080313D70003170F08031333
:10049000D80056080C1E4A2A9900570803178D00E9
:1004A0000313580803178F008D0A03198F0A0310CE
:1004B0000313D50B0B2A0800831603178C170C1493
:1004C0000000000083120C087F390319A22A0313CD
:1004D000D50003170D080313D60003170F080313E5
:1004E000D70055080C1E722A9900560803178D0074
:1004F0000313570803178F0083168C170C14000082
:10050000000083120C0D0E0D7F390319A22A03136C
:10051000D50003170D080313D60003170F080313A4
:10052000D70055080C1E922A9900560803178D0013
:100530000313570803178F008D0A03198F0A03133B
:100540005C2A031703130800973003178D0001304E
:100550008F0003101D300313D5000B22B330031797
:100560008D0001308F0003135C22A63003178D002D
:1005700001308F00031418300313D5000B220D3007
:100580000C1EC02A99000A300C1EC42A9900203083
:100590000C1EC82A9900B53003178D0001308F005A
:1005A00003135C2220300C1ED32A99000D300C1E40
:1005B000D72A99000A300C1EDB2A9900CD30031788
:1005C0008D0001308F0003135C22D43003178D009F
:1005D00001308F0003135C22E93003178D000130D6
:1005E0008F0003100F300313D5000B2225300C1E93
:1005F000F72A9900F13003178D0001308F000314A2
:1006000031300313D5000B228A110A16B92C083099
:10061000F80000008711A811280883168700000041
:100620008312E70D0712031C1B2B281628088316BC
:1006300087001F2B831228122808831687000000CA
:100640008312A8152808831687008312871D262B7E
:10065000F80B092B00008711A811280883168700C2
:100660000000831228162808831687000000000067
:100670008312A8152808831687008312871D3E2B36
:10068000F8010000071A78148711A81128088316AA
:100690008700831207122812280883168700831206
:1006A0000800281628088316870000008312A81562
:1006B00028088316870000008312071228122808D2
:1006C00083168700000083128711A811280883165B
:1006D00087003C308312E70007235508E700072313
:1006E0005608E70007232812280883168700000011
:1006F0008312A8152808831687008312871D7E2B76
:100700000000822B000028162808831687000000AE
:100710008312080028162808831687000000831219
:10072000A8152808831687000000831207122812D4
:10073000280883168700000083128711A811280853
:100740008316870080308312E7000723FE30E7001E
:100750000723281228088316870000008312A81593
:100760002808831687008312871DB42B0000B82B3E
:1007700000002816280883168700000083128A11BB
:100780000A16CF2C0830E8007708E9002816280858
:100790008316870000008312A81528088316870097
:1007A0008312871DD12B071A0314071E0310F80D9F
:1007B0000000A81128088316870083128711E80B10
:1007C000C62B2816280883168700000083120712FC
:1007D00069080319F02B2812280883168700831252
:1007E0000000A8152808831687008312871DF62BA2
:1007F00000008711A81128088316870000008312C3
:1008000007122812280883168700831208005A301E
:1008100084008313000803191A2C0230F800F70132
:10082000F70B102CF80B0F2C9730F700F70B162C4A
:10083000800B0D2C0800281628088316870000005E
:100840008312A81528088316870000008312071258
:100850002812280883168700000083128711A81128
:1008600028088316870080308312E7000723E730CB
:10087000E700072328162808831687000000831244
:10088000A81528088316870000008312871D462CB0
:100890000712281228088316870000008312871188
:1008A000A81128088316870081308312E7000723E8
:1008B000F701C2237808D60056083A395504D60005
:1008C000281628088316870000008312A815280818
:1008D000831687008312871D6B2C071A0314071ECB
:1008E0000310F80D0000A811280883168700831252
:1008F0008711E20B602C2816280883168700000059
:1009000083120712630803198A2C281228088316F9
:10091000870083120000A815280883168700831219
:10092000871D902C00008711A811280883168700C6
:1009300000008312071228122808831687008312EA
:100940000800281628088316870000008312A815BF
:10095000280883168700000083120712281228082F
:1009600083168700000083128711A81128088316B8
:10097000870080308312E1001423E730E100142364
:10098000281628088316870000008312A815280857
:100990008316870000008312871DCC2C07122812B3
:1009A000280883168700000083128711A8112808E1
:1009B0008316870081308312E1001423F7015C2441
:1009C0007808D00050083A394F04D000281628087B
:1009D0008316870000008312A81528088316870055
:1009E00000008312871DF22C071228122808831694
:1009F0008700000083128711A8112808831687003A
:100A000080308312E1001423E630E1001423500803
:100A1000E10014232812280883168700000083129F
:100A2000A8152808831687008312871D152D00003E
:100A3000192D0000281628088316870000000A30A8
:100A40008312D9005E232816280883168700000029
:100A50008312A81528088316870000008312071246
:100A60002812280883168700000083128711A81116
:100A700028088316870080308312E1001423E730B2
:100A8000E10014232816280883168700000083122B
:100A9000A81528088316870000008312871D4E2D95
:100AA0000712281228088316870000008312871176
:100AB000A81128088316870081308312E1001423CF
:100AC000F7015C247808D0005008F80008002816C8
:100AD00028088316870000008312A81528088316AB
:100AE0008700000083120712281228088316870047
:100AF000000083128711A811280883168700C030D0
:100B00008312E10014232630E1001423B830E10001
:100B10001423281228088316870000008312A815C2
:100B20002808831687008312871D942D0000982DB6
:100B30000000281628088316870000008312281654
:100B400028088316870000008312A815280883163A
:100B500087000000831207122812280883168700D6
:100B6000000083128711A811280883168700C0305F
:100B70008312E10014231330E10014230730E10055
:100B80001423281228088316870000008312A81552
:100B90002808831687008312871DCC2D0000D02DD6
:100BA00000002816280883168700000083122816E4
:100BB00028088316870000008312A81528088316CA
:100BC0008700000083120712281228088316870066
:100BD000000083128711A811280883168700C030EF
:100BE0008312E10014232630E10014233930E100A0
:100BF0001423281228088316870000008312A815E2
:100C00002808831687008312871D042E0000082EF3
:100C100000002816280883168700000083128A1116
:100C20000A16CB2D28162808831687000000831289
:100C3000A8152808831687000000831207122812BF
:100C4000280883168700000083128711A81128083E
:100C500083168700C0308312E10014235F08E1008F
:100C60001423281628088316870000008312A8156D
:100C700028088316870000008312871D3D2E071267
:100C80002812280883168700000083128711A811F4
:100C9000280883168700C1308312E1001423F7016E
:100CA0005C247808E00028122808831687000000DA
:100CB0008312A8152808831687008312871D5E2ECD
:100CC0000000622E00002816280883168700000006
:100CD00083126008F80008008030831C722E83168F
:100CE000AE0683128316B301B4012A08B2002E089F
:100CF000B20629080319602FB100F7002D08031967
:100D0000692FB1020319052F031CC32E2E08B7004B
:100D1000B7172F08B6003008B500B4010310B70CA0
:100D2000B60CB50CB40CB10B8D2EB21F9A2E331429
:100D30007D2F331031103316AC3084008313922F83
:100D40003312B21BAD2E311CB82EB70CB60CB50C3D
:100D5000B40CF70A0319782FB82EB71BBB2E03105B
:100D6000B40DB50DB60DB70DF7030319782FAD2EE1
:100D70003317252F33132A08B200B21FC12EB7171D
:100D8000712FB713712F2D08B100F7002908B10298
:100D90002A08B700B7172B08B6002C08B500B40115
:100DA0000310B70CB60CB50CB40CB10BCF2EB21FA0
:100DB000DC2EB3147D2FB3103110B316B030840085
:100DC0008313922FB312B21BEF2E311CFA2EB70CE5
:100DD000B60CB50CB40CF70A0319782FFA2EB71B12
:100DE000FD2E0310B40DB50DB60DB70DF7030319A5
:100DF000782FEF2EB317252FB3132E08B200B21F92
:100E0000032FB717712FB713712F2E08B700B7171D
:100E10002F08B6003008B500B21F122FB7133315D4
:100E20007D2F3311B4013110AC3084008313922F25
:100E3000B21B3B2F2A08B200311C252FB70CB60C71
:100E4000B50CB40CF70A0319782FB41F362FB50A66
:100E5000031D362FB60A031D362FB70A031D362F82
:100E6000B70CB60CB50CF70A0319782F331BBA2E42
:100E7000B31BFC2E5A2F8030B706B71F432F7D2F90
:100E80002E08B200502F2A08B200B708031D502FB9
:100E9000B608031D502FB508031D502FF701712F01
:100EA000B71B5A2F0310B40DB50DB60DB70DF70BC8
:100EB000502F782FB21F5E2FB717712FB713712FD6
:100EC0002D08F7002E08B7002F08B6003008B5002F
:100ED000712F2908F7002A08B7002B08B6002C0844
:100EE000B5003708F8003608F9003508FA00B02FC9
:100EF000F701F801F901FA01B02FB401B509B609FB
:100F0000B709B409B40A031D8B2FB50A031D8B2F33
:100F1000B60A0319B70A3318992EB318DB2E331902
:100F2000112F402F0008B507031C9C2FB60A031D84
:100F30009C2FB70A0319311484030008B607031C59
:100F4000A42FB70A0319311484030008801F803AC4
:100F5000B70703183114331AA02EB31AE22E182F34
:100F600083120800E2015D08E100E200E1015E0891
:100F70006107DF006208E0000318E00A5F08F8007C
:100F80006008F90008008E30F7005E08F8005D0880
:100F9000F900FA01DE1FD12FF809F909F90A03193E
:100FA000F80AF808031DDE2F7908F800F901083067
:100FB000F702F808031DDE2FF701E72F0310F81BD7
:100FC000E52FF90DF80DF703DE2FDE1FF8130800EB
:100FD0005208F80151020318F02F5108F700FC2FB6
:100FE000F7010830D300D10DF70D5208770203182E
:0A0FF000F700F80DD30BF32F0800F3
:101000000430DF008A1112268A157808CF000530D7
:10101000DF008A1112268A15780EF7000F30F705C7
:101020007708A7018B1BA7178B138316BC01BB0086
:101030008A1183123F208A15A71B8B177708D800C7
:101040007808D9007908DA007A08DB00A7018B1B41
:10105000A7178B135B088316BE0083125A088316EA
:10106000BD00831259088316BC00831258088316EA
:10107000BB00C201C101C0018330BF008A118312CD
:101080005E208A15A71B8B177A08D3007908D20037
:101090007808D1007708D000A7018B1BA7178B1306
:1010A0008316BC0183124F088316BB008A1183127A
:1010B0003F208A15A71B8B1783107A088316AC0074
:1010C0007908AB007808AA007708A90083125308B2
:1010D0008316B000831252088316AF0083125108A2
:1010E0008316AE00831250088316AD008A11831256
:1010F0006C268A157A08D7007908D6007808D500BA
:101100007708D4005408F7005508F8005608F9008D
:101110005708FA008A110A16D82D0130DF008A110B
:1011200012268A15D201D101D0017808CF000230F1
:10113000DF008A1112268A15D4017808D300033003
:10114000DF008A1112268A157808D500550DD600C1
:10115000D60DFC30D605550EF700F70CF70C033012
:10116000F7057708A7018B1BA7178B138316BC0104
:10117000BB008A1183123F208A15A71B8B177708A3
:10118000E0007808E1007908E2007A08E300A701AE
:101190008B1BA7178B137A088316BE00831279085E
:1011A0008316BD00831278088316BC00831277086B
:1011B0008316BB00C201C101C0018130BF008A118A
:1011C00083125E208A15A71B8B177A08DE00790828
:1011D000DD007808DC007708DB00E0014F0DE1005E
:1011E000500DE200510DE300E10DE20DE30DFC3086
:1011F000E105530DF900540DFA00F90DFA0DFC301C
:10120000F9057908E0047A08E104550EF700F70CB7
:10121000F70C0330F70577086004F7006108F80061
:101220006208F9006308FA007A08E9007908E80022
:101230007808E7007708E600B630F700FA01F90110
:10124000F8016608670468046904031D2929F70189
:1012500036290310F81B3529E60DE70DE80DE90DD9
:10126000FA0DF90DF80DF70B2929F8137708E000AE
:101270007808E1007908E2007A08E30083107A0830
:101280008316AC00831279088316AB0083127808AA
:101290008316AA00831277088316A90083125E08BA
:1012A0008316B00083125D088316AF0083125C08BA
:1012B0008316AE0083125B088316AD008A11831279
:1012C0006C268A157A08DA007908D9007808D800DF
:1012D0007708D7005708F7005808F8005908F900B0
:1012E0005A08FA008A110A16E52D281628088316CE
:1012F000870000008312A8152808831687000000C5
:101300008312071228122808831687000000831210
:101310008711A811280883168700C0308312E100C6
:101320008A1114238A152630E1008A1114238A15A4
:10133000B830E1008A1114238A1528122808831670
:10134000870000008312A8152808831687008312DF
:10135000871DA8290000AC2900002816280883163C
:1013600087000000831228162808831687000000D3
:101370008312A8152808831687000000831207121D
:101380002812280883168700000083128711A811ED
:10139000280883168700C0308312E1008A111423C5
:1013A0008A151330E1008A1114238A150730E100F1
:1013B0008A1114238A152812280883168700000032
:1013C0008312A8152808831687008312871DE62933
:1013D0000000EA290000281628088316870000006C
:1013E0008312281628088316870000008312A81588
:1013F0002808831687000000831207122812280885
:1014000083168700000083128711A811280883160D
:101410008700C0308312E1008A1114238A15263018
:10142000E1008A1114238A15B930E1008A111423CE
:101430008A15281228088316870000008312A81531
:101440002808831687008312871D242A0000282A73
:1014500000002816280883168700000083128A11CE
:101460000A16F22D0130DF008A1112268A15D001EA
:101470007808CF000230DF008A1112268A1578081A
:10148000D1000330DF008A1112268A15780EF7008A
:101490000F30F7057708A7018B1BA7178B1383164F
:1014A000BC01BB008A1183123F208A15A71B8B1732
:1014B0007708DA007808DB007908DC007A08DD00BC
:1014C000A7018B1BA7178B137A088316BE00831204
:1014D00079088316BD00831278088316BC00831236
:1014E00077088316BB00C201C101C0018330BF0071
:1014F0008A1183125E208A15A71B8B177A08D500E4
:101500007908D4007808D3007708D2004F08DC00AF
:10151000DB015B085104F7004F08FA007708A701C8
:101520008B1BA7178B138316BB007A08BC008A118C
:1015300083123F208A15A71B8B177708DB007808DA
:10154000DC007908DD007A08DE0083107A08831653
:10155000AC00831279088316AB00831278088316D7
:10156000AA00831277088316A900831255088316F0
:10157000B000831254088316AF00831253088316F9
:10158000AE00831252088316AD008A1183126C26B6
:101590008A157A08D9007908D8007808D700770822
:1015A000D6005608F7005708F8005808F9005908FF
:1015B000FA008A110A16002E8316290803194D2BEA
:1015C000B1002D0803194D2BB1070318EE2A7F3007
:1015D000B102031C4D2B03194D2BF22A8130B107A8
:1015E00003184D2B3108F700F801F901FA012A0818
:1015F000B500B5172B08B4002C08B3001830B100A3
:10160000B201331C1B2B3008FA07031C0D2BF90AFF
:10161000031D0D2BF80A0319B2172F08F907031C35
:10162000142BF80A0319B2172E08AB00AB172B08BE
:10163000F8070318B217B20DF80CF90CFA0CB50C38
:10164000B40CB30C0310B10B002B0130F7070318D7
:101650004D2BF81B322BB50DFA0DF90DF80DF703D4
:1016600003194D2BB51F432BFA0A031D432BF90A0F
:10167000031D432BF80A031D432BF80CF90CFA0C3D
:10168000F70A03194D2B2A08B2002E08B206B21F22
:101690004B2BF817512BF813512BF701F801F901D7
:1016A000FA01831208002816280883168700000014
:1016B0008312A81528088316870000008312871D4F
:1016C0005F2B071228122808831687000000831258
:1016D0008711A81128088316870080308312E10043
:1016E0008A1114238A15E330E1008A1114238A1524
:1016F000281228088316870000008312A8152808DE
:10170000831687008312871D832B0000872B000020
:101710002816280883168700000064308312D90039
:101720008A115E238A152816280883168700000070
:101730008312A81528088316870000008312071259
:101740002812280883168700000083128711A81129
:1017500028088316870081308312E1008A11142340
:101760008A150130F7008A115C248A157808CF00A9
:101770000130F7008A115C248A157808D000F7013F
:101780008A115C248A157808D1002812280883164B
:10179000870000008312A81528088316870083128B
:1017A000871DD02B0000D42B000028162808831694
:1017B000870000008312D00CD00C3F30D005D5013B
:1017C0004F08D400D500D401500EF700F030F705D3
:1017D00077085407D2005508D3000318D30AA7018D
:1017E0008B1BA7178B1353088316BC008312520858
:1017F0008316BB008A1183123F208A15A71B8B1703
:101800007708D4007808D5007908D6007A08D70080
:10181000A7018B1BA7178B137A088316BE008312B0
:1018200079088316BD00831278088316BC008312E2
:1018300077088316BB00C201FF30C1007F30C000B3
:101840008E30BF008A1183125E208A15A71B8B176A
:1018500052308316AC00B830AB002F30AA0086306F
:10186000A9007A08B0007908AF007808AE007708C0
:10187000AD008312DC22831066308316AC00AB000F
:10188000BB30AA008430A9007A08B0007908AF0004
:101890007808AE007708AD008A1183126C268A158D
:1018A0008A110A16362E281628088316870000008B
:1018B0008312A815280883168700000083120712D8
:1018C0002812280883168700000083128711A811A8
:1018D00028088316870080308312E1008A111423C0
:1018E0008A15E530E1008A1114238A156430D90085
:1018F0008A115E238A15281628088316870000009F
:101900008312A81528088316870000008312871DFC
:10191000872C0712281228088316870000008312DC
:101920008711A81128088316870081308312E100EF
:101930008A1114238A150130F7008A115C248A1554
:101940007808CF000130F7008A115C248A157808E6
:10195000D000F7018A115C248A157808D10028127A
:1019600028088316870000008312A815280883160C
:1019700087008312871DBA2C0000BE2C0000281699
:1019800028088316870000008312D00CD00C3F304B
:10199000D005D5014F08D400D500D401500EF70072
:1019A000F030F70577085407D2005508D300031824
:1019B000D30AA7018B1BA7178B1353088316BC00F0
:1019C000831252088316BB008A1183123F208A15A6
:1019D000A71B8B177708D4007808D5007908D600A4
:1019E0007A08D700A7018B1BA7178B137A088316D9
:1019F000BE00831279088316BD008312780883160F
:101A0000BC00831277088316BB00C201FF30C100FF
:101A10007F30C0008E30BF008A1183125E208A158D
:101A2000A71B8B178316AC01AB017A30AA00853057
:101A3000A9007A08B0007908AF007808AE007708EE
:101A4000AD008312DC2283108316AC01AB01C030E1
:101A5000AA008130A9007A08B0007908AF007808A0
:101A6000AE007708AD008A1183126C268A158A11A0
:101A70000A16432E281628088316870000008312B2
:101A8000A815280883168700000083120712281261
:101A9000280883168700000083128711A8112808E0
:101AA000831687003C308312E1008A1114238A15C3
:101AB0005D08E1008A1114238A152812280883166C
:101AC000870000008312A815280883168700831258
:101AD000871D682D00006C2D00002816280883162D
:101AE000870000008312281628088316870000004C
:101AF0008312A81528088316870000008312071296
:101B00002812280883168700000083128711A81165
:101B10002808831687003D308312E1008A111423C0
:101B20008A15F7018A115C248A157808DD005D08A2
:101B3000F800080083162608AD002A08AD06AD1F80
:101B4000A62D03110310A61B0314D92D2608AD00E2
:101B50002908AE002508AE020319B42DAD1FD92DFA
:101B60000308013A8300D92D2A08AE002608AE02E8
:101B70000319C02DAD1FD92D0308013A8300D92DBB
:101B80002B08AE002708AE020319CC2DAD1FD92DAE
:101B90000308013A8300D92D2C08AE002808AE02B4
:101BA0000319D82DAD1FD92D0308013A8300D92D73
:101BB0000310831208006D10EE0164088316A8005C
:101BC000831263088316A700831262088316A60097
:101BD000831261088316A500AC01AB01AA01A9011B
:101BE00083129A250318F62D031D132E68088316F9
:101BF000A800831267088316A7008312660883165D
:101C0000A600831265088316A500AC01AB01AA01EA
:101C1000A90183129A2503180F2E031D112E0330DC
:101C2000122E04302D2E68088316A8008312670830
:101C30008316A700831266088316A6008312650820
:101C40008316A500AC01AB01AA01A90183129A2554
:101C5000031C2C2E02302D2E0130EE00640883165A
:101C6000A800831263088316A700831262088316F4
:101C7000A600831261088316A500AC01AB01AA017E
:101C8000A90183129A25031C492E6D146208803A1B
:101C9000E20068088316A800831267088316A7006D
:101CA000831266088316A600831265088316A500B2
:101CB000AC01AB01AA01A90183129A25031C632E72
:101CC0006608803AE60068088316A8008312670851
:101CD0008316A700831266088316A6008312650880
:101CE0008316A500AC01AB01AA01A90183129A25B4
:101CF000031DA72E64088316A800831263088316A9
:101D0000A700831262088316A60083126108831657
:101D1000A500AC01AB01AA01A90183129A25031900
:101D2000A62E6D1C9D2E7F30F700C930F8000F30B5
:101D3000F900DB30FA00692FA62E7F30F70049301A
:101D4000F8000F30F900DB30FA00692F692FA70186
:101D50008B1BA7178B1364088316BE0083126308BE
:101D60008316BD00831262088316BC0083126108CB
:101D70008316BB00831268088316C20083126708AB
:101D80008316C100831266088316C000831265089B
:101D90008316BF008A1183125E208A15A71B8B173A
:101DA0007A08EC007908EB007808EA007708E90087
:101DB00001306E02FC3E0318692F043E6C2F6C0844
:101DC000F2006B08F1006A08F0006908EF000A16DB
:101DD0008A1100200A128A15692F692F6C08F200F7
:101DE0006B08F1006A08F0006908EF000A168A1112
:101DF00000200A128A15F0010408EF007010831BFE
:101E000070148314DB308316AC000F30AB00493004
:101E1000AA008030A9007A08B0007908AF007808DD
:101E2000AE007708AD008A1183126C268A156F0800
:101E30008400831370188317692F692F6C08F200D0
:101E40006B08F1006A08F0006908EF000A168A11B1
:101E500000200A128A157708EF007808F000790848
:101E6000F1007A08F200F4010408F3007410831BF7
:101E70007414831472088316AC007108AB007008E8
:101E8000AA0083126F088316A900DB30B0000F3060
:101E9000AF004930AE008030AD008A1183126C264D
:101EA0008A1573088400831374188317692F692FA8
:101EB0006C08F2006B08F1006A08F0006908EF0096
:101EC0000A168A1100200A128A158030F806692F36
:101ED000692F8A110A16752B0A148A140A158207AB
:101EE000DF2EEE2E1E2F582FF701F801F901FA010F
:101EF000E401E501E601E7016308620461046004AE
:101F00000319B22F2030E8000310DC0DDD0DDE0DCB
:101F1000DF0DE40DE50DE60DE70D63086702031D17
:101F20009B2F62086602031D9B2F61086502031D3B
:101F30009B2F60086402031CAC2F6008E402610858
:101F4000031C610FE5026208031C620FE6026308CE
:101F5000031C630FE7020314F70DF80DF90DFA0DDA
:101F6000E80B842F6430840083130800D01BCA2F31
:101F70000F30F7004F0EF7050A3077020318C32F12
:101F80003030F707C52F5008F7077708DC008A11B3
:101F9000FF218A150F30CF050A304F020318D22FC8
:101FA0003030D42FD0135008CF074F08DC008A11EF
:0A1FB000FF218A158A110A16C12EBE
:1020000083162410A4107208F6007108F5007008F9
:10201000F40083126F08F30072088316A800710899
:10202000A7007008A60083126F088316A500AC01F4
:10203000AB01AA01A9010A128A1583129A250A1670
:102040008A11031C2928831624147408803AF4008A
:1020500083128316A801A701A6017F30A500760888
:10206000AC007508AB007408AA007308A9000A1236
:102070008A1583129A250A168A11031C6228A70161
:102080008B1BA7178B138316BE01BD01BC017F30CC
:10209000BB007608C2007508C1007408C000730850
:1020A000BF000A1283125E200A16A71B8B177A083C
:1020B000F6007908F5007808F4007708F300831635
:1020C000A41483120A308316AC008930AB0034307C
:1020D000AA007C30A9007608B0007508AF0074082B
:1020E000AE007308AD000A128A158312DC220A16AC
:1020F0008A1177088316A5007808A6007908A7003A
:102100007A08A800AC002708AB002608AA0025081A
:10211000A9007608B0007508AF007408AE00730817
:10212000AD000A128A158312DC220A168A1177087A
:102130008316A5007808A6007908A7007A08A800E9
:1021400083102808AC002708AB002608AA00250841
:10215000A9007C30B0007930AF003530AE0081305E
:10216000AD000A1283126C260A167A08FE0079085E
:10217000FD007808FC007708FB007E088316AC00A1
:102180007D08AB007C08AA007B08A9007608B00097
:102190007508AF007408AE007308AD000A128A1506
:1021A0008312DC220A168A1177088316A5007808A4
:1021B000A6007908A7007A08A800AC002708AB00A1
:1021C0002608AA002508A9007608B0007508AF0007
:1021D0007408AE007308AD000A128A158312DC225F
:1021E0000A168A1177088316A5007808A6007908D0
:1021F000A7007A08A80083102808AC002708AB00C5
:102200002608AA002508A9003F30B0000230AF0020
:102210003330AE008330AD000A1283126C260A16EA
:102220007A08FE007908FD007808FC007708FB00BA
:102230007E088316AC007D08AB007C08AA007B08F2
:10224000A9007608B0007508AF007408AE007308E6
:10225000AD000A128A158312DC220A168A11770849
:102260008316A5007808A6007908A7007A08A800B8
:10227000AC002708AB002608AA002508A9007608AC
:10228000B0007508AF007408AE007308AD000A1204
:102290008A158312DC220A168A1177088316A50094
:1022A0007808A6007908A7007A08A80083102808F3
:1022B000AC002708AB002608AA002508A900333087
:1022C000B0008C30AF001E30AE008330AD000A127B
:1022D00083126C260A167A08FE007908FD00780839
:1022E000FC007708FB008316AC01AB01AA017F302C
:1022F000A9007608B0007508AF007408AE00730836
:10230000AD000A128A158312DC220A168A11770898
:102310008316A5007808A6007908A7007A08A80007
:10232000AC002708AB002608AA002508A9007608FB
:10233000B0007508AF007408AE007308AD000A1253
:102340008A158312DC220A168A1177088316A500E3
:102350007808A6007908A7007A08A8008310280842
:10236000AC002708AB002608AA002508A9001B30EE
:10237000B000E430AF003530AE008230AD000A125C
:1023800083126C260A167A088316A3007908A20025
:102390007808A1007708A0002308AC002208AB0051
:1023A0002108AA002008A9007608B0007508AF002F
:1023B0007408AE007308AD000A128A158312DC227D
:1023C0000A168A1177088316A5007808A6007908EE
:1023D000A7007A08A800AC002708AB002608AA00CE
:1023E0002508A9007608B0007508AF007408AE0093
:1023F0007308AD000A128A158312DC220A168A11AC
:1024000077088316A5007808A6007908A7007A083F
:10241000A80083102808AC002708AB002608AA00F3
:102420002508A900A430B000DB30AF006730AE0053
:102430008330AD000A1283126C260A167A088316BE
:10244000A3007908A2007808A1007708A00023085B
:10245000AC002208AB002108AA002008A9007608D9
:10246000B0007508AF007408AE007308AD000A1222
:102470008A158312DC220A168A1177088316A500B2
:102480007808A6007908A7007A08A800AC002708F9
:10249000AB002608AA002508A9007608B000750838
:1024A000AF007408AE007308AD000A128A158312DB
:1024B000DC220A168A1177088316A5007808A60080
:1024C0007908A7007A08A80083102808AC0027081C
:1024D000AB002608AA002508A9003330B0008C30D4
:1024E000AF001E30AE008330AD000A1283126C269E
:1024F0000A167A088316A3007908A2007808A100BA
:102500007708A0007608AC007508AB007408AA0034
:102510007308A9007E08B0007D08AF007C08AE00FB
:102520007B08AD000A128A158312DC220A168A1172
:1025300077088316A5007808A6007908A7007A080E
:10254000A8008312A7018B1BA7178B1383162808DB
:10255000BE002708BD002608BC002508BB002308D4
:10256000C2002208C1002108C0002008BF000A12D2
:1025700083125E200A16A71B8B177A08FE007908C3
:10258000FD007808FC007708FB008316A41CE62AEF
:102590008314DB30AC000F30AB004930AA007F3031
:1025A000A9007E08B0007D08AF007C08AE007B0863
:1025B000AD000A1283126C260A167A08FE0079080A
:1025C000FD007808FC007708FB008316241CEB2A2A
:1025D0007C08803AFC007B08F7007C08F8007D0846
:1025E000F9007E08FA00831208000330DD000A12A9
:1025F0008A153A250A168A117808D9000430DD00B8
:102600000A128A153A250A168A117808DA0059083A
:10261000DD005A08DE000A12B2270A167908DC002B
:102620007808DB005B08F8005C08F9007908D00046
:102630007808CF000A30D9000A125E230A16073044
:10264000DD000A128A153A250A168A117808D9007F
:102650000830DD000A128A153A250A168A11780810
:10266000DA005908DD005A08DE000A12B2270A16FD
:102670007908DC007808DB005B08F8005C08F900EA
:102680007908D2007808D1005208DE005108DD0038
:102690000A12C3270A167708D9007808DA007908E1
:1026A000DB007A08DC005008DE004F08DD000A126B
:1026B000C3270A167708DD007808DE007908DF00F6
:1026C0007A08E0005C08E4005B08E3005A08E200D6
:1026D0005908E1006008E8005F08E7005E08E600CE
:1026E0005D08E5000A128A15DB2D0A168A117A08A0
:1026F000D8007908D7007808D6007708D500A70158
:102700008B1BA7178B1358088316BE00831257081C
:102710008316BD00831256088316BC008312550829
:102720008316BB00E930C2000F30C1004930C00041
:102730008030BF000A1283125E200A16A71B8B1777
:102740007708D9007808DA007908DB007A08DC001D
:102750008316AC0083125B088316AB0083125A0801
:102760008316AA00831259088316A900B001AF018D
:102770003430AE008630AD000A128A158312DC2296
:102780000A168A117A08D8007908D7007808D60086
:102790007708D500831058088316AC0083125708B9
:1027A0008316AB00831256088316AA0083125508BD
:1027B0008316A900B001AF013430AE008630AD0001
:1027C0000A1283126C260A167A08D8007908D700F4
:1027D0007808D6007708D5005508F7005608F800A5
:1027E0005708F9005808FA008A110A16532E0408EF
:1027F000D4005308D6000319222C52088316AC00CB
:10280000831251088316AB00831250088316AA0066
:1028100083124F088316A900B001AF012030AE002B
:102820008230AD000A128A158312DC220A168A1140
:102830007A08D2007908D1007808D0007708CF0054
:10284000D60BFD2B5208DF005108DE005008DD00DA
:102850004F08DC005C08B63CDC00FA015D08E000D3
:10286000DD170310DD0CDE0CDF0CFA0CF90CF80C94
:10287000F70CDC0B312CE01F482CF709F809F9099B
:10288000FA09F70A0319F80A0319F90A0319FA0AE7
:102890007A08D2007908D1007808D0007708CF00F4
:1028A000D21F5F2CD403D416CF09D009D109D20985
:1028B000CF0A0319D00A0319D10A0319D20A3B30EF
:1028C000DB009A30DA00CA30D900D8010A30D600CD
:1028D00053080319D40A5208DF005108DE005008DB
:1028E000DD004F08DC005B08E3005A08E2005908ED
:1028F000E1005808E0000A128A1574270A168A11A6
:102900000008CF00840A0008D000840A0008D10023
:10291000840A0008D200FD308407F708031DA32CA9
:10292000530A56020319A32C54080319A52C0F3976
:10293000560203199D2C0318DD2CD41BDD2C541BCF
:10294000A52C2030D72C2030D405D41EB52CD41281
:102950005308031DD4037708D4002D30DC000A127D
:10296000FF210A165408F700D40153085602031D2C
:10297000C52C7708D4002E30DC000A12FF210A167D
:102980005408F7002030D40500303030D41ED72C46
:10299000D4125308031DD4037708D4002D30DC0073
:1029A0000A12FF210A165408F700D4013030F70745
:1029B0007708DC000A12FF210A165B08DF005A08BC
:1029C000DE005908DD005808DC00E301E201E10106
:1029D0000A30E0000A128A1574270A168A117A084A
:1029E000DB007908DA007808D9007708D800D60B20
:1029F0006B2C080078084F08D1006430D2000A120E
:102A0000E8270A167708CF0078083030031D0F2D0D
:102A1000D01C182DD019182D501A2030122DD0117D
:102A200050125014F8077808DC000A12FF210A1629
:102A30004F08D1000A30D2000A12E8270A16770898
:102A4000CF0078083030031D2B2DD019312D501CAC
:102A5000312D501A2030F8077808DC000A12FF21C7
:102A60000A163030CF074F08DC000A12FF210A1681
:102A70008A110A16F12E840183131F3083057130E9
:102A800083168F000F088312A81328088316870067
:102A900083128717B001AF01AE01AD018316031792
:102AA0000908C039890003131F129F120030031751
:102AB00088008312870188018901FF300313A80071
:102AC000A901AA01831603170908C0398900031355
:102AD0001F129F12003003178800831203131F1365
:102AE0009F1383169F1383121F149412A812280891
:102AF00083168700831228162808831687008312FE
:102B0000A811280883168700013083129400003032
:102B1000831694000108C739283881000F308312CA
:102B200090000030F800920000308316920083126B
:102B300028152808831687008312970183169B01A6
:102B40009C0101309D0083120317870188018901D0
:102B5000831603130C1483128B160B16C0308B04D0
:102B600081018F018E01AC01AB01B1010A12B82ABB
:102B70000A160A12722B0A160A12242C0A16CA0105
:102B80004A08CF000A12A1240A16CE01CD01CC01B9
:102B9000CB010A12672D0A160230CF00FA30D90095
:102BA0000A125E230A16CF0BCE2D0A128A150028B0
:102BB0000A168A117A08B5007908B4007808B300BB
:102BC0007708B2000A128A158D280A168A117A0827
:102BD000B9007908B8007808B7007708B6000A127B
:102BE0008A1575290A168A110230CF00FA30D900E9
:102BF0000A125E230A16CF0BF62D0A128A15322A04
:102C00000A168A117A08BD007908BC007808BB0052
:102C10007708BA00CE08031D1C2ECD08031D1C2EFC
:102C20004C08273C031C1C2E031D1A2E4B080F3C7E
:102C3000031C1C2ECA01332E0430CA00CE08031D0B
:102C40002F2ECD08031D2F2E4C08263C0318332EA3
:102C5000FF3A031D2F2E4B08423C0318332ECE01A2
:102C6000CD01CC01CB010A128A15532B0A168A1109
:102C70007A08C1007908C0007808BF007708BE0054
:102C80000A128A15532C0A168A117A08C500790887
:102C9000C4007808C3007708C2004A08CF000A12AF
:102CA000A1240A16F52A7A08C9007908C80078080C
:102CB000C7007708C6002030DC000A12FF210A1680
:102CC000053084003508D2003408D1003308D00024
:102CD0003208CF000230D300F7232030DC000A1284
:102CE000FF210A16063084003D08D2003C08D100BE
:102CF0003B08D0003A08CF000230D300F723203041
:102D0000DC000A12FF210A16083084003908D200BC
:102D10003808D1003708D0003608CF000230D30081
:102D2000F7232030DC000A12FF210A160530840048
:102D30004108D2004008D1003F08D0003E08CF0033
:102D40000230D300F7232030DC000A12FF210A16DC
:102D5000053084004508D2004408D1004308D00063
:102D60004208CF000230D300F7232030DC000A12E3
:102D7000FF210A164A08CF003730D0000A128A1500
:102D8000B62F0A168A112030DC000A12FF210A161B
:102D9000043084004908D2004808D1004708D00018
:102DA0004608CF000230D300F7232030DC000A129F
:102DB000FF210A16053084003008D2002F08D10008
:102DC0002E08D0002D08CF000130D300F72320308B
:102DD000DC000A12FF210A163108CF001B30D00098
:102DE000FA2C2030DC000A12FF210A160A30DC001F
:102DF0000A12FF210A160D30DC000A12FF210A1602
:102E00000430CF00FA30D9000A125E230A16CF0B25
:102E1000022FB1010130CB070318CC0A0319CD0AE8
:082E20000319CE0AC52D630061
:1008D0008316870000008312871D6C2C07122812D4
:1008E000280883168700000083128711A8112808A2
:1008F0008316870080308312E7000723E630E70085
:1009000007235608E70007232812280883168700C4
:1009100000008312A8152808831687008312871DFC
:100920008F2C0000932C00002816280883168700BF
:1009300000000A308312DA000724281628088316DC
:10094000870000008312A81528088316870000007E
:1009500083120712281228088316870000008312CA
:100960008711A81128088316870080308312E700BA
:100970000723E730E7000723281628088316870097
:1009800000008312A8152808831687000000831230
:10099000871DC82C0712281228088316870000001C
:1009A00083128711A81128088316870081308312CB
:1009B000E7000723F701C2237808D6005608F8009D
:1009C0000800281628088316870000008312A8153F
:1009D00028088316870000008312071228122808AF
:1009E00083168700000083128711A8112808831638
:1009F0008700C0308312E70007232630E700072373
:100A0000B830E70007232812280883168700000063
:100A10008312A8152808831687008312871D0E2DC0
:100A20000000122D000028162808831687000000F9
:100A30008312281628088316870000008312A81541
:100A4000280883168700000083120712281228083E
:100A500083168700000083128711A81128088316C7
:100A60008700C0308312E70007231330E700072315
:100A70000730E700072328122808831687000000A4
:100A80008312A8152808831687008312871D462D18
:100A900000004A2D00002816280883168700000051
:100AA0008312281628088316870000008312A815D1
:100AB00028088316870000008312071228122808CE
:100AC00083168700000083128711A8112808831657
:100AD0008700C0308312E70007232630E700072392
:100AE0003930E70007232812280883168700000002
:100AF0008312A8152808831687008312871D7E2D70
:100B00000000822D000028162808831687000000A8
:100B100083128A110A16DC2C2816280883168700EF
:100B200000008312A815280883168700000083128E
:100B300007122812280883168700000083128711E5
:100B4000A811280883168700C0308312E700072306
:100B50006508E70007232816280883168700000089
:100B60008312A81528088316870000008312871DAA
:100B7000B72D071228122808831687000000831259
:100B80008711A811280883168700C1308312E70057
:100B90000723F701C2237808E600281228088316E5
:100BA000870000008312A815280883168700831287
:100BB000871DD82D0000DC2D00002816280883167C
:100BC0008700000083126608F80008008030831C4C
:100BD000EC2D8316AE0683128316B301B4012A08E6
:100BE000B2002E08B20629080319DA2EB100F70068
:100BF0002D080319E32EB10203197F2E031C3D2E8D
:100C00002E08B700B7172F08B6003008B500B4019A
:100C10000310B70CB60CB50CB40CB10B072EB21FF9
:100C2000142E3314F72E331031103316AC308400E9
:100C300083130C2F3312B21B272E311C322EB70C0C
:100C4000B60CB50CB40CF70A0319F22E322EB71BF2
:100C5000352E0310B40DB50DB60DB70DF7030319FE
:100C6000F22E272E33179F2E33132A08B200B21FFD
:100C70003B2EB717EB2EB713EB2E2D08B100F70064
:100C80002908B1022A08B700B7172B08B6002C08AC
:100C9000B500B4010310B70CB60CB50CB40CB10B15
:100CA000492EB21F562EB314F72EB3103110B316BF
:100CB000B030840083130C2FB312B21B692E311C89
:100CC000742EB70CB60CB50CB40CF70A0319F22E3F
:100CD000742EB71B772E0310B40DB50DB60DB70DDE
:100CE000F7030319F22E692EB3179F2EB3132E08A4
:100CF000B200B21F7D2EB717EB2EB713EB2E2E08C6
:100D0000B700B7172F08B6003008B500B21F8C2EF9
:100D1000B7133315F72E3311B4013110AC30840002
:100D200083130C2FB21BB52E2A08B200311C9F2E44
:100D3000B70CB60CB50CB40CF70A0319F22EB41F9D
:100D4000B02EB50A031DB02EB60A031DB02EB70A89
:100D5000031DB02EB70CB60CB50CF70A0319F22E12
:100D6000331B342EB31B762ED42E8030B706B71F1C
:100D7000BD2EF72E2E08B200CA2E2A08B200B708E0
:100D8000031DCA2EB608031DCA2EB508031DCA2EA0
:100D9000F701EB2EB71BD42E0310B40DB50DB60D15
:100DA000B70DF70BCA2EF22EB21FD82EB717EB2EA7
:100DB000B713EB2E2D08F7002E08B7002F08B6004A
:100DC0003008B500EB2E2908F7002A08B7002B08D9
:100DD000B6002C08B5003708F8003608F9003508C9
:100DE000FA002A2FF701F801F901FA012A2FB401BC
:100DF000B509B609B709B409B40A031D052FB50A28
:100E0000031D052FB60A0319B70A3318132EB3189A
:100E1000552E33198B2EBA2E0008B507031C162F3A
:100E2000B60A031D162FB70A0319311484030008EC
:100E3000B607031C1E2FB70A0319311484030008D8
:100E4000801F803AB70703183114331A1A2EB31AC9
:100E50005C2E922E831208000430E5008C25780861
:100E6000D5000530E5008C25780EF7000F30F7052A
:100E70007708A7018B1BA7178B138316BC01BB0038
:100E800083124B20A71B8B177708DE007808DF0042
:100E90007908E0007A08E100A7018B1BA7178B13E4
:100EA0007A088316BE00831279088316BD00831268
:100EB00078088316BC00831277088316BB00C20132
:100EC000C101C0018330BF0083126A20A71B8B17AA
:100ED0007A08D9007908D8007808D7007708D600B2
:100EE000A7018B1BA7178B138316BC018312550810
:100EF0008316BB0083124B20A71B8B1783107A0825
:100F00008316AC007908AB007808AA007708A9001E
:100F1000831259088316B000831258088316AF0055
:100F2000831257088316AE00831256088316AD004D
:100F30008312E6257A08DD007908DC007808DB00FA
:100F40007708DA005A08F7005B08F8005C08F90037
:100F50005D08FA008A110A16E82C8E30F7005E0848
:100F6000F8005D08F900FA01DE1FBB2FF809F90946
:100F7000F90A0319F80AF808031DC82F7908F800C0
:100F8000F9010830F702F808031DC82FF701D12F27
:100F90000310F81BCF2FF90DF80DF703C82FDE1F34
:100FA000F8130800D61BE52F0F30F700550EF70594
:100FB0000A3077020318DF2F3030F707E12F560889
:100FC000F70777080C1EE22F99000F30D5050A307D
:100FD00055020318ED2F3030EF2FD6135608D507E2
:0E0FE00055080C1EF12F99008A110A16C92D12
:101000000130E5008A118C258A15D801D701D60157
:101010007808D5000230E5008A118C258A15DA019E
:101020007808D9000330E5008A118C258A157808E4
:10103000DB005B0DDC00DC0DFC30DC055B0EF7003B
:10104000F70CF70C0330F7057708A7018B1BA717E0
:101050008B138316BC01BB008A1183124B208A15A7
:10106000A71B8B177708E6007808E7007908E800E7
:101070007A08E900A7018B1BA7178B136908831651
:10108000BE00831268088316BD00831267088316AA
:10109000BC00831266088316BB00C201C101C001F7
:1010A0008130BF008A1183126A208A15A71B8B1713
:1010B0007A08E4007908E3007808E2007708E100A4
:1010C000E601550DE700560DE800570DE900E70D64
:1010D000E80DE90DFC30E705590DF9005A0DFA004D
:1010E000F90DFA0DFC30F9057908E6047A08E704F1
:1010F0005B0EF700F70CF70C0330F7057708660472
:10110000F7006708F8006808F9006908FA007A082B
:10111000EF007908EE007808ED007708EC00B630B3
:10112000F700FA01F901F8016C086D046E046F0410
:10113000031D9C28F701A9280310F81BA828EC0D13
:10114000ED0DEE0DEF0DFA0DF90DF80DF70B9C28D6
:10115000F8137708E6007808E7007908E8007A08CD
:10116000E900831069088316AC00831268088316AF
:10117000AB00831267088316AA00831266088316E1
:10118000A900831264088316B000831263088316D3
:10119000AF00831262088316AE00831261088316C3
:1011A000AD008A118312E6258A157A08E0007908D5
:1011B000DF007808DE007708DD005D08F7005E08D4
:1011C000F8005F08F9006008FA008A110A16F42C8A
:1011D000281628088316870000008312A8152808FF
:1011E000831687000000831207122812280883162E
:1011F0008700000083128711A81128088316870032
:10120000C0308312E7008A1107238A152630E700D1
:101210008A1107238A15B830E7008A1107238A1537
:10122000281228088316870000008312A8152808B2
:10123000831687008312871D1B2900001F290000C9
:10124000281628088316870000008312281628080D
:101250008316870000008312A815280883168700CC
:101260000000831207122812280883168700000046
:1012700083128711A811280883168700C0308312B3
:10128000E7008A1107238A151330E7008A11072324
:101290008A150730E7008A1107238A1528122808C3
:1012A0008316870000008312A8152808831687007C
:1012B0008312871D592900005D290000281628087F
:1012C00083168700000083122816280883168700DB
:1012D00000008312A81528088316870000008312D7
:1012E000071228122808831687000000831287112E
:1012F000A811280883168700C0308312E7008A11DE
:1013000007238A152630E7008A1107238A15B9308A
:10131000E7008A1107238A152812280883168700F8
:1013200000008312A8152808831687008312871DE2
:10133000972900009B29000028162808831687009B
:10134000000083128A110A16012D0130E5008A116E
:101350008C258A15D6017808D5000230E5008A115F
:101360008C258A157808D7000330E5008A118C2572
:101370008A15780EF7000F30F7057708A7018B1B49
:10138000A7178B138316BC01BB008A1183124B2055
:101390008A15A71B8B177708E0007808E100790809
:1013A000E2007A08E300A7018B1BA7178B137A08CA
:1013B0008316BE00831279088316BD008312780855
:1013C0008316BC00831277088316BB00C201C101DB
:1013D000C0018330BF008A1183126A208A15A71BBF
:1013E0008B177A08DB007908DA007808D9007708CB
:1013F000D8005508E200E10161085704F7005508DC
:10140000FA007708A7018B1BA7178B138316BB0065
:101410007A08BC008A1183124B208A15A71B8B17F0
:101420007708E1007808E2007908E3007A08E40030
:1014300083107A088316AC00831279088316AB00F8
:10144000831278088316AA00831277088316A900EE
:1014500083125B088316B00083125A088316AF000C
:10146000831259088316AE00831258088316AD0004
:101470008A118312E6258A157A08DF007908DE00D2
:101480007808DD007708DC005C08F7005D08F800EC
:101490005E08F9005F08FA008A110A160F2D8316FC
:1014A00029080319C02AB1002D080319C02AB10761
:1014B0000318612A7F30B102031CC02A0319C02A15
:1014C000652A8130B1070318C02A3108F700F801F6
:1014D000F901FA012A08B500B5172B08B4002C0849
:1014E000B3001830B100B201331C8E2A3008FA075D
:1014F000031C802AF90A031D802AF80A0319B2176F
:101500002F08F907031C872AF80A0319B2172E08B7
:10151000AB00AB172B08F8070318B217B20DF80C85
:10152000F90CFA0CB50CB40CB30C0310B10B732A04
:101530000130F7070318C02AF81BA52AB50DFA0DCC
:10154000F90DF80DF7030319C02AB51FB62AFA0AD8
:10155000031DB62AF90A031DB62AF80A031DB62A86
:10156000F80CF90CFA0CF70A0319C02A2A08B20081
:101570002E08B206B21FBE2AF817C42AF813C42ACE
:10158000F701F801F901FA0183120800281628086A
:101590008316870000008312A81528088316870089
:1015A00000008312871DD22A0712281228088316EA
:1015B0008700000083128711A8112808831687006E
:1015C00080308312E7008A1107238A15E330E70091
:1015D0008A1107238A15281228088316870000001D
:1015E0008312A8152808831687008312871DF62A00
:1015F0000000FA2A00002816280883168700000039
:1016000064308312DA008A1107248A152816280804
:101610008316870000008312A81528088316870008
:101620000000831207122812280883168700000082
:1016300083128711A811280883168700813083122E
:10164000E7008A1107238A150130F7008A11C223A7
:101650008A157808D5000130F7008A11C2238A154F
:101660007808D600F7018A11C2238A157808D700B6
:10167000281228088316870000008312A81528085E
:10168000831687008312871D432B0000472B000021
:10169000281628088316870000008312D60CD60C63
:1016A0003F30D605DB015508DA00DB00DA01560EC3
:1016B000F700F030F70577085A07D8005B08D90023
:1016C0000318D90AA7018B1BA7178B135908831678
:1016D000BC00831258088316BB008A1183124B206A
:1016E0008A15A71B8B177708DA007808DB007908C2
:1016F000DC007A08DD00A7018B1BA7178B137A0883
:101700008316BE00831279088316BD008312780801
:101710008316BC00831277088316BB00C201FF301A
:10172000C1007F30C0008E30BF008A1183126A2052
:101730008A15A71B8B1752308316AC00B830AB004C
:101740002F30AA008630A9007A08B0007908AF00CF
:101750007808AE007708AD0083124F228310663000
:101760008316AC00AB00BB30AA008430A9007A0815
:10177000B0007908AF007808AE007708AD008A1194
:101780008312E6258A158A110A16452D281628087F
:101790008316870000008312A81528088316870087
:1017A0000000831207122812280883168700000001
:1017B00083128711A81128088316870080308312AE
:1017C000E7008A1107238A15E530E7008A1107230D
:1017D0008A156430DA008A1107248A152816280829
:1017E0008316870000008312A81528088316870037
:1017F00000008312871DFA2B07122812280883166F
:101800008700000083128711A8112808831687001B
:1018100081308312E7008A1107238A150130F7000F
:101820008A11C2238A157808D5000130F7008A1181
:10183000C2238A157808D600F7018A11C2238A15B7
:101840007808D70028122808831687000000831222
:10185000A8152808831687008312871D2D2C0000E9
:10186000312C0000281628088316870000008312F8
:10187000D60CD60C3F30D605DB015508DA00DB006C
:10188000DA01560EF700F030F70577085A07D8004E
:101890005B08D9000318D90AA7018B1BA7178B1364
:1018A00059088316BC00831258088316BB008A119E
:1018B00083124B208A15A71B8B177708DA0078084C
:1018C000DB007908DC007A08DD00A7018B1BA71775
:1018D0008B137A088316BE00831279088316BD0025
:1018E000831278088316BC00831277088316BB0026
:1018F000C201FF30C1007F30C0008E30BF008A11AE
:1019000083126A208A15A71B8B178316AC01AB01C3
:101910007A30AA008530A9007A08B0007908AF00B3
:101920007808AE007708AD0083124F22831083162B
:10193000AC01AB01C030AA008130A9007A08B00028
:101940007908AF007808AE007708AD008A118312DD
:10195000E6258A158A110A16522D83162608AD002F
:101960002A08AD06AD1FB92C03110310A61B0314E2
:10197000EC2C2608AD002908AE002508AE0203199C
:10198000C72CAD1FEC2C0308013A8300EC2C2A086D
:10199000AE002608AE020319D32CAD1FEC2C0308B1
:1019A000013A8300EC2C2B08AE002708AE02031985
:1019B000DF2CAD1FEC2C0308013A8300EC2C2C0823
:1019C000AE002808AE020319EB2CAD1FEC2C030867
:1019D000013A8300EC2C03108312080083162410B4
:1019E000A4107208F6007108F5007008F400831264
:1019F0006F08F30072088316A8007108A70070082A
:101A0000A60083126F088316A500AC01AB01AA01E2
:101A1000A9018312AD24031C132D8316241474080A
:101A2000803AF40083128316A801A701A6017F3033
:101A3000A5007608AC007508AB007408AA0073080E
:101A4000A9008312AD24031C482DA7018B1BA717E7
:101A50008B138316BE01BD01BC017F30BB0076082D
:101A6000C2007508C1007408C0007308BF008A1165
:101A700083126A208A15A71B8B177A08F60079084B
:101A8000F5007808F4007708F3008316A414831295
:101A90000A308316AC008930AB003430AA007C30A9
:101AA000A9007608B0007508AF007408AE0073088E
:101AB000AD0083124F2277088316A5007808A60090
:101AC0007908A7007A08A800AC002708AB00260810
:101AD000AA002508A9007608B0007508AF007408B0
:101AE000AE007308AD0083124F2277088316A5005D
:101AF0007808A6007908A7007A08A80083102808AB
:101B0000AC002708AB002608AA002508A9007C30F5
:101B1000B0007930AF003530AE008130AD008A11B1
:101B20008312E6258A157A08FE007908FD007808F8
:101B3000FC007708FB007E088316AC007D08AB0034
:101B40007C08AA007B08A9007608B0007508AF00E1
:101B50007408AE007308AD0083124F227708831615
:101B6000A5007808A6007908A7007A08A800AC00AC
:101B70002708AB002608AA002508A9007608B000AF
:101B80007508AF007408AE007308AD0083124F22D1
:101B900077088316A5007808A6007908A7007A08B8
:101BA000A80083102808AC002708AB002608AA006C
:101BB0002508A9003F30B0000230AF003330AE003E
:101BC0008330AD008A118312E6258A157A08FE005B
:101BD0007908FD007808FC007708FB007E08831672
:101BE000AC007D08AB007C08AA007B08A900760841
:101BF000B0007508AF007408AE007308AD00831222
:101C00004F2277088316A5007808A6007908A70058
:101C10007A08A800AC002708AB002608AA0025080F
:101C2000A9007608B0007508AF007408AE0073080C
:101C3000AD0083124F2277088316A5007808A6000E
:101C40007908A7007A08A80083102808AC002708A4
:101C5000AB002608AA002508A9003330B0008C305C
:101C6000AF001E30AE008330AD008A118312E6252E
:101C70008A157A08FE007908FD007808FC007708CC
:101C8000FB008316AC01AB01AA017F30A9007608E6
:101C9000B0007508AF007408AE007308AD00831281
:101CA0004F2277088316A5007808A6007908A700B8
:101CB0007A08A800AC002708AB002608AA0025086F
:101CC000A9007608B0007508AF007408AE0073086C
:101CD000AD0083124F2277088316A5007808A6006E
:101CE0007908A7007A08A80083102808AC00270804
:101CF000AB002608AA002508A9001B30B000E4307C
:101D0000AF003530AE008230AD008A118312E62577
:101D10008A157A088316A3007908A2007808A10022
:101D20007708A0002308AC002208AB002108AA0015
:101D30002008A9007608B0007508AF007408AE004E
:101D40007308AD0083124F2277088316A500780828
:101D5000A6007908A7007A08A800AC002708AB0005
:101D60002608AA002508A9007608B0007508AF006B
:101D70007408AE007308AD0083124F2277088316F3
:101D8000A5007808A6007908A7007A08A8008310A3
:101D90002808AC002708AB002608AA002508A900DF
:101DA000A430B000DB30AF006730AE008330AD0050
:101DB0008A118312E6258A157A088316A30079080A
:101DC000A2007808A1007708A0002308AC00220830
:101DD000AB002108AA002008A9007608B000750809
:101DE000AF007408AE007308AD0083124F2277086D
:101DF0008316A5007808A6007908A7007A08A8002D
:101E0000AC002708AB002608AA002508A900760820
:101E1000B0007508AF007408AE007308AD008312FF
:101E20004F2277088316A5007808A6007908A70036
:101E30007A08A80083102808AC002708AB00260801
:101E4000AA002508A9003330B0008C30AF001E3046
:101E5000AE008330AD008A118312E6258A157A0818
:101E60008316A3007908A2007808A1007708A000D3
:101E70007608AC007508AB007408AA007308A900C6
:101E80007E08B0007D08AF007C08AE007B08AD0086
:101E900083124F2277088316A5007808A6007908D8
:101EA000A7007A08A8008312A7018B1BA7178B1322
:101EB00083162808BE002708BD002608BC00250898
:101EC000BB002308C2002208C1002108C00020086E
:101ED000BF008A1183126A208A15A71B8B177A0804
:101EE000FE007908FD007808FC007708FB008316E7
:101EF000A41C982F8314DB30AC000F30AB004930AA
:101F0000AA007F30A9007E08B0007D08AF007C08E1
:101F1000AE007B08AD008A118312E6258A157A0887
:101F2000FE007908FD007808FC007708FB008316A6
:101F3000241C9D2F7C08803AFC007B08F7007C085D
:101F4000F8007D08F9007E08FA0083120800F70106
:101F5000F801F901FA01EA01EB01EC01ED01690870
:101F60006804670466040319E52F2030EE000310AF
:101F7000E20DE30DE40DE50DEA0DEB0DEC0DED0DBD
:101F800069086D02031DCE2F68086C02031DCE2F59
:101F900067086B02031DCE2F66086A02031CDF2F41
:101FA0006608EA026708031C670FEB026808031C57
:101FB000680FEC026908031C690FED020314F70DAA
:101FC000F80DF90DFA0DEE0BB72F6A30840083136C
:101FD00008005808F80157020318F12F5708F700B6
:101FE000FD2FF7010830D900D70DF70D58087702FB
:0C1FF0000318F700F80DD90BF42F0800BF
:102000006D10EE0164088316A8008312630883161E
:10201000A700831262088316A60083126108831644
:10202000A500AC01AB01AA01A9010A128A1583120D
:10203000AD240A168A1103181F28031D40286808BA
:102040008316A800831267088316A7008312660808
:102050008316A600831265088316A500AC01AB01A8
:10206000AA01A9010A128A158312AD240A168A113F
:1020700003183C28031D3E2803303F2804305E2807
:1020800068088316A800831267088316A7008312C6
:1020900066088316A600831265088316A500AC01A6
:1020A000AB01AA01A9010A128A158312AD240A16EE
:1020B0008A11031C5D2802305E280130EE0064089E
:1020C0008316A800831263088316A7008312620890
:1020D0008316A600831261088316A500AC01AB012C
:1020E000AA01A9010A128A158312AD240A168A11BF
:1020F000031C7E286D146208803AE200680883168B
:10210000A800831267088316A70083126608831647
:10211000A600831265088316A500AC01AB01AA01D5
:10212000A9010A128A158312AD240A168A11031C0A
:102130009C286608803AE60068088316A800831287
:1021400067088316A700831266088316A600831209
:1021500065088316A500AC01AB01AA01A9010A120A
:102160008A158312AD240A168A11031DE828640813
:102170008316A800831263088316A70083126208DF
:102180008316A600831261088316A500AC01AB017B
:10219000AA01A9010A128A158312AD240A168A110E
:1021A0000319E7286D1CDE287F30F700C930F800DE
:1021B0000F30F900DB30FA00AA29E7287F30F7005A
:1021C0004930F8000F30F900DB30FA00AA29AA29BB
:1021D000A7018B1BA7178B1364088316BE008312FD
:1021E00063088316BD00831262088316BC00831245
:1021F00061088316BB00831268088316C20083122D
:1022000067088316C100831266088316C000831214
:1022100065088316BF000A1283126A200A16A71BDC
:102220008B177A08EC007908EB007808EA00770849
:10223000E90001306E02FC3E0318AA29043EAD29D4
:102240006C08F2006B08F1006A08F0006908EF0002
:102250000A128A15EE240A168A11AA29AA296C08DC
:10226000F2006B08F1006A08F0006908EF000A123A
:102270008A15EE240A168A11F0010408EF00701086
:10228000831B70148314DB308316AC000F30AB005B
:102290004930AA008030A9007A08B0007908AF0060
:1022A0007808AE007708AD000A128312E6250A16F8
:1022B0006F088400831370188317AA29AA296C0851
:1022C000F2006B08F1006A08F0006908EF000A12DA
:1022D0008A15EE240A168A117708EF007808F000B4
:1022E0007908F1007A08F200F4010408F300741090
:1022F000831B7414831472088316AC007108AB003E
:102300007008AA0083126F088316A900DB30B000A2
:102310000F30AF004930AE008030AD000A1283129A
:10232000E6250A1673088400831374188317AA29F4
:10233000AA296C08F2006B08F1006A08F00069082D
:10234000EF000A128A15EE240A168A118030F80668
:10235000AA29AA298A110A16722A0A148A100A11AD
:10236000820720292F295F299929281628088316F2
:10237000870000008312A815280883168700000034
:102380008312071228122808831687000000831280
:102390008711A8112808831687003C308312E700B4
:1023A0000A1207230A160330E7000A1207230A1647
:1023B000281628088316870000008312A81528080D
:1023C0008316870000008312871DE4290712281254
:1023D000280883168700000083128711A811280897
:1023E000831687003D308312E7000A1207230A167E
:1023F0000130F7000A12C2230A167808DA00013009
:10240000F7000A12C2230A167808D9000130F70033
:102410000A12C2230A167808DE000130F7000A12F9
:10242000C2230A167808DD000130F7000A12C22321
:102430000A167808DC00F7010A12C2230A16780887
:10244000DB00281228088316870000008312A815D5
:102450002808831687008312871D2C2A0000302A43
:1024600000002816280883168700000083125A08E7
:10247000AC005908AB005C08AE005B08AD005E081C
:10248000B0005D08AF002E08DE002D08DD000A1246
:10249000AD270A167708D9007808DA007908DB003A
:1024A0007A08DC002C08DE002B08DD000A12AD27BC
:1024B0000A167708DD007808DE007908DF007A0860
:1024C000E0005C08E4005B08E3005A08E2005908F9
:1024D000E1007A08E8007908E7007808E600770864
:1024E000E50000287A08D8007908D7007808D600D7
:1024F0007708D500A7018B1BA7178B1358088316E5
:10250000BE00831257088316BD0083125608831637
:10251000BC00831255088316BB00E930C2000F309F
:10252000C1004930C0008030BF000A1283126A2007
:102530000A16A71B8B177708D9007808DA007908E4
:10254000DB007A08DC008316AC008312790883165E
:10255000AB00831278088316AA00831277088316CB
:10256000A900B001AF013430AE008630AD000A12D0
:102570008A1583124F220A168A117A08D800790820
:10258000D7007808D6007708D5008310580883163E
:10259000AC00831257088316AB00831256088316CB
:1025A000AA00831255088316A900B001AF01343088
:1025B000AE008630AD000A128312E6250A167A08AC
:1025C000D8007908D7007808D6007708D5005508D4
:1025D000F7005608F8005708F9005808FA008A1161
:1025E0000A16622D0408DA005908DC0003191D2BB5
:1025F00058088316AC00831257088316AB00831269
:1026000056088316AA00831255088316A900B00144
:10261000AF012030AE008230AD000A128A1583125D
:102620004F220A168A117A08D8007908D70078084C
:10263000D6007708D500DC0BF82A5808E5005708C3
:10264000E4005608E3005508E2006208B63CE200E8
:10265000FA016308E600E3170310E30CE40CE50C51
:10266000FA0CF90CF80CF70CE20B2C2BE61F432BA1
:10267000F709F809F909FA09F70A0319F80A031919
:10268000F90A0319FA0A7A08D8007908D7007808F5
:10269000D6007708D500D81F5A2BDA03DA16D509E9
:1026A000D609D709D809D50A0319D60A0319D70AB2
:1026B0000319D80A3B30E1009A30E000CA30DF004D
:1026C000DE010A30DC0059080319DA0A5808E5006F
:1026D0005708E4005608E3005508E2006108E900E5
:1026E0006008E8005F08E7005E08E6000A128A1545
:1026F000A7270A168A110008D500840A0008D60008
:10270000840A0008D700840A0008D800FD30840736
:10271000F708031D9E2B590A5C0203199E2B5A08C9
:102720000319A02B0F395C020319982B0318D42B23
:10273000DA1BD42B5A1BA02B2030CF2B2030DA05EC
:10274000DA1EAF2BDA125908031DDA037708DA0014
:102750002D300C1EA92B99005A08F700DA015908F0
:102760005C02031DBE2B7708DA002E300C1EB62B40
:1027700099005A08F7002030DA0500303030DA1EB0
:10278000CF2BDA125908031DDA037708DA002D304F
:102790000C1EC82B99005A08F700DA013030F707F1
:1027A00077080C1ED12B99006108E5006008E40051
:1027B0005F08E3005E08E200E901E801E7010A3092
:1027C000E6000A128A15A7270A168A117A08E1007C
:1027D0007908E0007808DF007708DE00DC0B662B64
:1027E000080078085508D7006430D8000A128A1506
:1027F000E9270A168A117708D50078083030031DBA
:10280000082CD61C102CD619102C561A20300B2C44
:10281000D61156125614F80778080C1E0D2C990084
:102820005508D7000A30D8000A128A15E9270A1677
:102830008A117708D50078083030031D252CD61969
:102840002A2C561C2A2C561A2030F80778080C1E01
:10285000272C99003030D50755080C1E2D2C9900D7
:102860008A110A16F52D840183131F3083057130F8
:1028700083168F000F08031787110C30031399007C
:10288000A6309800903083129800B601B501B401CB
:10289000B301831603170908C039890003131F12F7
:1028A0009F12003003178800831287018801890175
:1028B000FF300313A800A901AA01AB01AC01AD01CF
:1028C000AE01AF01B001831603170908C0398900B2
:1028D00003131F129F120030031788008312031383
:1028E0001F139F1383169F1383121F149412A81291
:1028F0002808831687008312281628088316870065
:102900008312A811280883168700013083129400CF
:102910000030831694000108C739283881000F3031
:10292000831290000030F80092000030831692006D
:1029300083122815280883168700831297018316AF
:102940009B019C0101309D008312031787018801C0
:102950008901831603130C1483128B160B16C030D7
:102960008B0481018F018E01B201B101B7010A12FE
:10297000A42A0A16D5011830D6000A1251230A16C5
:102980000130D500E030D6000A1251230A16023079
:10299000D500D6010A1251230A160A128A2B0A16EA
:1029A000D0015008D5000A121B240A16D401D30105
:1029B000D201D1010A12E12C0A160230D500FA30F8
:1029C000DA000A1207240A16D50BDF2C0A122C2F64
:1029D0000A167A08BB007908BA007808B9007708A7
:1029E000B8000A128A1500280A168A117A08BF0050
:1029F0007908BE007808BD007708BC000A128A1565
:102A0000E8280A168A110230D500FA30DA000A12D4
:102A100007240A16D50B052D0A128A15A5290A16B0
:102A20008A117A08C3007908C2007808C1007708C3
:102A3000C000D408031D2B2DD308031D2B2D5208D5
:102A4000273C031C2B2D031D292D51080F3C031C73
:102A50002B2DD001422D0430D000D408031D3E2D73
:102A6000D308031D3E2D5208263C0318422DFF3A81
:102A7000031D3E2D5108423C0318422DD401D301C1
:102A8000D201D1010A128A15C62A0A168A117A08B9
:102A9000C7007908C6007808C5007708C4000A1284
:102AA0008A15C62B0A168A117A08CB007908CA0043
:102AB0007808C9007708C8005008D5000A121B24FE
:102AC0000A16B5297A08CF007908CE007808CD001B
:102AD0007708CC0020300C1E6B2D99000530840047
:102AE0003B08D8003A08D7003908D6003808D50086
:102AF0000230D900F22220300C1E7C2D99000630C5
:102B000084004308D8004208D7004108D600400896
:102B1000D5000230D900F22220300C1E8D2D9900F4
:102B2000083084003F08D8003E08D7003D08D60092
:102B30003C08D5000230D900F22220300C1E9E2D18
:102B40009900053084004708D8004608D70045089A
:102B5000D6004408D5000230D900F22220300C1EE5
:102B6000AF2D9900053084004B08D8004A08D700E3
:102B70004908D6004808D5000230D900F22220309A
:102B80000C1EC02D99005008D5003730D6000A120F
:102B9000D22F0A1620300C1ECB2D99000430840051
:102BA0004F08D8004E08D7004D08D6004C08D50075
:102BB0000230D900F22220300C1EDC2D99000530A5
:102BC00084003608D8003508D7003408D60033080A
:102BD000D5000130D900F22220300C1EED2D9900D5
:102BE0003708D5001B30D600F12B20300C1EF62DF7
:102BF00099000A300C1EFA2D99000D300C1EFE2D86
:102C000099000430D500FA30DA000A1207240A16B7
:102C1000D50B032EB7010130D1070318D20A0319CF
:0A2C2000D30A0319D40AD62C63006E
:0639C0008A010028080046
:1000080000000000000000000000000000000000E8
:080018000000000000000000E0
:04400E00F52CFF3F4F
:00000001FF
;PIC16F887
;CRC=3D90 CREATED="17-V-13 01:42"
;CRC=16C4 CREATED="17-V-13 13:02"
/Designs/Measuring_instruments/AWS01B/SW/PIC16F887/main.pjt
29,7 → 29,7
11=MPL3115.c
12=HMC5883L.h
13=HMC5883L.c
14=
14=common\dbloader.h
15=
[Target Data]
OptionString=-p +FM
/Modules/Sensors/MAG01A/SW/PIC16F887/HMC5883L.c
1,13 → 1,3
// i2c slave addresses
#define HMC5883L_WRT_ADDR 0x3C
#define HMC5883L_READ_ADDR 0x3D
 
// Register addresses
#define HMC5883L_CFG_A_REG 0x00
#define HMC5883L_CFG_B_REG 0x01
#define HMC5883L_MODE_REG 0x02
#define HMC5883L_X_MSB_REG 0x03
 
//------------------------------
// Low level routines
//------------------------------
/Modules/Sensors/MAG01A/SW/PIC16F887/HMC5883L.h
1,6 → 1,12
#define MAG_ADDR_R 0x3D //addresa pro cteni
#define MAG_ADDR_W 0x3C
// i2c slave addresses
#define HMC5883L_WRT_ADDR 0x3C
#define HMC5883L_READ_ADDR 0x3D
 
// Register addresses
#define HMC5883L_CFG_A_REG 0x00
#define HMC5883L_CFG_B_REG 0x01
#define HMC5883L_MODE_REG 0x02
#define HMC5883L_X_MSB_REG 0x03
 
//Konstanty nastavujici rozsah
//pro void set_mag_roz (unsigned int8 h)
/Modules/Sensors/MAG01A/SW/PIC16F887/main.c
8,7 → 8,6
unsigned int16 anemo_round=0;
unsigned int16 i;
 
 
//signed int16 X,Y,Z;
setup_adc_ports(NO_ANALOGS|VSS_VDD);
setup_adc(ADC_CLOCK_DIV_2);
19,6 → 18,11
setup_ccp1(CCP_OFF);
setup_comparator(NC_NC_NC_NC);// This device COMP currently not supported by the PICWizard
 
printf("Magnetometr: \r\n",);
printf("(c)mlab JACHO 2013: \r\n",);
printf("X, Y, Z \r\n",);
 
 
// Init the HMC5883L. Set Mode register for
// continuous measurements.
hmc5883l_write_reg(HMC5883L_CFG_A_REG, 0x18); // no average, maximal update range
29,40 → 33,12
// Wait at least 67 ms between reads, re the HMC5883L data sheet.
 
 
printf("Magnetometr: \r\n",);
printf("(c)mlab JACHO 2013: \r\n",);
printf("X, Y, Z \r\n",);
 
/* while(true)
{
X = mag_readX();
Y = mag_readY();
Z = mag_readZ();
printf("%4Ld %4Ld %4Ld \r\n", X, Y, Z);
Delay_ms(50);
}
*/
 
while(TRUE)
{
 
// for(i=0;i<=10;i++)
// {
hmc5883l_read_data();
// b = atan2((float)compass.y,(float)compass.x); // vypocet azimutu z kartezskych souradnic
// b = (b/3.141596)*180; // prevod na stupne
// b += 180;
 
// anemo_speed += (b-last);
// last=b;
// delay_ms(10);
// }
// anemo_speed=anemo_speed/10;
 
printf("%6Ld %6Ld %6Ld \n\r", compass.x, compass.y, compass.z);
// delay_ms(100);
hmc5883l_read_data();
printf("%6Ld %6Ld %6Ld \n\r", compass.x, compass.y, compass.z);
delay_ms(100);
}
 
}
/Modules/Sensors/MAG01A/SW/PIC16F887/main.cof
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
/Modules/Sensors/MAG01A/SW/PIC16F887/main.err
3,5 → 3,5
>>> Warning 202 "main.c" Line 7(14,25): Variable never used: anemo_speed
>>> Warning 202 "main.c" Line 8(16,27): Variable never used: anemo_round
>>> Warning 202 "main.c" Line 9(16,17): Variable never used: i
Memory usage: ROM=9% RAM=8% - 10%
Memory usage: ROM=10% RAM=8% - 10%
0 Errors, 5 Warnings.
/Modules/Sensors/MAG01A/SW/PIC16F887/main.esym
1,8 → 1,7
C L "MAIN" 0 20 1 "FUNCTION"
D G "__PCM__" 0 73 ""4.106""
D G "__DEVICE__" 0 73 "887"
D G "__DATE__" 0 73 ""15-V-13""
D G "__TIME__" 0 73 ""20:34:15"" "Standard Header file for the PIC16F887 device ////////////////"
D G "__PCM__" 0 0 ""4.106""
D G "__DEVICE__" 0 0 ""
D G "__DATE__" 0 0 ""17-V-13""
D G "__TIME__" 0 0 ""12:14:46"" "Standard Header file for the PIC16F887 device ////////////////"
d G "PIN_A0" 2 20 "40"
d G "PIN_A1" 2 21 "41"
d G "PIN_A2" 2 22 "42"
274,46 → 273,44
d G "INT_RB5" 2 418 "0x0200B08"
d G "INT_RB6" 2 419 "0x0400B08"
d G "INT_RB7" 2 420 "0x0800B08"
D G "MAG_ADDR_R" 3 1 "0x3D" "addresa pro cteni"
D G "MAG_ADDR_W" 3 2 "0x3C"
D G "MAG_ROZ088" 3 7 "0x00"
D G "MAG_ROZ130" 3 8 "0x20"
D G "MAG_ROZ190" 3 9 "0x40"
D G "MAG_ROZ250" 3 10 "0x60"
D G "MAG_ROZ400" 3 11 "0x80"
D G "MAG_ROZ470" 3 12 "0xA0"
D G "MAG_ROZ560" 3 13 "0xC0"
D G "MAG_ROZ810" 3 14 "0xE0"
D G "HMC5883L_WRT_ADDR" 4 2 "0x3C"
D G "HMC5883L_READ_ADDR" 4 3 "0x3D"
D G "HMC5883L_CFG_A_REG" 4 6 "0x00"
D G "HMC5883L_CFG_B_REG" 4 7 "0x01"
D G "HMC5883L_MODE_REG" 4 8 "0x02"
D G "HMC5883L_X_MSB_REG" 4 9 "0x03"
C L "hmc5883l_write_reg" 4 1 1 "FUNCTION"
F G "hmc5883l_write_reg" 4 14 "void(int8 reg,int8 data)"
D G "HMC5883L_WRT_ADDR" 3 2 "0x3C"
D G "HMC5883L_READ_ADDR" 3 3 "0x3D"
D G "HMC5883L_CFG_A_REG" 3 6 "0x00"
D G "HMC5883L_CFG_B_REG" 3 7 "0x01"
D G "HMC5883L_MODE_REG" 3 8 "0x02"
D G "HMC5883L_X_MSB_REG" 3 9 "0x03"
D G "MAG_ROZ088" 3 13 "0x00"
D G "MAG_ROZ130" 3 14 "0x20"
D G "MAG_ROZ190" 3 15 "0x40"
D G "MAG_ROZ250" 3 16 "0x60"
D G "MAG_ROZ400" 3 17 "0x80"
D G "MAG_ROZ470" 3 18 "0xA0"
D G "MAG_ROZ560" 3 19 "0xC0"
D G "MAG_ROZ810" 3 20 "0xE0"
C L "hmc5883l_write_reg" 4 2 1 "FUNCTION"
F G "hmc5883l_write_reg" 4 4 "void()"
V L "reg" 4 4 "int8"
V L "data" 4 4 "int8"
F G "hmc5883l_read_reg" 4 14 "int8()"
V L "reg" 4 14 "int8"
V L "data" 4 14 "int8"
F G "hmc5883l_read_reg" 4 24 "int8(int8 reg)"
V L "reg" 4 24 "int8"
V L "retval" 4 26 "int8"
T G "hmc5883l_result" 4 45 "{sint16 x,sint16 y,sint16 z}" "This global structure holds the values read"
V G "compass" 4 49 "hmc5883l_result"
F G "hmc5883l_read_data" 4 52 "void()"
V L "x_lsb" 4 54 "int8"
V L "x_msb" 4 55 "int8"
V L "y_lsb" 4 57 "int8"
V L "y_msb" 4 58 "int8"
V L "z_lsb" 4 60 "int8"
V L "z_msb" 4 61 "int8"
C L "hmc5883l_read_data" 4 1 1 "FUNCTION"
C L "hmc5883l_read_data" 4 1 1 "FUNCTION"
C L "hmc5883l_read_data" 4 1 1 "FUNCTION"
V L "retval" 4 16 "int8"
T G "hmc5883l_result" 4 35 "{sint16 x,sint16 y,sint16 z}" "This global structure holds the values read"
V G "compass" 4 39 "hmc5883l_result"
F G "hmc5883l_read_data" 4 42 "void()"
V L "x_lsb" 4 44 "int8"
V L "x_msb" 4 45 "int8"
V L "y_lsb" 4 47 "int8"
V L "y_msb" 4 48 "int8"
V L "z_lsb" 4 50 "int8"
V L "z_msb" 4 51 "int8"
C L "hmc5883l_read_data" 4 2 1 "FUNCTION"
C L "hmc5883l_read_data" 4 2 1 "FUNCTION"
C L "hmc5883l_read_data" 4 2 1 "FUNCTION"
D G "MATH_H" 5 21 ""
D G "PI" 5 26 "3.1415926535897932"
D G "SQRT2" 5 29 "1.4142135623730950"
C L "CEIL_FLOOR" 5 2 3 "FUNCTION"
F G "CEIL_FLOOR" 5 36 "float(float x,int8 n)"
F G "CEIL_FLOOR" 5 36 "float()"
V L "x" 5 36 "float"
V L "n" 5 36 "int8"
V L "y" 5 38 "float"
321,20 → 318,20
V L "l" 5 39 "int16"
V L "s" 5 40 "int1"
C L "floor" 5 2 5 "FUNCTION"
F G "floor" 5 192 "float(float x)"
F G "floor" 5 192 "float()"
V L "x" 5 192 "float"
C L "ceil" 5 2 5 "FUNCTION"
F G "ceil" 5 218 "float(float x)"
F G "ceil" 5 218 "float()"
V L "x" 5 218 "float"
D G "fabs" 5 244 "abs"
C L "fmod" 5 2 6 "FUNCTION"
F G "fmod" 5 256 "float(float x,float y)"
F G "fmod" 5 256 "float()"
V L "x" 5 256 "float"
V L "y" 5 256 "float"
V L "i" 5 258 "float"
D G "LN2" 5 319 "0.6931471805599453"
V G "pe" 5 321 "float[6]"
F G "exp" 5 325 "float(float x)"
F G "exp" 5 325 "float()"
V L "x" 5 325 "float"
V L "y" 5 327 "float"
V L "res" 5 327 "float"
345,7 → 342,7
V G "pl" 5 496 "float[4]"
V G "ql" 5 497 "float[4]"
C L "log" 5 2 3 "FUNCTION"
F G "log" 5 505 "float(float x)"
F G "log" 5 505 "float()"
V L "x" 5 505 "float"
V L "y" 5 507 "float"
V L "res" 5 507 "float"
355,23 → 352,23
C L "log" 5 2 1 "FUNCTION"
D G "LN10" 5 729 "2.3025850929940456"
C L "log10" 5 2 3 "FUNCTION"
F G "log10" 5 737 "float(float x)"
F G "log10" 5 737 "float()"
V L "x" 5 737 "float"
V L "r" 5 739 "float"
C L "modf" 5 2 8 "FUNCTION"
F G "modf" 5 778 "float(float value,*float iptr)"
F G "modf" 5 778 "float()"
V L "value" 5 778 "float"
V L "iptr" 5 778 "*float"
C L "pwr" 5 2 6 "FUNCTION"
F G "pwr" 5 806 "float(float x,float y)"
F G "pwr" 5 806 "float()"
V L "x" 5 806 "float"
V L "y" 5 806 "float"
C L "pow" 5 2 7 "FUNCTION"
F G "pow" 5 869 "float(float x,float y)"
F G "pow" 5 869 "float()"
V L "x" 5 869 "float"
V L "y" 5 869 "float"
C L "sqrt" 5 2 5 "FUNCTION"
F G "sqrt" 5 930 "float(float x)"
F G "sqrt" 5 930 "float()"
V L "x" 5 930 "float"
V L "y" 5 932 "float"
V L "res" 5 932 "float"
378,7 → 375,7
V L "p" 5 936 "*int8"
D G "PI_DIV_BY_TWO" 5 1125 "1.5707963267948966"
C L "cos" 5 2 3 "FUNCTION"
F G "cos" 5 1136 "float(float x)"
F G "cos" 5 1136 "float()"
V L "x" 5 1136 "float"
V L "y" 5 1138 "float"
V L "t" 5 1138 "float"
396,16 → 393,16
C L "cos" 5 2 1 "FUNCTION"
C L "cos" 5 2 1 "FUNCTION"
C L "sin" 5 2 5 "FUNCTION"
F G "sin" 5 1278 "float(float x)"
F G "sin" 5 1278 "float()"
V L "x" 5 1278 "float"
C L "tan" 5 2 5 "FUNCTION"
F G "tan" 5 1304 "float(float x)"
F G "tan" 5 1304 "float()"
V L "x" 5 1304 "float"
V L "c" 5 1306 "float"
V L "s" 5 1306 "float"
V G "pas" 5 1344 "float[3]"
V G "qas" 5 1345 "float[3]"
F G "ASIN_COS" 5 1347 "float(float x,int8 n)"
F G "ASIN_COS" 5 1347 "float()"
V L "x" 5 1347 "float"
V L "n" 5 1347 "int8"
V L "y" 5 1349 "float"
416,17 → 413,17
C L "ASIN_COS" 5 2 1 "FUNCTION"
C L "ASIN_COS" 5 2 1 "FUNCTION"
C L "asin" 5 2 5 "FUNCTION"
F G "asin" 5 1493 "float(float x)"
F G "asin" 5 1493 "float()"
V L "x" 5 1493 "float"
V L "r" 5 1495 "float"
C L "acos" 5 2 5 "FUNCTION"
F G "acos" 5 1527 "float(float x)"
F G "acos" 5 1527 "float()"
V L "x" 5 1527 "float"
V L "r" 5 1529 "float"
V G "pat" 5 1555 "float[4]"
V G "qat" 5 1556 "float[4]"
C L "atan" 5 2 3 "FUNCTION"
F G "atan" 5 1564 "float(float x)"
F G "atan" 5 1564 "float()"
V L "x" 5 1564 "float"
V L "y" 5 1566 "float"
V L "res" 5 1566 "float"
435,7 → 432,7
V L "flag" 5 1567 "int1"
C L "atan" 5 2 1 "FUNCTION"
C L "atan2" 5 2 7 "FUNCTION"
F G "atan2" 5 1697 "float(float y,float x)"
F G "atan2" 5 1697 "float()"
V L "y" 5 1697 "float"
V L "x" 5 1697 "float"
V L "z" 5 1699 "float"
444,22 → 441,22
C L "atan2" 5 2 1 "FUNCTION"
C L "atan2" 5 2 1 "FUNCTION"
C L "cosh" 5 2 7 "FUNCTION"
F G "cosh" 5 1919 "float(float x)"
F G "cosh" 5 1919 "float()"
V L "x" 5 1919 "float"
C L "sinh" 5 2 6 "FUNCTION"
F G "sinh" 5 1946 "float(float x)"
F G "sinh" 5 1946 "float()"
V L "x" 5 1946 "float"
C L "tanh" 5 2 6 "FUNCTION"
F G "tanh" 5 1976 "float(float x)"
F G "tanh" 5 1976 "float()"
V L "x" 5 1976 "float"
D G "LOG2" 5 2006 ".30102999566398119521"
F G "frexp" 5 2007 "float(float x,*sint8 exp)"
F G "frexp" 5 2007 "float()"
V L "x" 5 2007 "float"
V L "exp" 5 2007 "*sint8"
V L "res" 5 2009 "float"
V L "sign" 5 2010 "int1"
C L "ldexp" 5 2 6 "FUNCTION"
F G "ldexp" 5 2152 "float(float value,sint8 exp)"
F G "ldexp" 5 2152 "float()"
V L "value" 5 2152 "float"
V L "exp" 5 2152 "sint8"
C L "MAIN" 5 2 2 "FUNCTION"
469,13 → 466,11
V L "anemo_speed" 0 7 "float"
V L "anemo_round" 0 8 "int16"
V L "i" 0 9 "int16" "signed int16 X,Y,Z;"
C L "MAIN" 0 20 3 "FUNCTION"
C L "MAIN" 0 20 1 "FUNCTION"
C L "MAIN" 0 20 1 "FUNCTION"
C L "MAIN" 0 20 2 "FUNCTION"
C L "MAIN" 0 20 6 "FUNCTION"
C L "MAIN" 0 20 1 "FUNCTION"
C L "MAIN" 0 20 7 "FUNCTION"
C L "MAIN" 0 19 1 "FUNCTION"
C L "MAIN" 0 19 2 "FUNCTION"
C L "MAIN" 0 19 1 "FUNCTION"
C L "MAIN" 0 19 1 "FUNCTION"
C L "MAIN" 0 19 2 "FUNCTION"
F B "reset_cpu" 0 0
F B "abs" 1 0
F B "sleep_ulpwu" 1 0
/Modules/Sensors/MAG01A/SW/PIC16F887/main.h
16,6 → 16,6
#FUSES BORV40 //Brownout reset at 4.0V
 
#use delay(clock=8000000)
#use i2c(master, sda=PIN_C4, scl=PIN_C3)
#use rs232(baud=115200,parity=N,xmit=PIN_C7,rcv=PIN_C6,bits=8) //rcv TXD xmit RXD
#use i2c(Master,Slow,sda=PIN_C4,scl=PIN_C3)
#use rs232(baud=9600,parity=N,xmit=PIN_C7,rcv=PIN_C6,bits=8) //rcv TXD xmit RXD
 
/Modules/Sensors/MAG01A/SW/PIC16F887/main.hex
1,101 → 1,104
:1000000002308A004F2A0000CD306737653AEF365C
:1000000002308A00662A0000CD306737653AEF3645
:10001000653A721D20100D050000A831A936EC309C
:100020006210CA2043244F103218B1193A10A006AA
:100030000A005816A02C2C105A100D05000108308B
:10004000F80000008711A011200883168700000027
:100050008312BD0D0712031C3328201620088316B7
:10006000870037288312201220088316870000009B
:100070008312A0152008831687008312871D3E284F
:10008000F80B212800008711A01120088316870093
:10009000000083122016200883168700000000004D
:1000A0008312A0152008831687008312871D562807
:1000B000F8010000071A78148711A0112008831690
:1000C00087008312071220122008831687008312EC
:1000D0000800201620088316870000008312A01550
:1000E00020088316870000008312071220122008C0
:1000F00083168700000083128711A0112008831641
:1001000087003C308312BD001F203708BD001F2030
:100110003808BD001F202012200883168700000029
:100120008312A0152008831687008312871D962846
:1001300000009A280000201620088316870000007F
:1001400083120800A01320088316870083128713E8
:100150000830F800AB280000F817C028F813400852
:10016000F900F90C03188717031C87137817C028A8
:100170007813F80BB1287908C000BE280000871753
:10018000F81BAE28781BB8280800831603178C17B5
:100190000C140000000083120C087F390319092990
:1001A0000313B70003170D080313B80003170F0854
:1001B0000313B9003708C000A220380803178D00C8
:1001C0000313390803178F0083168C170C140000D3
:1001D000000083120C0D0E0D7F390319092903133A
:1001E000B70003170D080313B80003170F08031314
:1001F000B9003708C000A220380803178D00031388
:10020000390803178F008D0A03198F0A0313C528B5
:100210000317031308000830BE007708BF0020163C
:1002200020088316870000008312A015200883167B
:1002300087008312871D1A29071A0314071E03104B
:10024000F80D0000A0112008831687008312871183
:10025000BE0B0F292016200883168700000083128A
:1002600007123F0803193929201220088316870036
:1002700083120000A0152008831687008312871DB3
:100280003F2900008711A011200883168700000075
:100290008312071220122008831687008312080099
:1002A000201620088316870000008312A01520085E
:1002B000831687000000831207122012200883167D
:1002C0008700000083128711A01120088316870081
:1002D0003C308312BD001F200330BD001F202016BC
:1002E00020088316870000008312A01520088316BB
:1002F000870000008312871D7B2907122012200827
:1003000083168700000083128711A011200883162E
:1003100087003D308312BD001F200130F7000B2104
:100320007808B8000130F7000B217808B7000130D9
:10033000F7000B217808BC000130F7000B2178088A
:10034000BB000130F7000B217808BA00F7010B2140
:100350007808B90020122008831687000000831255
:10036000A0152008831687008312871DB529000079
:10037000B929000020162008831687000000831288
:100380003808A2003708A1003A08A4003908A300E1
:100390003C08A6003B08A5008A110A12E12ABF0109
:1003A0000408BE003F10831B3F14B81FDF29BE178F
:1003B0003E1EBE0AB709B809B70A0319B80A380EB3
:1003C000F038BA00BA07E23EBB00323EBD00380842
:1003D0000F39BB07BB07BD07E93EBC00BC07BC0724
:1003E000370E0F39BC07BD07BC0DBD0DBD09BD0DD6
:1003F00037080F39BD07BA0D0730B9000A30BD07FD
:10040000BC03031CFF29BC07BB03031C032ABB0757
:10041000BA03031C072ABA07B903031C0B2A393095
:100420008400831307303E053E1384033E05031DFD
:10043000202A3E1A840A3E1A202A2030F7003D2A3C
:1004400084073D30040203193E170008F700031D1E
:10045000312A3E1B312A3E1A4B2ABE19312A20303E
:100460003C2ABE1F392A2D30F70084033E13BE13E9
:100470003D2ABE153E123030F707B8010408B70018
:100480003810831B38147708C000A2203708840076
:10049000831338188317840A3E1F212A0800840119
:1004A00083131F308305713083168F000F0883126A
:1004B000A01320088316870083128717831603175B
:1004C0000908C039890003131F129F120030031757
:1004D00088008312870188018901FF300313A0007F
:1004E000A101A201A301A401A501A601B401B301C8
:1004F000831603170908C039890003131F129F12BE
:10050000003003178800831203131F139F138316F1
:100510009F1383121F149412A012200883168700C1
:10052000831220162008831687008312A01120084A
:1005300083168700013083129400003083169400E4
:100540000108C73908388100831290010030F80093
:100550009200003083169200831220152008831623
:1005600087008312970183169B019C0101309D0037
:10057000831203178701880189010313B70118301B
:10058000B80069200130B700E030B80069200230BF
:10059000B700B8016920043003178D0000308F00C8
:1005A0000313C5200D3003178D0000308F00031397
:1005B000C520193003178D0000308F000313C520AC
:1005C0005029003084002208B8002108B700CF214C
:1005D0002030C000A220003084002408B800230886
:1005E000B700CF212030C000A220003084002608B0
:1005F000B8002508B700CF212030C000A2200A3063
:0E060000C000A2200D30C000A220E02A63003E
:100030000A005816A02C2C105A100D050001A01310
:10004000200883168700831287130830F8002828B9
:100050000000F8173928F813C00C03188717031C81
:100060008713781739287813F80B2C2837280000C5
:1000700087173F308400840B3B280000F81B2B2897
:10008000781B33280800831603178C170C14000004
:10009000000083120C087F39031987280313B70067
:1000A00003170D080313B80003170F080313B90053
:1000B0003708C0001F20380803178D0003133908C4
:1000C00003178F0083168C170C1400000000831296
:1000D0000C0D0E0D7F39031987280313B700031782
:1000E0000D080313B80003170F080313B9003708EE
:1000F000C0001F20380803178D00031339080317A9
:100100008F008D0A03198F0A031343280317031363
:1001100008000830F80000008711A011200883169D
:10012000870000008312BD0D0712031C9D282016B6
:10013000200883168700A128831220122008831626
:10014000870000008312A015200883168700831201
:10015000871DA828F80B8B2800008711A011200804
:10016000831687000000831220162008831687005C
:10017000000000008312A015200883168700831258
:10018000871DC028F8010000071A78148711A011F4
:100190002008831687008312071220122008831676
:1001A00087008312080020162008831687000000AD
:1001B0008312A015200883168700000083120712FF
:1001C0002012200883168700000083128711A011D7
:1001D0002008831687003C308312BD008920370831
:1001E000BD0089203808BD00892020122008831610
:1001F000870000008312A015200883168700831251
:10020000871D0029000004290000201620088316FD
:1002100087000000831208000830BE007708BF0086
:10022000201620088316870000008312A0152008DE
:10023000831687008312871D1B29071A0314071EC4
:100240000310F80D0000A011200883168700831208
:100250008711BE0B10292016200883168700000086
:10026000831207123F0803193A2920122008831627
:10027000870083120000A0152008831687008312D0
:10028000871D402900008711A011200883168700D0
:1002900000008312071220122008831687008312A1
:1002A0000800201620088316870000008312A0157E
:1002B00020088316870000008312071220122008EE
:1002C00083168700000083128711A011200883166F
:1002D00087003C308312BD0089200330BD00892097
:1002E000201620088316870000008312A01520081E
:1002F0008316870000008312871D7C2907122012B5
:10030000200883168700000083128711A01120089F
:10031000831687003D308312BD0089200130F7002D
:100320000C217808B8000130F7000C217808B700DC
:100330000130F7000C217808BC000130F7000C21D7
:100340007808BB000130F7000C217808BA00F701EB
:100350000C217808B90020122008831687000000BD
:100360008312A0152008831687008312871DB629E3
:100370000000BA290000201620088316870000001C
:1003800083123808A2003708A1003A08A4003908EF
:10039000A3003C08A6003B08A5008A110A12F62A11
:1003A000BF010408BE003F10831B3F14B81FE029A3
:1003B000BE173E1EBE0AB709B809B70A0319B80A24
:1003C000380EF038BA00BA07E23EBB00323EBD003C
:1003D00038080F39BB07BB07BD07E93EBC00BC07A7
:1003E000BC07370E0F39BC07BD07BC0DBD0DBD09DD
:1003F000BD0D37080F39BD07BA0D0730B9000A30F7
:10040000BD07BC03031C002ABC07BB03031C042A52
:10041000BB07BA03031C082ABA07B903031C0C2A3A
:1004200039308400831307303E053E1384033E05B4
:10043000031D212A3E1A840A3E1A212A2030F70081
:100440003E2A84073D30040203193E170008F700D6
:10045000031D322A3E1B322A3E1A4C2ABE19322A6A
:1004600020303D2ABE1F3A2A2D30F70084033E1368
:10047000BE133E2ABE153E123030F707B8010408FD
:10048000B7003810831B38147708C0001F203708C6
:100490008400831338188317840A3E1F222A080019
:1004A00037308400831300080319632A0230F800F0
:1004B000F701F70B592AF80B582A9730F700F70B7A
:1004C0005F2A800B562A8A110A121D2B840183137E
:1004D0001F308305713083168F000F088312A0131D
:1004E00020088316870083128717831603170908CD
:1004F000C039890003131F129F12003003178800B0
:100500008312870188018901FF300313A000A10134
:10051000A201A301A401A501A601B401B3018316A0
:1005200003170908C039890003131F129F120030F6
:1005300003178800831203131F139F1383169F133F
:1005400083121F149412A0122008831687008312AE
:1005500020162008831687008312A0112008831616
:100560008700013083129400003083169400010844
:10057000C73908388100831290010030F8009200DA
:1005800000308316920083122015200883168700FE
:100590008312970183169B019C0101309D008312F9
:1005A000031787018801890104308D0000308F0016
:1005B000031343200D3003178D0000308F00031309
:1005C0004320193003178D0000308F0003134320A0
:1005D000B7011830B800D3200130B700E030B800C0
:1005E000D3200230B700B801D32051290030840055
:1005F0002208B8002108B700D0212030C0001F20F9
:10060000003084002408B8002308B700D02120302F
:10061000C0001F20003084002608B8002508B7005D
:10062000D0212030C0001F200A30C0001F200D3014
:0E063000C0001F206430B700502AF52A630076
:04400E00F52CFF3F4F
:00000001FF
;PIC16F887
;CRC=32C6 CREATED="15-V-13 20:34"
;CRC=17FE CREATED="17-V-13 12:14"
/Modules/Sensors/MAG01A/SW/PIC16F887/main.lst
1,8 → 1,8
CCS PCM C Compiler, Version 4.106, 47914 15-V-13 20:34
CCS PCM C Compiler, Version 4.106, 47914 17-V-13 12:14
 
Filename: Z:\home\kaklik\svnMLAB\Modules\Sensors\MAG01A\SW\PIC16F887\main.lst
 
ROM used: 775 words (9%)
ROM used: 799 words (10%)
Largest free fragment is 2048
RAM used: 28 (8%) at main() level
38 (10%) worst case
11,7 → 11,7
*
0000: MOVLW 02
0001: MOVWF 0A
0002: GOTO 24F
0002: GOTO 266
0003: NOP
.................... #include "main.h"
.................... #include <16F887.h>
36,195 → 36,225
.................... #FUSES BORV40 //Brownout reset at 4.0V
....................
.................... #use delay(clock=8000000)
.................... #use i2c(master, sda=PIN_C4, scl=PIN_C3)
*
001F: MOVLW 08
0020: MOVWF 78
0021: NOP
0022: BCF 07.3
0023: BCF 20.3
0024: MOVF 20,W
0025: BSF 03.5
0026: MOVWF 07
0027: NOP
0028: BCF 03.5
0029: RLF 3D,F
002A: BCF 07.4
002B: BTFSS 03.0
002C: GOTO 033
002D: BSF 20.4
002E: MOVF 20,W
002F: BSF 03.5
0030: MOVWF 07
0031: GOTO 037
0032: BCF 03.5
0033: BCF 20.4
0034: MOVF 20,W
0035: BSF 03.5
0036: MOVWF 07
0037: NOP
0038: BCF 03.5
0039: BSF 20.3
003A: MOVF 20,W
003B: BSF 03.5
003C: MOVWF 07
003D: BCF 03.5
003E: BTFSS 07.3
003F: GOTO 03E
0040: DECFSZ 78,F
0041: GOTO 021
0042: NOP
0043: BCF 07.3
0044: BCF 20.3
0045: MOVF 20,W
0046: BSF 03.5
0047: MOVWF 07
0048: NOP
0049: BCF 03.5
004A: BSF 20.4
004B: MOVF 20,W
004C: BSF 03.5
004D: MOVWF 07
004E: NOP
004F: NOP
0050: BCF 03.5
0051: BSF 20.3
0052: MOVF 20,W
0053: BSF 03.5
0054: MOVWF 07
0055: BCF 03.5
0056: BTFSS 07.3
0057: GOTO 056
0058: CLRF 78
0059: NOP
005A: BTFSC 07.4
005B: BSF 78.0
005C: BCF 07.3
005D: BCF 20.3
005E: MOVF 20,W
005F: BSF 03.5
0060: MOVWF 07
0061: BCF 03.5
0062: BCF 07.4
0063: BCF 20.4
0064: MOVF 20,W
0065: BSF 03.5
0066: MOVWF 07
0067: BCF 03.5
0068: RETURN
0250: MOVLW 37
0251: MOVWF 04
0252: BCF 03.7
0253: MOVF 00,W
0254: BTFSC 03.2
0255: GOTO 263
0256: MOVLW 02
0257: MOVWF 78
0258: CLRF 77
0259: DECFSZ 77,F
025A: GOTO 259
025B: DECFSZ 78,F
025C: GOTO 258
025D: MOVLW 97
025E: MOVWF 77
025F: DECFSZ 77,F
0260: GOTO 25F
0261: DECFSZ 00,F
0262: GOTO 256
0263: BCF 0A.3
0264: BCF 0A.4
0265: GOTO 31D (RETURN)
.................... #use i2c(Master,Slow,sda=PIN_C4,scl=PIN_C3)
*
010B: MOVLW 08
010C: MOVWF 3E
010D: MOVF 77,W
010E: MOVWF 3F
010F: BSF 20.4
0110: MOVF 20,W
0111: BSF 03.5
0112: MOVWF 07
0113: NOP
0114: BCF 03.5
0115: BSF 20.3
0116: MOVF 20,W
0117: BSF 03.5
0118: MOVWF 07
0119: BCF 03.5
011A: BTFSS 07.3
011B: GOTO 11A
011C: BTFSC 07.4
011D: BSF 03.0
011E: BTFSS 07.4
011F: BCF 03.0
0120: RLF 78,F
0121: NOP
0122: BCF 20.3
0123: MOVF 20,W
0124: BSF 03.5
0125: MOVWF 07
0126: BCF 03.5
0127: BCF 07.3
0128: DECFSZ 3E,F
0129: GOTO 10F
012A: BSF 20.4
012B: MOVF 20,W
012C: BSF 03.5
012D: MOVWF 07
012E: NOP
012F: BCF 03.5
0130: BCF 07.4
0131: MOVF 3F,W
0132: BTFSC 03.2
0133: GOTO 139
0134: BCF 20.4
0135: MOVF 20,W
0136: BSF 03.5
0137: MOVWF 07
0138: BCF 03.5
0139: NOP
013A: BSF 20.3
013B: MOVF 20,W
013C: BSF 03.5
013D: MOVWF 07
013E: BCF 03.5
013F: BTFSS 07.3
0140: GOTO 13F
0141: NOP
0142: BCF 07.3
0143: BCF 20.3
0144: MOVF 20,W
0145: BSF 03.5
0146: MOVWF 07
0147: NOP
0148: BCF 03.5
0149: BCF 07.4
014A: BCF 20.4
014B: MOVF 20,W
014C: BSF 03.5
014D: MOVWF 07
014E: BCF 03.5
014F: RETURN
.................... #use rs232(baud=115200,parity=N,xmit=PIN_C7,rcv=PIN_C6,bits=8) //rcv TXD xmit RXD
0089: MOVLW 08
008A: MOVWF 78
008B: NOP
008C: BCF 07.3
008D: BCF 20.3
008E: MOVF 20,W
008F: BSF 03.5
0090: MOVWF 07
0091: NOP
0092: BCF 03.5
0093: RLF 3D,F
0094: BCF 07.4
0095: BTFSS 03.0
0096: GOTO 09D
0097: BSF 20.4
0098: MOVF 20,W
0099: BSF 03.5
009A: MOVWF 07
009B: GOTO 0A1
009C: BCF 03.5
009D: BCF 20.4
009E: MOVF 20,W
009F: BSF 03.5
00A0: MOVWF 07
00A1: NOP
00A2: BCF 03.5
00A3: BSF 20.3
00A4: MOVF 20,W
00A5: BSF 03.5
00A6: MOVWF 07
00A7: BCF 03.5
00A8: BTFSS 07.3
00A9: GOTO 0A8
00AA: DECFSZ 78,F
00AB: GOTO 08B
00AC: NOP
00AD: BCF 07.3
00AE: BCF 20.3
00AF: MOVF 20,W
00B0: BSF 03.5
00B1: MOVWF 07
00B2: NOP
00B3: BCF 03.5
00B4: BSF 20.4
00B5: MOVF 20,W
00B6: BSF 03.5
00B7: MOVWF 07
00B8: NOP
00B9: NOP
00BA: BCF 03.5
00BB: BSF 20.3
00BC: MOVF 20,W
00BD: BSF 03.5
00BE: MOVWF 07
00BF: BCF 03.5
00C0: BTFSS 07.3
00C1: GOTO 0C0
00C2: CLRF 78
00C3: NOP
00C4: BTFSC 07.4
00C5: BSF 78.0
00C6: BCF 07.3
00C7: BCF 20.3
00C8: MOVF 20,W
00C9: BSF 03.5
00CA: MOVWF 07
00CB: BCF 03.5
00CC: BCF 07.4
00CD: BCF 20.4
00CE: MOVF 20,W
00CF: BSF 03.5
00D0: MOVWF 07
00D1: BCF 03.5
00D2: RETURN
*
00A2: BCF 20.7
00A3: MOVF 20,W
00A4: BSF 03.5
00A5: MOVWF 07
00A6: BCF 03.5
00A7: BCF 07.7
00A8: MOVLW 08
00A9: MOVWF 78
00AA: GOTO 0AB
00AB: NOP
00AC: BSF 78.7
00AD: GOTO 0C0
00AE: BCF 78.7
00AF: MOVF 40,W
00B0: MOVWF 79
00B1: RRF 79,F
00B2: BTFSC 03.0
00B3: BSF 07.7
00B4: BTFSS 03.0
00B5: BCF 07.7
00B6: BSF 78.6
00B7: GOTO 0C0
00B8: BCF 78.6
00B9: DECFSZ 78,F
00BA: GOTO 0B1
00BB: MOVF 79,W
00BC: MOVWF 40
00BD: GOTO 0BE
00BE: NOP
00BF: BSF 07.7
00C0: BTFSC 78.7
00C1: GOTO 0AE
00C2: BTFSC 78.6
00C3: GOTO 0B8
00C4: RETURN
010C: MOVLW 08
010D: MOVWF 3E
010E: MOVF 77,W
010F: MOVWF 3F
0110: BSF 20.4
0111: MOVF 20,W
0112: BSF 03.5
0113: MOVWF 07
0114: NOP
0115: BCF 03.5
0116: BSF 20.3
0117: MOVF 20,W
0118: BSF 03.5
0119: MOVWF 07
011A: BCF 03.5
011B: BTFSS 07.3
011C: GOTO 11B
011D: BTFSC 07.4
011E: BSF 03.0
011F: BTFSS 07.4
0120: BCF 03.0
0121: RLF 78,F
0122: NOP
0123: BCF 20.3
0124: MOVF 20,W
0125: BSF 03.5
0126: MOVWF 07
0127: BCF 03.5
0128: BCF 07.3
0129: DECFSZ 3E,F
012A: GOTO 110
012B: BSF 20.4
012C: MOVF 20,W
012D: BSF 03.5
012E: MOVWF 07
012F: NOP
0130: BCF 03.5
0131: BCF 07.4
0132: MOVF 3F,W
0133: BTFSC 03.2
0134: GOTO 13A
0135: BCF 20.4
0136: MOVF 20,W
0137: BSF 03.5
0138: MOVWF 07
0139: BCF 03.5
013A: NOP
013B: BSF 20.3
013C: MOVF 20,W
013D: BSF 03.5
013E: MOVWF 07
013F: BCF 03.5
0140: BTFSS 07.3
0141: GOTO 140
0142: NOP
0143: BCF 07.3
0144: BCF 20.3
0145: MOVF 20,W
0146: BSF 03.5
0147: MOVWF 07
0148: NOP
0149: BCF 03.5
014A: BCF 07.4
014B: BCF 20.4
014C: MOVF 20,W
014D: BSF 03.5
014E: MOVWF 07
014F: BCF 03.5
0150: RETURN
.................... #use rs232(baud=9600,parity=N,xmit=PIN_C7,rcv=PIN_C6,bits=8) //rcv TXD xmit RXD
*
001F: BCF 20.7
0020: MOVF 20,W
0021: BSF 03.5
0022: MOVWF 07
0023: BCF 03.5
0024: BCF 07.7
0025: MOVLW 08
0026: MOVWF 78
0027: GOTO 028
0028: NOP
0029: BSF 78.7
002A: GOTO 039
002B: BCF 78.7
002C: RRF 40,F
002D: BTFSC 03.0
002E: BSF 07.7
002F: BTFSS 03.0
0030: BCF 07.7
0031: BSF 78.6
0032: GOTO 039
0033: BCF 78.6
0034: DECFSZ 78,F
0035: GOTO 02C
0036: GOTO 037
0037: NOP
0038: BSF 07.7
0039: MOVLW 3F
003A: MOVWF 04
003B: DECFSZ 04,F
003C: GOTO 03B
003D: NOP
003E: BTFSC 78.7
003F: GOTO 02B
0040: BTFSC 78.6
0041: GOTO 033
0042: RETURN
....................
....................
.................... #include "HMC5883L.h"
.................... #define MAG_ADDR_R 0x3D //addresa pro cteni
.................... #define MAG_ADDR_W 0x3C
.................... // i2c slave addresses
.................... #define HMC5883L_WRT_ADDR 0x3C
.................... #define HMC5883L_READ_ADDR 0x3D
....................
.................... // Register addresses
.................... #define HMC5883L_CFG_A_REG 0x00
.................... #define HMC5883L_CFG_B_REG 0x01
.................... #define HMC5883L_MODE_REG 0x02
.................... #define HMC5883L_X_MSB_REG 0x03
....................
.................... //Konstanty nastavujici rozsah
.................... //pro void set_mag_roz (unsigned int8 h)
239,16 → 269,6
....................
....................
.................... #include "HMC5883L.c"
.................... // i2c slave addresses
.................... #define HMC5883L_WRT_ADDR 0x3C
.................... #define HMC5883L_READ_ADDR 0x3D
....................
.................... // Register addresses
.................... #define HMC5883L_CFG_A_REG 0x00
.................... #define HMC5883L_CFG_B_REG 0x01
.................... #define HMC5883L_MODE_REG 0x02
.................... #define HMC5883L_X_MSB_REG 0x03
....................
.................... //------------------------------
.................... // Low level routines
.................... //------------------------------
256,68 → 276,68
.................... {
.................... i2c_start();
*
0069: BSF 20.4
006A: MOVF 20,W
006B: BSF 03.5
006C: MOVWF 07
006D: NOP
006E: BCF 03.5
006F: BSF 20.3
0070: MOVF 20,W
0071: BSF 03.5
0072: MOVWF 07
0073: NOP
0074: BCF 03.5
0075: BCF 07.4
0076: BCF 20.4
0077: MOVF 20,W
0078: BSF 03.5
0079: MOVWF 07
007A: NOP
007B: BCF 03.5
007C: BCF 07.3
007D: BCF 20.3
007E: MOVF 20,W
007F: BSF 03.5
0080: MOVWF 07
00D3: BSF 20.4
00D4: MOVF 20,W
00D5: BSF 03.5
00D6: MOVWF 07
00D7: NOP
00D8: BCF 03.5
00D9: BSF 20.3
00DA: MOVF 20,W
00DB: BSF 03.5
00DC: MOVWF 07
00DD: NOP
00DE: BCF 03.5
00DF: BCF 07.4
00E0: BCF 20.4
00E1: MOVF 20,W
00E2: BSF 03.5
00E3: MOVWF 07
00E4: NOP
00E5: BCF 03.5
00E6: BCF 07.3
00E7: BCF 20.3
00E8: MOVF 20,W
00E9: BSF 03.5
00EA: MOVWF 07
.................... i2c_write(HMC5883L_WRT_ADDR);
0081: MOVLW 3C
0082: BCF 03.5
0083: MOVWF 3D
0084: CALL 01F
00EB: MOVLW 3C
00EC: BCF 03.5
00ED: MOVWF 3D
00EE: CALL 089
.................... i2c_write(reg);
0085: MOVF 37,W
0086: MOVWF 3D
0087: CALL 01F
00EF: MOVF 37,W
00F0: MOVWF 3D
00F1: CALL 089
.................... i2c_write(data);
0088: MOVF 38,W
0089: MOVWF 3D
008A: CALL 01F
00F2: MOVF 38,W
00F3: MOVWF 3D
00F4: CALL 089
.................... i2c_stop();
008B: BCF 20.4
008C: MOVF 20,W
008D: BSF 03.5
008E: MOVWF 07
008F: NOP
0090: BCF 03.5
0091: BSF 20.3
0092: MOVF 20,W
0093: BSF 03.5
0094: MOVWF 07
0095: BCF 03.5
0096: BTFSS 07.3
0097: GOTO 096
0098: NOP
0099: GOTO 09A
009A: NOP
009B: BSF 20.4
009C: MOVF 20,W
009D: BSF 03.5
009E: MOVWF 07
009F: NOP
00F5: BCF 20.4
00F6: MOVF 20,W
00F7: BSF 03.5
00F8: MOVWF 07
00F9: NOP
00FA: BCF 03.5
00FB: BSF 20.3
00FC: MOVF 20,W
00FD: BSF 03.5
00FE: MOVWF 07
00FF: BCF 03.5
0100: BTFSS 07.3
0101: GOTO 100
0102: NOP
0103: GOTO 104
0104: NOP
0105: BSF 20.4
0106: MOVF 20,W
0107: BSF 03.5
0108: MOVWF 07
0109: NOP
.................... }
00A0: BCF 03.5
00A1: RETURN
010A: BCF 03.5
010B: RETURN
....................
.................... //------------------------------
.................... int8 hmc5883l_read_reg(int8 reg)
347,12 → 367,12
.................... // from the HMC5883L x,y,z registers.
.................... hmc5883l_result compass = {0,0,0};
*
0270: CLRF 21
0271: CLRF 22
0272: CLRF 23
0273: CLRF 24
0274: CLRF 25
0275: CLRF 26
0287: CLRF 21
0288: CLRF 22
0289: CLRF 23
028A: CLRF 24
028B: CLRF 25
028C: CLRF 26
....................
.................... //------------------------------
.................... void hmc5883l_read_data(void)
368,154 → 388,154
....................
.................... i2c_start();
*
0150: BSF 20.4
0151: MOVF 20,W
0152: BSF 03.5
0153: MOVWF 07
0154: NOP
0155: BCF 03.5
0156: BSF 20.3
0157: MOVF 20,W
0158: BSF 03.5
0159: MOVWF 07
015A: NOP
015B: BCF 03.5
015C: BCF 07.4
015D: BCF 20.4
015E: MOVF 20,W
015F: BSF 03.5
0160: MOVWF 07
0161: NOP
0162: BCF 03.5
0163: BCF 07.3
0164: BCF 20.3
0165: MOVF 20,W
0166: BSF 03.5
0167: MOVWF 07
0151: BSF 20.4
0152: MOVF 20,W
0153: BSF 03.5
0154: MOVWF 07
0155: NOP
0156: BCF 03.5
0157: BSF 20.3
0158: MOVF 20,W
0159: BSF 03.5
015A: MOVWF 07
015B: NOP
015C: BCF 03.5
015D: BCF 07.4
015E: BCF 20.4
015F: MOVF 20,W
0160: BSF 03.5
0161: MOVWF 07
0162: NOP
0163: BCF 03.5
0164: BCF 07.3
0165: BCF 20.3
0166: MOVF 20,W
0167: BSF 03.5
0168: MOVWF 07
.................... i2c_write(HMC5883L_WRT_ADDR);
0168: MOVLW 3C
0169: BCF 03.5
016A: MOVWF 3D
016B: CALL 01F
0169: MOVLW 3C
016A: BCF 03.5
016B: MOVWF 3D
016C: CALL 089
.................... i2c_write(HMC5883L_X_MSB_REG); // Point to X-msb register
016C: MOVLW 03
016D: MOVWF 3D
016E: CALL 01F
016D: MOVLW 03
016E: MOVWF 3D
016F: CALL 089
.................... i2c_start();
016F: BSF 20.4
0170: MOVF 20,W
0171: BSF 03.5
0172: MOVWF 07
0173: NOP
0174: BCF 03.5
0175: BSF 20.3
0176: MOVF 20,W
0177: BSF 03.5
0178: MOVWF 07
0179: NOP
017A: BCF 03.5
017B: BTFSS 07.3
017C: GOTO 17B
017D: BCF 07.4
017E: BCF 20.4
017F: MOVF 20,W
0180: BSF 03.5
0181: MOVWF 07
0182: NOP
0183: BCF 03.5
0184: BCF 07.3
0185: BCF 20.3
0186: MOVF 20,W
0187: BSF 03.5
0188: MOVWF 07
0170: BSF 20.4
0171: MOVF 20,W
0172: BSF 03.5
0173: MOVWF 07
0174: NOP
0175: BCF 03.5
0176: BSF 20.3
0177: MOVF 20,W
0178: BSF 03.5
0179: MOVWF 07
017A: NOP
017B: BCF 03.5
017C: BTFSS 07.3
017D: GOTO 17C
017E: BCF 07.4
017F: BCF 20.4
0180: MOVF 20,W
0181: BSF 03.5
0182: MOVWF 07
0183: NOP
0184: BCF 03.5
0185: BCF 07.3
0186: BCF 20.3
0187: MOVF 20,W
0188: BSF 03.5
0189: MOVWF 07
.................... i2c_write(HMC5883L_READ_ADDR);
0189: MOVLW 3D
018A: BCF 03.5
018B: MOVWF 3D
018C: CALL 01F
018A: MOVLW 3D
018B: BCF 03.5
018C: MOVWF 3D
018D: CALL 089
....................
.................... x_msb = i2c_read();
018D: MOVLW 01
018E: MOVWF 77
018F: CALL 10B
0190: MOVF 78,W
0191: MOVWF 38
018E: MOVLW 01
018F: MOVWF 77
0190: CALL 10C
0191: MOVF 78,W
0192: MOVWF 38
.................... x_lsb = i2c_read();
0192: MOVLW 01
0193: MOVWF 77
0194: CALL 10B
0195: MOVF 78,W
0196: MOVWF 37
0193: MOVLW 01
0194: MOVWF 77
0195: CALL 10C
0196: MOVF 78,W
0197: MOVWF 37
....................
.................... z_msb = i2c_read();
0197: MOVLW 01
0198: MOVWF 77
0199: CALL 10B
019A: MOVF 78,W
019B: MOVWF 3C
0198: MOVLW 01
0199: MOVWF 77
019A: CALL 10C
019B: MOVF 78,W
019C: MOVWF 3C
.................... z_lsb = i2c_read();
019C: MOVLW 01
019D: MOVWF 77
019E: CALL 10B
019F: MOVF 78,W
01A0: MOVWF 3B
019D: MOVLW 01
019E: MOVWF 77
019F: CALL 10C
01A0: MOVF 78,W
01A1: MOVWF 3B
....................
.................... y_msb = i2c_read();
01A1: MOVLW 01
01A2: MOVWF 77
01A3: CALL 10B
01A4: MOVF 78,W
01A5: MOVWF 3A
01A2: MOVLW 01
01A3: MOVWF 77
01A4: CALL 10C
01A5: MOVF 78,W
01A6: MOVWF 3A
.................... y_lsb = i2c_read(0); // do a NACK on last read
01A6: CLRF 77
01A7: CALL 10B
01A8: MOVF 78,W
01A9: MOVWF 39
01A7: CLRF 77
01A8: CALL 10C
01A9: MOVF 78,W
01AA: MOVWF 39
....................
.................... i2c_stop();
01AA: BCF 20.4
01AB: MOVF 20,W
01AC: BSF 03.5
01AD: MOVWF 07
01AE: NOP
01AF: BCF 03.5
01B0: BSF 20.3
01B1: MOVF 20,W
01B2: BSF 03.5
01B3: MOVWF 07
01B4: BCF 03.5
01B5: BTFSS 07.3
01B6: GOTO 1B5
01B7: NOP
01B8: GOTO 1B9
01B9: NOP
01BA: BSF 20.4
01BB: MOVF 20,W
01BC: BSF 03.5
01BD: MOVWF 07
01BE: NOP
01AB: BCF 20.4
01AC: MOVF 20,W
01AD: BSF 03.5
01AE: MOVWF 07
01AF: NOP
01B0: BCF 03.5
01B1: BSF 20.3
01B2: MOVF 20,W
01B3: BSF 03.5
01B4: MOVWF 07
01B5: BCF 03.5
01B6: BTFSS 07.3
01B7: GOTO 1B6
01B8: NOP
01B9: GOTO 1BA
01BA: NOP
01BB: BSF 20.4
01BC: MOVF 20,W
01BD: BSF 03.5
01BE: MOVWF 07
01BF: NOP
....................
.................... // Combine high and low bytes into 16-bit values.
.................... compass.x = make16(x_msb, x_lsb);
01BF: BCF 03.5
01C0: MOVF 38,W
01C1: MOVWF 22
01C2: MOVF 37,W
01C3: MOVWF 21
01C0: BCF 03.5
01C1: MOVF 38,W
01C2: MOVWF 22
01C3: MOVF 37,W
01C4: MOVWF 21
.................... compass.y = make16(y_msb, y_lsb);
01C4: MOVF 3A,W
01C5: MOVWF 24
01C6: MOVF 39,W
01C7: MOVWF 23
01C5: MOVF 3A,W
01C6: MOVWF 24
01C7: MOVF 39,W
01C8: MOVWF 23
.................... compass.z = make16(z_msb, z_lsb);
01C8: MOVF 3C,W
01C9: MOVWF 26
01CA: MOVF 3B,W
01CB: MOVWF 25
01C9: MOVF 3C,W
01CA: MOVWF 26
01CB: MOVF 3B,W
01CC: MOVWF 25
.................... }
01CC: BCF 0A.3
01CD: BCF 0A.4
01CE: GOTO 2E1 (RETURN)
01CD: BCF 0A.3
01CE: BCF 0A.4
01CF: GOTO 2F6 (RETURN)
....................
....................
....................
2697,247 → 2717,224
.................... void main()
.................... {
*
024F: CLRF 04
0250: BCF 03.7
0251: MOVLW 1F
0252: ANDWF 03,F
0253: MOVLW 71
0254: BSF 03.5
0255: MOVWF 0F
0256: MOVF 0F,W
0257: BCF 03.5
0258: BCF 20.7
0259: MOVF 20,W
025A: BSF 03.5
025B: MOVWF 07
025C: BCF 03.5
025D: BSF 07.7
025E: BSF 03.5
025F: BSF 03.6
0260: MOVF 09,W
0261: ANDLW C0
0262: MOVWF 09
0263: BCF 03.6
0264: BCF 1F.4
0265: BCF 1F.5
0266: MOVLW 00
0267: BSF 03.6
0268: MOVWF 08
0269: BCF 03.5
026A: CLRF 07
026B: CLRF 08
026C: CLRF 09
0266: CLRF 04
0267: BCF 03.7
0268: MOVLW 1F
0269: ANDWF 03,F
026A: MOVLW 71
026B: BSF 03.5
026C: MOVWF 0F
026D: MOVF 0F,W
026E: BCF 03.5
026F: BCF 20.7
0270: MOVF 20,W
0271: BSF 03.5
0272: MOVWF 07
0273: BCF 03.5
0274: BSF 07.7
0275: BSF 03.5
0276: BSF 03.6
0277: MOVF 09,W
0278: ANDLW C0
0279: MOVWF 09
027A: BCF 03.6
027B: BCF 1F.4
027C: BCF 1F.5
027D: MOVLW 00
027E: BSF 03.6
027F: MOVWF 08
0280: BCF 03.5
0281: CLRF 07
0282: CLRF 08
0283: CLRF 09
*
0276: CLRF 34
0277: CLRF 33
028D: CLRF 34
028E: CLRF 33
.................... float last,b,anemo_speed;
.................... unsigned int16 anemo_round=0;
.................... unsigned int16 i;
....................
....................
.................... //signed int16 X,Y,Z;
.................... setup_adc_ports(NO_ANALOGS|VSS_VDD);
0278: BSF 03.5
0279: BSF 03.6
027A: MOVF 09,W
027B: ANDLW C0
027C: MOVWF 09
027D: BCF 03.6
027E: BCF 1F.4
027F: BCF 1F.5
0280: MOVLW 00
0281: BSF 03.6
0282: MOVWF 08
028F: BSF 03.5
0290: BSF 03.6
0291: MOVF 09,W
0292: ANDLW C0
0293: MOVWF 09
0294: BCF 03.6
0295: BCF 1F.4
0296: BCF 1F.5
0297: MOVLW 00
0298: BSF 03.6
0299: MOVWF 08
.................... setup_adc(ADC_CLOCK_DIV_2);
0283: BCF 03.5
0284: BCF 03.6
0285: BCF 1F.6
0286: BCF 1F.7
0287: BSF 03.5
0288: BCF 1F.7
0289: BCF 03.5
028A: BSF 1F.0
029A: BCF 03.5
029B: BCF 03.6
029C: BCF 1F.6
029D: BCF 1F.7
029E: BSF 03.5
029F: BCF 1F.7
02A0: BCF 03.5
02A1: BSF 1F.0
.................... setup_spi(SPI_SS_DISABLED);
028B: BCF 14.5
028C: BCF 20.5
028D: MOVF 20,W
028E: BSF 03.5
028F: MOVWF 07
0290: BCF 03.5
0291: BSF 20.4
0292: MOVF 20,W
0293: BSF 03.5
0294: MOVWF 07
0295: BCF 03.5
0296: BCF 20.3
0297: MOVF 20,W
0298: BSF 03.5
0299: MOVWF 07
029A: MOVLW 01
029B: BCF 03.5
029C: MOVWF 14
029D: MOVLW 00
029E: BSF 03.5
029F: MOVWF 14
.................... setup_timer_0(RTCC_INTERNAL|RTCC_DIV_1);
02A0: MOVF 01,W
02A1: ANDLW C7
02A2: IORLW 08
02A3: MOVWF 01
.................... setup_timer_1(T1_DISABLED);
02A4: BCF 03.5
02A5: CLRF 10
.................... setup_timer_2(T2_DISABLED,0,1);
02A6: MOVLW 00
02A7: MOVWF 78
02A8: MOVWF 12
02A9: MOVLW 00
02A2: BCF 14.5
02A3: BCF 20.5
02A4: MOVF 20,W
02A5: BSF 03.5
02A6: MOVWF 07
02A7: BCF 03.5
02A8: BSF 20.4
02A9: MOVF 20,W
02AA: BSF 03.5
02AB: MOVWF 12
.................... setup_ccp1(CCP_OFF);
02AB: MOVWF 07
02AC: BCF 03.5
02AD: BSF 20.2
02AD: BCF 20.3
02AE: MOVF 20,W
02AF: BSF 03.5
02B0: MOVWF 07
02B1: BCF 03.5
02B2: CLRF 17
02B3: BSF 03.5
02B4: CLRF 1B
02B5: CLRF 1C
02B6: MOVLW 01
02B7: MOVWF 1D
02B1: MOVLW 01
02B2: BCF 03.5
02B3: MOVWF 14
02B4: MOVLW 00
02B5: BSF 03.5
02B6: MOVWF 14
.................... setup_timer_0(RTCC_INTERNAL|RTCC_DIV_1);
02B7: MOVF 01,W
02B8: ANDLW C7
02B9: IORLW 08
02BA: MOVWF 01
.................... setup_timer_1(T1_DISABLED);
02BB: BCF 03.5
02BC: CLRF 10
.................... setup_timer_2(T2_DISABLED,0,1);
02BD: MOVLW 00
02BE: MOVWF 78
02BF: MOVWF 12
02C0: MOVLW 00
02C1: BSF 03.5
02C2: MOVWF 12
.................... setup_ccp1(CCP_OFF);
02C3: BCF 03.5
02C4: BSF 20.2
02C5: MOVF 20,W
02C6: BSF 03.5
02C7: MOVWF 07
02C8: BCF 03.5
02C9: CLRF 17
02CA: BSF 03.5
02CB: CLRF 1B
02CC: CLRF 1C
02CD: MOVLW 01
02CE: MOVWF 1D
.................... setup_comparator(NC_NC_NC_NC);// This device COMP currently not supported by the PICWizard
02B8: BCF 03.5
02B9: BSF 03.6
02BA: CLRF 07
02BB: CLRF 08
02BC: CLRF 09
02CF: BCF 03.5
02D0: BSF 03.6
02D1: CLRF 07
02D2: CLRF 08
02D3: CLRF 09
....................
.................... printf("Magnetometr: \r\n",);
02D4: MOVLW 04
02D5: MOVWF 0D
02D6: MOVLW 00
02D7: MOVWF 0F
02D8: BCF 03.6
02D9: CALL 043
.................... printf("(c)mlab JACHO 2013: \r\n",);
02DA: MOVLW 0D
02DB: BSF 03.6
02DC: MOVWF 0D
02DD: MOVLW 00
02DE: MOVWF 0F
02DF: BCF 03.6
02E0: CALL 043
.................... printf("X, Y, Z \r\n",);
02E1: MOVLW 19
02E2: BSF 03.6
02E3: MOVWF 0D
02E4: MOVLW 00
02E5: MOVWF 0F
02E6: BCF 03.6
02E7: CALL 043
....................
....................
.................... // Init the HMC5883L. Set Mode register for
.................... // continuous measurements.
.................... hmc5883l_write_reg(HMC5883L_CFG_A_REG, 0x18); // no average, maximal update range
02BD: BCF 03.6
02BE: CLRF 37
02BF: MOVLW 18
02C0: MOVWF 38
02C1: CALL 069
02E8: CLRF 37
02E9: MOVLW 18
02EA: MOVWF 38
02EB: CALL 0D3
.................... hmc5883l_write_reg(HMC5883L_CFG_B_REG, 0xE0); // maximal range
02C2: MOVLW 01
02C3: MOVWF 37
02C4: MOVLW E0
02C5: MOVWF 38
02C6: CALL 069
02EC: MOVLW 01
02ED: MOVWF 37
02EE: MOVLW E0
02EF: MOVWF 38
02F0: CALL 0D3
.................... hmc5883l_write_reg(HMC5883L_MODE_REG, 0x00);
02C7: MOVLW 02
02C8: MOVWF 37
02C9: CLRF 38
02CA: CALL 069
02F1: MOVLW 02
02F2: MOVWF 37
02F3: CLRF 38
02F4: CALL 0D3
....................
.................... // Continuously read and display the x,y,z results.
.................... // Wait at least 67 ms between reads, re the HMC5883L data sheet.
....................
....................
.................... printf("Magnetometr: \r\n",);
02CB: MOVLW 04
02CC: BSF 03.6
02CD: MOVWF 0D
02CE: MOVLW 00
02CF: MOVWF 0F
02D0: BCF 03.6
02D1: CALL 0C5
.................... printf("(c)mlab JACHO 2013: \r\n",);
02D2: MOVLW 0D
02D3: BSF 03.6
02D4: MOVWF 0D
02D5: MOVLW 00
02D6: MOVWF 0F
02D7: BCF 03.6
02D8: CALL 0C5
.................... printf("X, Y, Z \r\n",);
02D9: MOVLW 19
02DA: BSF 03.6
02DB: MOVWF 0D
02DC: MOVLW 00
02DD: MOVWF 0F
02DE: BCF 03.6
02DF: CALL 0C5
....................
.................... /* while(true)
.................... {
.................... X = mag_readX();
.................... Y = mag_readY();
.................... Z = mag_readZ();
.................... printf("%4Ld %4Ld %4Ld \r\n", X, Y, Z);
.................... Delay_ms(50);
....................
.................... }
.................... */
....................
.................... while(TRUE)
.................... {
....................
.................... // for(i=0;i<=10;i++)
.................... // {
.................... hmc5883l_read_data();
02E0: GOTO 150
....................
.................... // b = atan2((float)compass.y,(float)compass.x); // vypocet azimutu z kartezskych souradnic
.................... // b = (b/3.141596)*180; // prevod na stupne
.................... // b += 180;
....................
.................... // anemo_speed += (b-last);
.................... // last=b;
.................... // delay_ms(10);
.................... // }
.................... // anemo_speed=anemo_speed/10;
....................
.................... printf("%6Ld %6Ld %6Ld \n\r", compass.x, compass.y, compass.z);
02E1: MOVLW 00
02E2: MOVWF 04
02E3: MOVF 22,W
02E4: MOVWF 38
02E5: MOVF 21,W
02E6: MOVWF 37
02E7: CALL 1CF
02E8: MOVLW 20
02E9: MOVWF 40
02EA: CALL 0A2
02EB: MOVLW 00
02EC: MOVWF 04
02ED: MOVF 24,W
02EE: MOVWF 38
02EF: MOVF 23,W
02F0: MOVWF 37
02F1: CALL 1CF
02F2: MOVLW 20
02F3: MOVWF 40
02F4: CALL 0A2
02F5: MOVLW 00
02F6: MOVWF 04
02F7: MOVF 26,W
02F8: MOVWF 38
02F9: MOVF 25,W
02FA: MOVWF 37
02FB: CALL 1CF
02FC: MOVLW 20
02FD: MOVWF 40
02FE: CALL 0A2
02FF: MOVLW 0A
0300: MOVWF 40
0301: CALL 0A2
0302: MOVLW 0D
0303: MOVWF 40
0304: CALL 0A2
.................... // delay_ms(100);
.................... hmc5883l_read_data();
02F5: GOTO 151
.................... printf("%6Ld %6Ld %6Ld \n\r", compass.x, compass.y, compass.z);
02F6: MOVLW 00
02F7: MOVWF 04
02F8: MOVF 22,W
02F9: MOVWF 38
02FA: MOVF 21,W
02FB: MOVWF 37
02FC: CALL 1D0
02FD: MOVLW 20
02FE: MOVWF 40
02FF: CALL 01F
0300: MOVLW 00
0301: MOVWF 04
0302: MOVF 24,W
0303: MOVWF 38
0304: MOVF 23,W
0305: MOVWF 37
0306: CALL 1D0
0307: MOVLW 20
0308: MOVWF 40
0309: CALL 01F
030A: MOVLW 00
030B: MOVWF 04
030C: MOVF 26,W
030D: MOVWF 38
030E: MOVF 25,W
030F: MOVWF 37
0310: CALL 1D0
0311: MOVLW 20
0312: MOVWF 40
0313: CALL 01F
0314: MOVLW 0A
0315: MOVWF 40
0316: CALL 01F
0317: MOVLW 0D
0318: MOVWF 40
0319: CALL 01F
.................... delay_ms(100);
031A: MOVLW 64
031B: MOVWF 37
031C: GOTO 250
.................... }
0305: GOTO 2E0
031D: GOTO 2F5
....................
.................... }
....................
....................
....................
0306: SLEEP
031E: SLEEP
 
Configuration Fuses:
Word 1: 2CF5 INTRC NOWDT NOPUT MCLR NOPROTECT NOCPD NOBROWNOUT IESO FCMEN NOLVP NODEBUG
/Modules/Sensors/MAG01A/SW/PIC16F887/main.pjt
17,11 → 17,12
0=0000 %S 0 0 796 451 3 0
[Opened Files]
1=main.c
2=HMC5883L.c
3=main.h
4=C:\Program Files (x86)\PICC\devices\16F887.h
5=HMC5883L.h
6=
2=
3=C:\Program Files (x86)\PICC\devices\16F887.h
4=HMC5883L.h
5=HMC5883L.c
6=C:\Program Files (x86)\PICC\drivers\math.h
7=
[Target Data]
OptionString=-p +FM
FileList=Z:\home\kaklik\svnMLAB\Modules\Sensors\MAG01A\SW\PIC16F887\main.c
/Modules/Sensors/MAG01A/SW/PIC16F887/main.sta
1,6 → 1,6
 
ROM used: 775 (9%)
775 (9%) including unused fragments
ROM used: 799 (10%)
799 (10%) including unused fragments
 
0 Average locations per line
3 Average locations per statement
12,45 → 12,46
 
Lines Stmts % Files
----- ----- --- -----
72 18 6 main.c
48 19 6 main.c
22 0 0 main.h
423 0 0 C:\Program Files (x86)\PICC\devices\16F887.h
19 0 0 HMC5883L.h
86 28 9 HMC5883L.c
25 0 0 HMC5883L.h
76 28 9 HMC5883L.c
2172 260 85 C:\Program Files (x86)\PICC\drivers\math.h
----- -----
2794 306 Total
2766 307 Total
 
Page ROM % RAM Vol Diff Functions:
---- --- --- --- --- ---- ----------
0 69 9 3 357 1.4 @I2C_READ_1
0 74 10 1 113 1.3 @I2C_WRITE_1
0 35 5 1 152 2.2 @PUTCHAR_1_
0 22 3 1 @delay_ms1
0 69 9 3 @I2C_READ_1
0 74 9 1 @I2C_WRITE_1
0 36 5 1 @PUTCHAR_1_
0 57 7 2 102 1.8 hmc5883l_write_reg
0 127 16 6 636 3.3 hmc5883l_read_data
0 184 24 16 693 3.9 MAIN
0 185 23 16 722 3.9 MAIN
0 9 1 0 @const237
0 70 9 3 @PSTRINGC7_69
0 12 2 0 @const239
0 6 1 0 @const240
0 128 17 9 @PRINTF_LD_69
0 128 16 9 @PRINTF_LD_69
 
Program metrics:
Functions 6
Statements 306
Comments 377
Volume (V) 2949
Difficilty (D) 13.9
Effort to implement (E) 40971
Time to implement (T) 38 minutes
Functions 3
Statements 307
Comments 358
Volume (V) 1829
Difficilty (D) 8.6
Effort to implement (E) 15712
Time to implement (T) 15 minutes
Est Delivered Bugs (B) 0
Cyclomatic Complexity 1
Maintainability (MI) 61
Maintainability (MI) 16
 
Segment Used Free
----------- ---- ----
00000-00003 4 0
00004-007FF 771 1273
00004-007FF 795 1249
00800-00FFF 0 2048
01000-017FF 0 2048
01800-01FFF 0 2048
/Modules/Sensors/MAG01A/SW/PIC16F887/main.sym
15,6 → 15,7
035-036 MAIN.i
037-038 @PRINTF_LD_69.P1
037 hmc5883l_write_reg.reg
037 @delay_ms1.P1
037 hmc5883l_read_data.x_lsb
037 @PSTRINGC7_69.@SCRATCH1
038 hmc5883l_read_data.x_msb
29,8 → 30,8
03B @PRINTF_LD_69.@SCRATCH3
03C hmc5883l_read_data.z_msb
03C @PRINTF_LD_69.@SCRATCH4
03D @I2C_WRITE_1.P1
03D @I2C_READ_1.P2
03D @I2C_READ_1.P1
03D @I2C_WRITE_1.P2
03D @PRINTF_LD_69.@SCRATCH5
03E @I2C_READ_1.@SCRATCH1
03E @PRINTF_LD_69.@SCRATCH6
44,23 → 45,23
07A @SCRATCH
107.6 C1OUT
108.6 C2OUT
10D-10E @READ_PROGRAM_MEMORY8.P1
10D-10E @WRITE_PROGRAM_MEMORY8.P2
10D-10E @WRITE_PROGRAM_MEMORY8.P1
10D-10E @READ_PROGRAM_MEMORY8.P2
 
ROM Allocation:
010B @I2C_READ_1
001F @I2C_WRITE_1
00A2 @PUTCHAR_1_
0069 hmc5883l_write_reg
0150 hmc5883l_read_data
0800 atan2
024F MAIN
0250 @delay_ms1
010C @I2C_READ_1
0089 @I2C_WRITE_1
001F @PUTCHAR_1_
00D3 hmc5883l_write_reg
0151 hmc5883l_read_data
0266 MAIN
0004 @const237
00C5 @PSTRINGC7_69
0043 @PSTRINGC7_69
000D @const239
0019 @const240
01CF @PRINTF_LD_69
024F @cinit
01D0 @PRINTF_LD_69
0266 @cinit
 
 
User Memory space:
/Modules/Sensors/MAG01A/SW/PIC16F887/main.tre
1,6 → 1,15
ÀÄmain
ÀÄMAIN 0/184 Ram=16
ÀÄMAIN 0/185 Ram=16
ÃÄ??0??
ÃÄ@PSTRINGC7_69 0/70 Ram=3
³ ÃÄ@PUTCHAR_1_ 0/36 Ram=1
³ ÀÄ@PUTCHAR_1_ 0/36 Ram=1
ÃÄ@PSTRINGC7_69 0/70 Ram=3
³ ÃÄ@PUTCHAR_1_ 0/36 Ram=1
³ ÀÄ@PUTCHAR_1_ 0/36 Ram=1
ÃÄ@PSTRINGC7_69 0/70 Ram=3
³ ÃÄ@PUTCHAR_1_ 0/36 Ram=1
³ ÀÄ@PUTCHAR_1_ 0/36 Ram=1
ÃÄhmc5883l_write_reg 0/57 Ram=2
³ ÃÄ@I2C_WRITE_1 0/74 Ram=1
³ ÃÄ@I2C_WRITE_1 0/74 Ram=1
13,15 → 22,6
³ ÃÄ@I2C_WRITE_1 0/74 Ram=1
³ ÃÄ@I2C_WRITE_1 0/74 Ram=1
³ ÀÄ@I2C_WRITE_1 0/74 Ram=1
ÃÄ@PSTRINGC7_69 0/70 Ram=3
³ ÃÄ@PUTCHAR_1_ 0/35 Ram=1
³ ÀÄ@PUTCHAR_1_ 0/35 Ram=1
ÃÄ@PSTRINGC7_69 0/70 Ram=3
³ ÃÄ@PUTCHAR_1_ 0/35 Ram=1
³ ÀÄ@PUTCHAR_1_ 0/35 Ram=1
ÃÄ@PSTRINGC7_69 0/70 Ram=3
³ ÃÄ@PUTCHAR_1_ 0/35 Ram=1
³ ÀÄ@PUTCHAR_1_ 0/35 Ram=1
ÃÄhmc5883l_read_data 0/127 Ram=6
³ ÃÄ@I2C_WRITE_1 0/74 Ram=1
³ ÃÄ@I2C_WRITE_1 0/74 Ram=1
33,13 → 33,14
³ ÃÄ@I2C_READ_1 0/69 Ram=3
³ ÀÄ@I2C_READ_1 0/69 Ram=3
ÃÄ@PRINTF_LD_69 0/128 Ram=9
³ ÀÄ@PUTCHAR_1_ 0/35 Ram=1
ÃÄ@PUTCHAR_1_ 0/35 Ram=1
³ ÀÄ@PUTCHAR_1_ 0/36 Ram=1
ÃÄ@PUTCHAR_1_ 0/36 Ram=1
ÃÄ@PRINTF_LD_69 0/128 Ram=9
³ ÀÄ@PUTCHAR_1_ 0/35 Ram=1
ÃÄ@PUTCHAR_1_ 0/35 Ram=1
³ ÀÄ@PUTCHAR_1_ 0/36 Ram=1
ÃÄ@PUTCHAR_1_ 0/36 Ram=1
ÃÄ@PRINTF_LD_69 0/128 Ram=9
³ ÀÄ@PUTCHAR_1_ 0/35 Ram=1
ÃÄ@PUTCHAR_1_ 0/35 Ram=1
ÃÄ@PUTCHAR_1_ 0/35 Ram=1
ÀÄ@PUTCHAR_1_ 0/35 Ram=1
³ ÀÄ@PUTCHAR_1_ 0/36 Ram=1
ÃÄ@PUTCHAR_1_ 0/36 Ram=1
ÃÄ@PUTCHAR_1_ 0/36 Ram=1
ÃÄ@PUTCHAR_1_ 0/36 Ram=1
ÀÄ@delay_ms1 0/22 Ram=1