Parsi Coders

Full Version: مدار فاصله سنج اولتراسونیک با بسکام
You're currently viewing a stripped down version of our content. View the full version with proper formatting.
 
PHP Code:
$regfile "m32def.dat"
$crystal 4000000
Dim D 
As Word
Dim E 
As Single
Dim F 
As Word
Dim G 
As Single
Config Single 
Scientific Digits 1
Config Pinc.0 
Output
Config Pinc.2 
Output
Config Pinc.1 
Input
Config Pinc.3 
Input
Config Lcd 
16 2
Config Lcdpin 
Pin Db7 Pb.7 Db6 Pb.6 Db5 Pb.5 Db4 Pb.4 Rs Pb.2 Pb.3
Cursor Off
Reset Portc.0
Reset Portc.2
0
0
Locate 1 
3
Lcd 
"POWERED BY"
Locate 2 3
Lcd 
"NAVIDKASHI"
Wait 2
Cls
Locate 1 
1
Lcd 
"ULTRA 1="
Locate 2 1
Lcd 
"ULTRA 2="
A:
     
Pulseout Portc 20
     Pulsein D 
Pinc 1
     Pulseout Portc 
20
     Pulsein F 
Pinc 1
     D 
4
     F 
4
     E 
5
     G 
5
     Locate 1 
9
     Lcd E 
"cm"
     
Locate 2 9
     Lcd G 
"cm"
Goto 

 
schematic یا pcb ??? هیچی نداره ؟
 
اینکه سادس دوست عزیز
از دوعدد سنسور استفاده کرده   
******************
portc.0 = input sensor
portc.1 = outpout sensor
********************
********************
portc.2= input sensor2
portc.3 = outpout sensor2
********************
بازهم مشکلی بود درخدمتم