۱۶-آذر-۱۳۸۸, ۲۳:۳۷:۴۰
مهرداد جوون این عکسش :
اینم برنامش :
و اینم فایل های اصلی که ان شاا.. این دفعه باید باز شه !!
http://up.iranblog.ir/4/1260222458.rar
![[تصویر: 1260249722.png]](http://up.iranblog.ir/4/1260249722.png)
اینم برنامش :
کد php:
$regfile = "m32def.dat" : $crystal = 1000000
Config Lcdpin = Pin , Db4 = Portb.0 , Db5 = Portb.1 , Db6 = Portb.2 , Db7 = Portb.3 , E = Portb.5 , Rs = Portb.4
Config Lcd = 16 * 2 : Cursor Off : Cls
Dim S As Single , L As Long , W As Word , C As Word
Config Adc = Single , Prescaler = Auto : Start Adc
Do
For C = 0 To 3000
W = Getadc(0) : L = L + W
Next
S = L / 9002 : L = 0
Home : Lcd Fusing(s , "#.###") ; " V "
Loop
و اینم فایل های اصلی که ان شاا.. این دفعه باید باز شه !!
http://up.iranblog.ir/4/1260222458.rar