/Designs/MRAKOMER2/SW/Ondrejov/motor/irmrak.c
48,7 → 48,7
{
output_B(0); // vypnuti motoru
printf("E"); // Hlasime chybu
err=0;
reset_cpu();
}
};
delay_ms(500); // cas na ustaleni trubky
58,9 → 58,9
// --- Najeti na vychozi polohu dole ---
void nula()
{
port=0b10100000; // vychozi nastaveni fazi pro rizeni motoru
port=0b10010000; // vychozi nastaveni fazi pro rizeni motoru
output_B(port);
j=0; // smer dolu
j=1; // smer dolu
delay_ms(500);
}
 
68,26 → 68,25
//------------------------------------------------
void main()
{
setup_oscillator(OSC_8MHZ|OSC_INTRC); // 8 MHz interni RC oscilator
 
setup_adc_ports(NO_ANALOGS|VSS_VDD);
setup_adc(ADC_OFF);
setup_spi(FALSE);
setup_timer_0(RTCC_INTERNAL|RTCC_DIV_1);
setup_spi(SPI_SS_DISABLED);
setup_timer_0(RTCC_INTERNAL|RTCC_DIV_1);
setup_timer_1(T1_DISABLED);
setup_timer_2(T2_DISABLED,0,1);
setup_ccp1(CCP_OFF);
setup_comparator(NC_NC_NC_NC);
setup_vref(FALSE);
setup_comparator(NC_NC_NC_NC);
setup_vref(FALSE);
setup_oscillator(OSC_8MHZ|OSC_INTRC);
 
output_B(0); // vypnuti motoru a topeni
set_tris_B(0b00000111); // faze a topeni jako vystupy
 
 
nula();
dolu(); // otoc trubku do vychozi pozice dolu
while(true)
{
nula();
dolu(); // otoc trubku do vychozi pozice dolu
 
CREN=0; CREN=1; // Reinitialise USART
 
while(!kbhit())
107,13 → 106,13
 
krok(18);
printf("A"); // mereni teploty 45° nad obzorem
delay_ms(200);
delay_ms(300);
krok(7);
printf("B"); // mereni teploty v zenitu
delay_ms(200);
delay_ms(300);
krok(7);
printf("C"); // mereni teploty 45° nad obzorem na druhou stranu
delay_ms(200);
delay_ms(300);
 
j++; // reverz
dolu();
124,11 → 123,11
if ('i'==uhel) {printf("I"); continue;} // Predani prikazu pro Info
if ('h'==uhel) {printf("H"); continue;} // Predani prikazu pro Topeni
if ('c'==uhel) {printf("C"); continue;} // Predani prikazu pro vypnuti topeni
if ('f'==uhel) {printf("F"); continue;} // Predani prikazu pro vypnuti topeni
if ('x'==uhel) // Zjisteni verze FW
{
printf("Mrakomer - Motor V%s (C) 2006 KAKL\n\r", VER);
printf("%s\n\r", REV);
printf("%s\r\n", REV);
}
 
if ((uhel>='0') && (uhel<='@')) // mereni v pozadovanem uhlu [0..;]=(0..11)
147,7 → 146,7
krok(2);
};
printf("S");
delay_ms(200);
delay_ms(300);
 
j++; // reverz
dolu();
/Designs/MRAKOMER2/SW/Ondrejov/motor/irmrak.h
1,6 → 1,6
#include <16F88.h>
#device adc=8
#fuses NOWDT,INTRC_IO, NOPUT, NOMCLR, NOBROWNOUT, NOLVP, NOCPD, NOWRT, NODEBUG, NOPROTECT, NOFCMEN, NOIESO, CCPB3
#fuses NOWDT,INTRC_IO, NOPUT, MCLR, NOBROWNOUT, NOLVP, NOCPD, NOWRT, NODEBUG, NOPROTECT, NOFCMEN, NOIESO
#use delay(clock=8000000)
#use rs232(baud=2400,parity=N,xmit=PIN_A6,rcv=PIN_A7,bits=8)
 
/Designs/MRAKOMER2/SW/Ondrejov/motor/irmrak.hex
1,84 → 1,88
:1000000001308A00392900004D39E135EF36653974
:1000000001308A003B2900004D39E135EF36653972
:10001000A016A0266F3A6F392010D6127310A821AF
:1000200029103218301BA025C1254C050D005E306B
:1000300084008313000803192A280230F800F7010E
:10004000F70B2028F80B1F289730F700F70B26280E
:10005000800B1D280800A030D8008316860183126B
:1000600058088600D9010230DC00FA30DE00172083
:10007000DC0B352808005D08DD03003A031954281D
:1000800059080139013C031D4828C030D8064A28C8
:100090003030D80683168601831258088600143043
:1000A000DE001720D90A3B280800831605138312A7
:1000B00005130830F8005C280000F8176D28F813C5
:1000C000E00C03180517031C051378176D28781327
:1000D000F80B60286B28000005170130F700840139
:1000E000840B7028F70B6F280E308400840B762861
:1000F0000000F81B5F28781B67280800DC018316C6
:1001000005168312051A95280130DD003B20DC0A14
:100110005C08283C031D94288316860183128601FF
:100120004530E0005520DC017F280230DD00FA3048
:10013000DE001720DD0B97288316860183128601C7
:1001400008000408F800831685178312851BA6286B
:100150000830F700DC01F717BD28F713BD2803109E
:10016000851B0314DC0C7717BD287713F70BAF281A
:10017000780884005C08F800D22801308400003040
:10018000F71B5530F800F80BC328840BBF280D303F
:10019000F71B0330F800F80BCB28F71BAD28771BB3
:1001A000B528AF288A11EA29831603178C170C1477
:1001B000000000000318032983120C087F39031381
:1001C000DD0003170D080313DE0003170F080313E8
:1001D000DF005D08E00055205E0803178D00031363
:1001E0005F0803178F0083168C170C1400000000A3
:1001F00083120313DC0BFD28002983160317032940
:1002000022298316031783120C0D0E0D7F39031359
:10021000DD0003170D080313DE0003170F08031397
:10022000DF005D08E00055205E0803178D00031312
:100230005F0803178F008D0A03198F0A0310031339
:10024000DC0BD4280800800803193829DD010408D4
:10025000DC005D10831B5D140008E00055205C0885
:10026000840083135D188317840A0319850A2329E0
:100270000800840183131F308305723083168F00BA
:100280000F0805138312051783161F129F121B08F0
:1002900080399B0007309C008312A001A1013330FC
:1002A000A2002E30A3003030A400A5012430A60007
:1002B0004930A7006430A8003A30A9002030AA00D5
:1002C0006930AB007230AC006D30AD007230AE0002
:1002D0006130AF006B30B0002E30B1006330B2003F
:1002E0002030B3003430B4003230B5003030B600C6
:1002F0002030B7003230B8003030B900BA003630A4
:10030000BB002D30BC003130BD003230BE002D307E
:10031000BF003230C0003930C1002030C20032305E
:10032000C3003130C4003A30C5003430C600333029
:10033000C7003A30C8003130C900CA005A30CB007B
:100340002030CC006B30CD006130CE006B30CF0060
:100350006C30D0002030D1002430D200D301723074
:1003600083168F000F081F129F121B0880399B00F5
:1003700083121F10940183160108C73908388100C1
:100380008312900183168615831297010730831616
:100390009C00050885000630F700F70BCD2900000A
:1003A0001C0883120D1383169D018601831286019A
:1003B00007308316860083122B207E201812181611
:1003C000851FE929831605168312051AE8297E2060
:1003D000E029A1287808DA005A086D3C031D132A89
:1003E0002B20D90A1230DD003B204130E00055209F
:1003F000C830DE0017200730DD003B204230E0002F
:100400005520C830DE0017200730DD003B20433088
:10041000E0005520C830DE001720D90A7E20473082
:10042000E0005520DC295A08693C031D1B2A49308D
:10043000E0005520DC295A08683C031D232A483077
:10044000E0005520DC295A08633C031D2B2A433069
:10045000E0005520DC295A08783C031D512A04305D
:1004600003178D0000308F00031013300313DC00DE
:10047000D42022308400831323210E3003178D00F3
:1004800000308F00031410300313DC00D42026301A
:100490008400831323210A30E00055200D30E00052
:1004A00055205A082F3C03185B2A5A08403C031C6D
:1004B0005B2A3030DA025A080B3C031CDC292B2063
:1004C000D90A0C30DD003B20DB015A085B0203181F
:1004D0006E2A0230DD003B20DB0A652A5330E00043
:1004E0005520C830DE001720D90A7E204730E000B2
:0604F0005520DC29630029
:04400E00182FFC3F2C
:10005000800B1D2808009030D8008316860183127B
:10006000580886000130D9000230DC00FA30DE008A
:100070001720DC0B362808005D08DD03003A031961
:10008000552859080139013C031D4928C030D806BC
:100090004B283030D8068316860183125808860014
:1000A0001430DE001720D90A3C28080083160513F7
:1000B000831205130830F8005D280000F8176E2839
:1000C000F813E00C03180517031C051378176E28A6
:1000D0007813F80B61286C28000005170130F70031
:1000E0008401840B7128F70B70280E308400840B78
:1000F00077280000F81B6028781B68280800DC01BE
:10010000831605168312051A97280130DD003C205E
:10011000DC0A5C08283C031D96288316860183129E
:1001200086014530E00056208A01002880280230F0
:10013000DD00FA30DE001720DD0B992883168601DA
:100140008312860108000408F800831685178312BD
:10015000851BA8280830F700DC01F717BF28F71324
:10016000BF280310851B0314DC0C7717BF287713F7
:10017000F70BB128780884005C08F800D428013017
:1001800084000030F71B5530F800F80BC528840BAD
:10019000C1280D30F71B0330F800F80BCD28F71BF2
:1001A000AF28771BB728B1288A11FA2983160317BD
:1001B0008C170C14000000000318052983120C088A
:1001C0007F390313DD0003170D080313DE00031747
:1001D0000F080313DF005D08E00056205E080317D8
:1001E0008D0003135F0803178F0083168C170C1400
:1001F0000000000083120313DC0BFF280229831682
:100200000317052924298316031783120C0D0E0DDD
:100210007F390313DD0003170D080313DE000317F6
:100220000F080313DF005D08E00056205E08031787
:100230008D0003135F0803178F008D0A03198F0ABF
:1002400003100313DC0BD6280800800803193A2991
:10025000DD010408DC005D10831B5D140008E00074
:1002600056205C08840083135D188317840A0319E1
:10027000850A25290800840183131F308305723005
:1002800083168F000F0805138312051783161F129C
:100290009F121B0880399B0007309C008312A0012D
:1002A000A1013330A2002E30A3003030A400A501FC
:1002B0002430A6004930A7006430A8003A30A900D5
:1002C0002030AA006930AB007230AC006D30AD0058
:1002D0007230AE006130AF006B30B0002E30B10034
:1002E0006330B2002030B3003430B4003230B50097
:1002F0003030B6002030B7003230B8003030B900AE
:10030000BA003630BB002D30BC003130BD00323079
:10031000BE002D30BF003230C0003930C100203067
:10032000C2003230C3003130C4003A30C50034302E
:10033000C6003330C7003A30C8003130C900CA00A7
:100340005A30CB002030CC006B30CD006130CE0075
:100350006B30CF006C30D0002030D1002430D20080
:10036000D30183161F129F121B0880399B00831232
:100370001F10941283160611861406120130831280
:1003800094000030831694000108C73908388100B2
:10039000831290010030F800920000308316920022
:1003A000061483129701073083169C000508850008
:1003B0000630F700F70BDA2900001C0883120D1332
:1003C00083169D0172308F000F088601831286010B
:1003D00007308316860083122B207F2018121816F0
:1003E000851FF929831605168312051AF8297F201F
:1003F000F029A3287808DA005A086D3C031D2F2A3B
:100400002B20D90A1230DD003C204130E00056207C
:100410000230DC009630DE001720DC0B0A2A0730A1
:10042000DD003C204230E00056200230DC009630F7
:10043000DE001720DC0B172A0730DD003C2043309C
:10044000E00056200230DC009630DE001720DC0B86
:10045000242AD90A7F204730E0005620EE295A0886
:10046000693C031D372A4930E0005620EE295A081E
:10047000683C031D3F2A4830E0005620EE295A0808
:10048000663C031D472A4630E0005620EE295A08F4
:10049000783C031D6D2A043003178D0000308F0057
:1004A000031013300313DC00D620223084008313A2
:1004B00025210E3003178D0000308F0003141030FB
:1004C0000313DC00D62026308400831325210D3051
:1004D000E00056200A30E00056205A082F3C03184E
:1004E000772A5A08403C031C772A3030DA025A082F
:1004F0000B3C031CEE292B20D90A0C30DD003C20DC
:10050000DB015A085B0203188A2A0230DD003C2016
:10051000DB0A812A5330E00056200230DC0096309E
:10052000DE001720DC0B8F2AD90A7F204730E0003D
:060530005620EE296300D5
:04400E00383FFC3FFC
:00000001FF
;PIC16F88
;CRC=345C CREATED="20-VIII-10 19:02"
;CRC=2D65 CREATED="22-VIII-10 09:57"
/Designs/MRAKOMER2/SW/Ondrejov/teplomer/irmrak4.c
13,8 → 13,8
 
#CASE // Case sensitive compiler
 
#define MAXHEAT 30 // Doba po kterou se topi v [s]
#define HEATING PIN_B3 // Heating for defrosting
#define MAXHEAT 20 // Doba po kterou se topi v [s]
#define HEATING PIN_A2 // Heating for defrosting
 
char VER[4]=VERSION; // Buffer for concatenate of a version string
 
33,16 → 33,16
char REV[50]=ID; // Buffer for concatenate of a version string
 
if (REV[strlen(REV)-1]=='$') REV[strlen(REV)-1]=0;
printf("\n\r\n\r# Mrakomer %s (C) 2007 KAKL\n\r",VER); // Welcome message
printf("\n\r\n\r# Mrakomer %s (C) 2007-2010 KAKL\n\r",VER); // Welcome message
printf("#%s\n\r",&REV[4]);
printf("#\n\r");
printf("# h - Switch On Heating for 30s.\n\r");
printf("# h - Switch On Heating for 20s.\n\r");
printf("# f - Freezing. Switch Off Heating.\n\r");
printf("# i - Print this Information.\n\r");
printf("# 0..9 - Single measure at given angle.\n\r");
printf("# m - Measure at three space points.\n\r");
printf("#\n\r");
printf("$<Angle> <Ambient Temperature> <Space Temperature> ...");
printf("$<Angle> <Ambient Temperature> <Space Temperature> ... <H> <Heating>");
printf("\n\r\n\r");
//---WDT
restart_wdt();
/Designs/MRAKOMER2/SW/Ondrejov/teplomer/irmrak4.hex
1,182 → 1,184
:1000000004308A008D2C00008A068A0623104D39A0
:1000000004308A00972C00008A068A0623104D3996
:10001000E135EF366539A0127310A8212910321886
:10002000B01BA025C1254C050D0023106810201021
:10003000A016A029F734F43168104F372024E5309A
:10004000F434EE3320336F39A019B0392E050D008A
:10005000231066102010A0162023F232653D693768
:100060006717A029F734F43168104F336610C8328F
:10007000613A693767178A0600012310691020105A
:10008000A0162028F2346E3A203AE834731049372B
:10009000E637F236613AE9376E178A060001231017
:1000A0003017AE1CA016A029693767366510ED32EF
:1000B000E13975396510613AA033693B6537A03085
:1000C000EE33EC322E050D0023106D102010A0161B
:1000D000A026E530F33AF232A03074107434F232D4
:1000E00065107338E1316510F0376937F4392E0542
:1000F0000D00241E41376736651F201EC136E234CD
:1001000065377410D4326D386539613A7539651FB9
:10011000201E5338E1316510D4326D386539613AAB
:100120007539651F20172E1700018A068A06000000
:1001300033308400831300080319AB280230F80021
:10014000F701F70BA128F80BA0289730F700F70B61
:10015000A728800B9E2808006508E7006408E600D1
:100160006708FA006608840083137A1883178008EA
:100170000319BE28E60A0319E70AB02864086602D4
:10018000F7006708FA006508031C650FFA02770894
:10019000F8000800831603178C170C1400000000E9
:1001A0000318FA2883120C087F390313E50003179C
:1001B0000D080313E60003170F080313E700650893
:1001C0000C1EE0289900660803178D0003136708CA
:1001D00003178F0083168C170C1400000000831285
:1001E0000313E40BF428F72883160317FA281A29B7
:1001F0008316031783120C0D0E0D7F390313E500D0
:1002000003170D080313E60003170F080313E70095
:1002100065080C1E09299900660803178D00031351
:10022000670803178F008D0A03198F0A0310031341
:10023000E40BCA280800800803193129E5010408E5
:10024000E4006510831B651400080C1E2529990025
:1002500064088400831365188317840A0319850AC8
:100260001B290800831603178C170C1400000000CC
:1002700083120C087F39031978290313E40003174C
:100280000D080313E50003170F080313E6006408C5
:100290000C1E48299900650803178D000313660892
:1002A00003178F0083168C170C14000000008312B4
:1002B0000C0D0E0D7F39031978290313E400031781
:1002C0000D080313E50003170F080313E600640885
:1002D0000C1E68299900650803178D000313660832
:1002E00003178F008D0A03198F0A0313322903178E
:1002F000031308002430B2004930B3006430B40066
:100300003A30B5002030B6006930B7007230B8001E
:100310006D30B9007230BA006130BB006B30BC0088
:100320003430BD002E30BE006330BF002030C0002E
:100330003130C1003330C2003030C3003630C40029
:100340002030C5003230C6003030C700C800393018
:10035000C9002D30CA003030CB003130CC002D30F8
:10036000CD003130CE003730CF002030D0003130DA
:10037000D1003230D2003A30D3003230D4003530A0
:10038000D5003A30D6003430D7003030D8005A305B
:10039000D9002030DA006B30DB006130DC006B30DC
:1003A000DD006C30DE002030DF002430E000E101B1
:1003B000E5013230E400AC2001307802323E8400A6
:1003C00083130008243C031DEF29E5013230E400CB
:1003D000AC2001307802323E840083138001043067
:1003E00003178D0000308F0003100F300313E4005B
:1003F000CA202230840083131B210C3003178D0088
:1004000000308F00031410300313E400CA2023309F
:100410000C1E082A99003630840083131B210A30F1
:100420000C1E102A99000D300C1E142A990023303E
:100430000C1E182A99000A300C1E1C2A99000D3037
:100440000C1E202A9900153003178D0000308F00F4
:1004500003133221283003178D0000308F0003135F
:1004600032213D3003178D0000308F0003133221FD
:100470004F3003178D0000308F000313322164309A
:1004800003178D0000308F000313322123300C1E20
:10049000472A99000A300C1E4B2A99000D300C1E79
:1004A0004F2A9900793003178D0000308F00031315
:1004B0003221953003178D0000308F000313322155
:1004C00064000800831686140610831206100D308F
:1004D000F700F70B692A83168610831286100D30F9
:1004E000F700F70B712A831606140D30F700F70B8F
:1004F000772A861483120800831686140D30F700BD
:10050000F70B802A06140D30F700F70B852A8610AA
:10051000831286100D30F700F70B8C2A8316061015
:10052000831206100D30F700F70B942A0800C2085A
:10053000031D9F2A8316861083128610A22A831613
:1005400086148312A32AA42AA52A831606141A3015
:10055000F700F70BA92A0000061083120610B02A34
:100560004230F700F70BB22A0000B62A08008316C3
:10057000861406141A30F700F70BBC2A0000861404
:100580008312861CC62A0130C200C72AC201831604
:10059000061083120610CC2A4230F700F70BCE2A41
:1005A0000000D22A4208F80008000830BF00BF0847
:1005B0000319E72ABE1FDF2A0130C100E02AC1016A
:1005C0004108C20097220310BE0DBF03D72AB722ED
:1005D0007808C0004008F80008000830BF00BF08D5
:1005E0000319FF2AB722F8080319FA2A0310BE0DCF
:1005F0003E14FD2A0310BE0D3E10BF03EF2A3D0836
:10060000C20097223E08F80008000310B20D6222D3
:100610007C223208BE00D5223308BD00BE00D522A0
:100620007C223208BE00D522BD01ED227808B6003A
:10063000BD01ED227808B5003508BC003608BB00C6
:100640000130BD00ED227808BA0062223208B900FC
:100650003308B8003208B700B401BE013430BD0021
:100660002F30C500C401C301C201C1010130C00067
:100670000730BF002F30C500C6010530C700C801D4
:1006800047083D07840083133E1883170008CA00FB
:100690008030F7004808F8000319522B0310F70CBC
:1006A000F80B4E2B77084A05031D642BC708031966
:1006B000642BC5034808063C031C602BC80A622B48
:1006C000C801C703632B402B08304502C600C6088B
:1006D0000319902B0530C700470F6F2B8D2B01306E
:1006E00047023F3E84008313801F7C2BC7080319F9
:1006F0007C2B0130C9007D2BC9013F3047078400A6
:1007000083130310000D80003F30470784008313DC
:10071000490800078000C7036C2BC6038F2B672B8B
:10072000C7014708053C031CB32B47083D07F800E9
:100730003E08FA000318FA0A7808840083137A182E
:1007400083170008CC003F3047078400831300085C
:100750004C06CC007808840083137A1883174C0861
:100760008000C70A912B4508083C031C322B3D082A
:10077000840083133E1883170008F80078083A02B3
:100780000319C42BBC01BB013B08F8003C08F9006D
:100790000800BA010408B9003A10831B3A14B31FC9
:1007A000D92BB917391EB90AB209B309B20A03190C
:1007B000B30A330EF038B500B507E23EB600323E5C
:1007C000B80033080F39B607B607B807E93EB700D7
:1007D000B707B707320E0F39B707B807B70DB80D0F
:1007E000B809B80D32080F39B807B50D0730B40095
:1007F0000A30B807B703031CF92BB707B603031C6D
:10080000FD2BB607B503031C012CB507B403031C6D
:10081000052C3430840083130730390539138403E1
:100820003905031D1A2C391A840A391A1A2C20305A
:10083000F700372C840738300402031939170008F1
:10084000F700031D2B2C391B2B2C391A3B2CB91903
:100850002B2C2030362CB91F332C2D30F70084037D
:100860003913B913372CB91539123030F707770817
:100870000C1E382C9900840A391F1B2C08003508DF
:10088000F80134020318472C3408F700532CF70101
:100890000830B600B40DF70D350877020318F700DD
:1008A000F80DB60B4A2C080078083208B400643002
:1008B000B5003F247708B20078083030031D672C5C
:1008C000B31C6F2CB3196F2C331A20306A2CB31160
:1008D00033123314F80778080C1E6C2C9900320878
:1008E000B4000A30B5003F247708B20078083030F1
:1008F000031D802CB319852C331C852C331A203012
:10090000F80778080C1E822C99003030B2073208A4
:100910000C1E882C99008A115F2D840183131F30CF
:100920008305723083168F000F0833309900A23090
:10093000980090308312980083161F129F121B0894
:1009400080399B0007309C008312A001A101323046
:10095000A2002E30A3003230A400A5018316861118
:10096000831286110230B200FA30B3009820B20B25
:10097000B42C6400A601A801A7017A21B2010630B7
:10098000B30005237908AC007808AB00B20107304A
:10099000B30005237908AA007808A9000230B20044
:1009A000FA30B3009820B20BD02C64008C1E672D57
:1009B0008C1ED82C1A08B10018121816B201063075
:1009C000B30005237908AC007808AB00B20107300A
:1009D000B30005237908AA007808A90003102B0D9D
:1009E000B2002C0DB300B3303202F7003308FA0026
:1009F0006A30031C6B30FA027708AD007A08AE004B
:100A00000310290DB2002A0DB300B3303202F700F3
:100A10003308FA006A30031C6B30FA027708AF0023
:100A20007A08B0003108483A03191D2D0E3A03190F
:100A3000202D0F3A0319222D242D1E30A600242D1F
:100A4000A601242D7A21242D31080C1E252D990074
:100A500020300C1E292D9900103084002E08B30080
:100A60002D08B200C92320300C1E342D99001030FF
:100A700084003008B3002F08B200C92320300C1EB8
:100A80003F2D99003108413C0319672D3108423C44
:100A90000319672D3108433C0319672D3108533C76
:100AA0000319672D48300C1E532D990020300C1E61
:100AB000572D99002608B2001B30B300542C0D307E
:100AC0000C1E602D99000A300C1E642D9900013017
:100AD000B3009820A708031D702DA8080319752DD1
:100AE00027080319A803A703792D0330A800E830CD
:100AF000A700A6080319892D2708E83C031D842DAB
:100B00002808033C0319A603831686118312861551
:0E0B10008D2D8316861183128611D52C63005D
:10002000B01B2D19B0183010CB204B268A060000CB
:10003000231068102010A016A029F734F43168109E
:100040004F372024E530F434EE3320336F39201954
:10005000B0392E050D00231066102010A0162023A5
:10006000F232653D69376717A029F734F43168101B
:100070004F336610C832613A693767178A06000144
:10008000231069102010A0162028F2346E3A203A6E
:10009000E83473104937E637F236613AE9376E17BC
:1000A0008A06000123103017AE1CA016A02969375C
:1000B00067366510ED32E13975396510613AA03364
:1000C000693B6537A030EE33EC322E050D0023106E
:1000D0006D102010A016A026E530F33AF232A030C1
:1000E00074107434F23265107338E1316510F037F2
:1000F0006937F4392E050D00241E41376736651F18
:10010000201EC136E23465377410D4326D3865393B
:10011000613A7539651F201E5338E1316510D432BC
:100120006D386539613A7539651F20172E17201E05
:10013000481F201EC832613A6937671F00018A06CE
:100140008A06000033308400831300080319B528A1
:100150000230F800F701F70BAB28F80BAA2897300C
:10016000F700F70BB128800BA82808006508E70006
:100170006408E6006708FA006608840083137A18AA
:10018000831780080319C828E60A0319E70ABA2862
:1001900064086602F7006708FA006508031C650F2B
:1001A000FA027708F8000800831603178C170C145E
:1001B000000000000318042983120C087F39031380
:1001C000E50003170D080313E60003170F080313D8
:1001D000E70065080C1EEA289900660803178D00E1
:1001E0000313670803178F0083168C170C14000085
:1001F000000083120313E40BFE2801298316031762
:10020000042924298316031783120C0D0E0D7F3940
:100210000313E50003170D080313E60003170F0887
:100220000313E70065080C1E1329990066080317DD
:100230008D000313670803178F008D0A03198F0AB7
:1002400003100313E40BD4280800800803193B298A
:10025000E5010408E4006510831B651400080C1E0A
:100260002F29990064088400831365188317840A72
:100270000319850A25290800831603178C170C1407
:100280000000000083120C087F3903198229031330
:10029000E40003170D080313E50003170F08031309
:1002A000E60064080C1E52299900650803178D00AA
:1002B0000313660803178F0083168C170C140000B5
:1002C000000083120C0D0E0D7F39031982290313D0
:1002D000E40003170D080313E50003170F080313C9
:1002E000E60064080C1E72299900650803178D004A
:1002F0000313660803178F008D0A03198F0A03136F
:100300003C290317031308002430B2004930B3001E
:100310006430B4003A30B5002030B6006930B70020
:100320007230B8006D30B9007230BA006130BB0075
:100330006B30BC003430BD002E30BE006330BF00D7
:100340002030C0003130C1003330C2003030C30033
:100350003630C4002030C5003230C6003030C7000F
:10036000C8003930C9002D30CA003030CB003130E0
:10037000CC002D30CD003130CE003730CF002030D2
:10038000D0003130D1003230D2003A30D300323098
:10039000D4003530D5003A30D6003430D700303074
:1003A000D8005A30D9002030DA006B30DB006130E1
:1003B000DC006B30DD006C30DE002030DF002430EC
:1003C000E000E101E5013230E400B62001307802BE
:1003D000323E840083130008243C031DF929E50103
:1003E0003230E400B62001307802323E84008313BC
:1003F0008001043003178D0000308F0003100F3090
:100400000313E400D42022308400831325210C3010
:1004100003178D0000308F00031415300313E40020
:10042000D42023300C1E122A990036308400831306
:1004300025210A300C1E1A2A99000D300C1E1E2A86
:10044000990023300C1E222A99000A300C1E262AFD
:1004500099000D300C1E2A2A9900183003178D00C0
:1004600000308F0003133C212B3003178D00003028
:100470008F0003133C21403003178D0000308F00A4
:1004800003133C21523003178D0000308F000313FB
:100490003C21673003178D0000308F0003133C218F
:1004A00023300C1E512A99000A300C1E552A99003F
:1004B0000D300C1E592A99007C3003178D00003036
:1004C0008F0003133C219F3003178D0000308F00F5
:1004D00003133C216400080083168614061283125D
:1004E00006120D30F700F70B732A8316861083125D
:1004F00086100D30F700F70B7B2A831606160D3099
:10050000F700F70B812A86148312080083168614DD
:100510000D30F700F70B8A2A06160D30F700F70B9F
:100520008F2A8610831286100D30F700F70B962A5B
:1005300083160612831206120D30F700F70B9E2A5F
:100540000800C208031DA92A83168610831286108C
:10055000AC2A831686148312AD2AAE2AAF2A8316DC
:1005600006161A30F700F70BB32A000006128312A2
:100570000612BA2A4230F700F70BBC2A0000C02A44
:1005800008008316861406161A30F700F70BC62AE1
:10059000000086148312861CD02A0130C200D12AA2
:1005A000C2018316061283120612D62A4230F700C1
:1005B000F70BD82A0000DC2A4208F80008000830AF
:1005C000BF00BF080319F12ABE1FE92A0130C1008C
:1005D000EA2AC1014108C200A1220310BE0DBF03D7
:1005E000E12AC1227808C0004008F800080008305D
:1005F000BF00BF080319092BC122F8080319042BF7
:100600000310BE0D3E14072B0310BE0D3E10BF039A
:10061000F92A3D08C200A1223E08F8000800031094
:10062000B20D6C2286223208BE00DF223308BD00E4
:10063000BE00DF2286223208BE00DF22BD01F72283
:100640007808B600BD01F7227808B5003508BC006F
:100650003608BB000130BD00F7227808BA006C22D2
:100660003208B9003308B8003208B700B401BE013F
:100670003430BD002F30C500C401C301C201C10127
:100680000130C0000730BF002F30C500C601053063
:10069000C700C80147083D07840083133E1883172D
:1006A0000008CA008030F7004808F80003195C2BE6
:1006B0000310F70CF80B582B77084A05031D6E2B17
:1006C000C70803196E2BC5034808063C031C6A2B98
:1006D000C80A6C2BC801C7036D2B4A2B0830450292
:1006E000C600C60803199A2B0530C700470F792B9F
:1006F000972B013047023F3E84008313801F862BD7
:10070000C7080319862B0130C900872BC9013F3068
:100710004707840083130310000D80003F30470714
:1007200084008313490800078000C703762BC603A3
:10073000992B712BC7014708053C031CBD2B4708AB
:100740003D07F8003E08FA000318FA0A780884000A
:1007500083137A1883170008CC003F3047078400C2
:10076000831300084C06CC007808840083137A18A1
:1007700083174C088000C70A9B2B4508083C031CC4
:100780003C2B3D08840083133E1883170008F800B3
:1007900078083A020319CE2BBC01BB013B08F800D4
:1007A0003C08F9000800BA010408B9003A10831B9C
:1007B0003A14B31FE32BB917391EB90AB209B309AA
:1007C000B20A0319B30A330EF038B500B507E23E9A
:1007D000B600323EB80033080F39B607B607B8077F
:1007E000E93EB700B707B707320E0F39B707B807AA
:1007F000B70DB80DB809B80D32080F39B807B50DE7
:100800000730B4000A30B807B703031C032CB7073E
:10081000B603031C072CB607B503031C0B2CB50746
:10082000B403031C0F2C34308400831307303905C4
:10083000391384033905031D242C391A840A391A03
:10084000242C2030F700412C84073830040203198F
:1008500039170008F700031D352C391B352C391AC0
:10086000452CB919352C2030402CB91F3D2C2D308A
:10087000F70084033913B913412CB91539123030FC
:10088000F70777080C1E422C9900840A391F252C83
:1008900008003508F80134020318512C3408F70019
:1008A0005D2CF7010830B600B40DF70D350877025E
:1008B0000318F700F80DB60B542C0800780832081E
:1008C000B4006430B50049247708B20078083030AD
:1008D000031D712CB31C792CB319792C331A2030D9
:1008E000742CB31133123314F80778080C1E762CCD
:1008F00099003208B4000A30B50049247708B200E4
:1009000078083030031D8A2CB3198F2C331C8F2CA0
:10091000331A2030F80778080C1E8C2C99003030E0
:10092000B20732080C1E922C99008A11692D84019D
:1009300083131F308305723083168F000F08333006
:100940009900A230980090308312980083161F12ED
:100950009F121B0880399B0007309C008312A00166
:10096000A1013230A2002E30A3003230A400A50134
:1009700083160511831205110230B200FA30B3005C
:10098000A220B20BBE2C6400A601A801A7018421FD
:10099000B2010630B3000F237908AC007808AB0031
:1009A000B2010730B3000F237908AA007808A90024
:1009B0000230B200FA30B300A220B20BDA2C64008D
:1009C0008C1E712D8C1EE22C1A08B10018121816FC
:1009D000B2010630B3000F237908AC007808AB00F1
:1009E000B2010730B3000F237908AA007808A900E4
:1009F00003102B0DB2002C0DB300B3303202F70000
:100A00003308FA006A30031C6B30FA027708AD0035
:100A10007A08AE000310290DB2002A0DB300B330DE
:100A20003202F7003308FA006A30031C6B30FA0216
:100A30007708AF007A08B0003108483A0319272D2B
:100A40000E3A03192A2D0F3A03192C2D2E2D14308E
:100A5000A6002E2DA6012E2D84212E2D31080C1E30
:100A60002F2D990020300C1E332D9900103084005A
:100A70002E08B3002D08B200D32320300C1E3E2DCB
:100A80009900103084003008B3002F08B200D3233F
:100A900020300C1E492D99003108413C0319712D5D
:100AA0003108423C0319712D3108433C0319712D63
:100AB0003108533C0319712D48300C1E5D2D9900EF
:100AC00020300C1E612D99002608B2001B30B300A7
:100AD0005E2C0D300C1E6A2D99000A300C1E6E2DF6
:100AE00099000130B300A220A708031D7A2DA808A1
:100AF00003197F2D27080319A803A703832D0330AB
:100B0000A800E830A700A6080319932D2708E83CA1
:100B1000031D8E2D2808033C0319A6038316051117
:100B200083120515972D8316051183120511DF2CED
:020B3000630060
:04400E00103FFC3F24
:00000001FF
;PIC16F88
;CRC=FAA7 CREATED="21-VIII-10 08:50"
;CRC=FA51 CREATED="22-VIII-10 10:30"
/Designs/MRAKOMER2/SW/Ondrejov/teplomer/smb.c
12,7 → 12,7
#define TBUF 20
 
// SMBus control signals
#define SCL PIN_B0
#define SCL PIN_B4
#define SDA PIN_B1
 
#define mSDA_HIGH() output_float(SDA); // SDA float