با سلام خدمت تمامی دوستان عزیز ...
دوستان من یک هفته هست که با دوتا میکرو خواستم دماسنج بسازم یکی با ال سی دی 20*4 بود و اون یکی با ال سی دی 2*16 که تو هردو مدار اینطور شد که وقتی مدار رو روشن میکنم دوتا خط پیکسل ها کاملا روشن میشن و هیچ عکس العملی نداره اینم کد نویسی مدارمه لطفا کمک کنید ....
دوستان من یک هفته هست که با دوتا میکرو خواستم دماسنج بسازم یکی با ال سی دی 20*4 بود و اون یکی با ال سی دی 2*16 که تو هردو مدار اینطور شد که وقتی مدار رو روشن میکنم دوتا خط پیکسل ها کاملا روشن میشن و هیچ عکس العملی نداره اینم کد نویسی مدارمه لطفا کمک کنید ....
کد:
$regfile = "M8def.dat" $crystal = 8000000 '**************************** Config Portc = Input Config Portd = Output Config Adc = Single , Prescaler = Auto , Reference = Avcc Config Lcd = 16 * 2 Config Lcdbus = 4 Config Lcdpin = Pin , Rs = Portd.6 , E = Portd.7 , Db4 = Portd.5 , Db5 = Portd.4 , Db6 = Portd.3 , Db7 = Portd.2 '********************* Dim Result As Word Dim Volt As Long '********************* Deflcdchar 0 , 3 , 3 , 32 , 14 , 16 , 16 , 16 , 14 '********************* Cursor Off Cls Start Adc Do Result = Getadc(0) Volt = Result * 4.88 Volt = Volt / 10 Locate 1 , 1 Cls Lcd "temp=" ; Volt ; Chr(0) Waitms 500 Loop Stop Adc End
دیدگاه