احتیاج به پروژه کامل شده LCD 64*128فینگر تاچ دارم

[Mehrdad001]

سلام.
لطفا اگه چندتا پروژه کامل شده LCD64*128 تاچ اسکرین دارید بذارید.
ممنون.

[Mehrdad001]

پاسخ : احتیاج به پروژه کامل شده LCD 64*128فینگر تاچ دارم

این یکی رو هرکار میکنم توی پروتئوس را نمیفته.
مشکلش چیه؟

http://www.mcselec.com/index.php?option=com_content&task=view&id= 189&Itemid=57

[Mehrdad001]

پاسخ : احتیاج به پروژه کامل شده LCD 64*128فینگر تاچ دارم

چه جالب. :NO:

[khast khodaiebehnam]

پاسخ : احتیاج به پروژه کامل شده LCD 64*128فینگر تاچ دارم

سلام اقا مهرداد
از شما با این سابقه این طور پست زدن....

خوب شما شروع کنین ما کمک خواهیم کرد
بفرمایید این سورس

$regfile = "m32def.dat"
$crystal = 10000000
$baud = 9600
'--------------------------------------------------------
Dim C As Byte
Dim B As Byte
Dim A(200) As Word
Dim Mina As Long
Dim Omid As Word
Dim Omid2 As Single
Dim Mega As Byte
Dim Datatransmiter As Long
Dim Datareadtimer As Long
Dim Limitbit As Byte



Config Lcdpin = Pin , Db4 = Portb.2 , Db5 = Portb.3 , Db6 = Portb.4 , Db7 = Portb.5 , E = Portb.0 , Rs = Portb.1
Config Lcd = 20 * 4

Cursor Off





                    ' used crystal frequency

$hwstack = 32                        ' default use 32 for the hardware stack
$swstack = 10                        ' default use 10 for the SW stack
$framesize = 40                       ' default use 40 for the frame space


Config Pinb.0 = Output

Config Porta = Input
Config Adc = Single , Prescaler = Auto , Reference = Internal




Dim I As Byte , I2 As Byte
Dim X1 As Word
Dim Y1 As Word




Stop Adc
Start Adc


X1 = 0
Y1 = 0




lcd"omia adiban"



Do






Config Porta.4 = Output
Config Porta.5 = Input
Config Porta.6 = Output
Config Porta.7 = Input


Set Porta.4
Reset Porta.5
Reset Porta.6
Reset Porta.7


X1 = Getadc(5)
X1 = X1 / 4



Config Porta.4 = Input
Config Porta.5 = Output
Config Porta.6 = Input
Config Porta.7 = Output


Reset Porta.4
Set Porta.5
Reset Porta.6
Reset Porta.7

Y1 = Getadc(6)
Y1 = Y1 / 8









Cls
Locate 1 , 1
Lcd X1
Locate 2 , 1
Lcd Y1

Waitms 5









Loop

[amina]

پاسخ : احتیاج به پروژه کامل شده LCD 64*128فینگر تاچ دارم

سلام من مثل کد بالا برنامه رو مینویسم اما هر کاری که میکنم فقط y نصف x میشه
یعنی هر بار adc یه عدد رو نشون میده
ممنون میشم اگه دوستان کمکم کنند

[khast khodaiebehnam]

پاسخ : احتیاج به پروژه کامل شده LCD 64*128فینگر تاچ دارم

پین های میکرورو چک کنین که سالم باشن
و پایه ها رو اشتباه وصل نکرده باشین
اگه همه اینا درست بود تاچ رو عوض کنید
خیلی از تاچ ها مشکل دار هستند متاسفانه