ورود به حساب ثبت نام جدید فراموشی کلمه عبور
برای ورود به حساب کاربری خود، نام کاربری و کلمه عبورتان را در زیر وارد کرده و روی «ورود به سایت» کلیک کنید.





اگر فرم ثبت نام برای شما نمایش داده نمی‌شود، اینجا را کلیک کنید.









اگر فرم بازیابی کلمه عبور برای شما نمایش داده نمی‌شود، اینجا را کلیک کنید.





کاربران برچسب زده شده

نمایش نتایج: از 1 به 9 از 9
  1. #1
    2011/06/19
    تهران
    1,706
    9

    نقاشی حرفه ای با PCF8833

    سلام

    نام : نقاشی حرفه ای با PCF8833

    کار کرد : داری 5 کلید برای کنترول می باشد که کلید متصل به
    پایه 28 برای اضافه کردن به X
    پایه 27 برای کم کردن X
    پایه 26 برای اضافه کردن به Y
    پایه 25 برای کم کردن Y
    پایه 24 برای تغییر رنگ (که سه رنگ داره داشتم رنگاش رو بیشتر میکردم که میکرو دیگه پروگرام نشد :cry2: )

    *****************************************

    مختصات در پایین ال سی دی قابل دیدن است
    رنگ در پایین ال سی دی قابل روید می باشد

    برنامه :

    کد:
    $regfile = "m8def.dat"
    $crystal = 8000000
    $lib "lcd-pcf8833.lbx"
    Config Graphlcd = Color , Controlport = Portd , Cs = 3 , Rs = 0 , Scl = 2 , Sda = 1
    Setfont Color16x16
    Config Portc = Input
    Declare Sub Touch
    Declare Sub Co
    Dim X As Byte
    Dim Y As Byte
    Dim C As Byte
    Dim C1 As Byte
    Set Portc.5
    Set Portc.4
    Set Portc.3
    Set Portc.2
    Set Portc.1
    Ddrc = 0
    
    
    Cls
    Do
    Call Touch
    Call Co
    Pset X , Y , C1
    Box(0 , 100) -(100 , 131) , &B11111111
    Box(100 , 100) -(131 , 131) , C1
    Lcdat 100 , 0 , "X" ; X , &B11100000 , &B00011100
    Lcdat 117 , 0 , "Y" ; Y , &B11100000 , &B00011100
    Waitms 300
    Loop
    
    
    
    
    
    
    
    End
    
    Sub Touch
    If Pinc.5 = 0 Then
    Incr X
    End If
    If Pinc.4 = 0 Then
    Decr X
    End If
    
    If Pinc.3 = 0 Then
    Incr Y
    End If
    If Pinc.2 = 0 Then
    Decr Y
    End If
    
    If Pinc.1 = 0 Then
    Incr C
    End If
    
    
    
    If X > 131 Then
    X = 131
    End If
    
    If Y > 100 Then
    Y = 100
    End If
    
    End Sub
    
    
    '==
    Q:
    Sub Co
    If C = 0 Then
    C1 = &B11100000
    End If
    
    If C = 1 Then
    C1 = &B00011100
    End If
    
    If C = 2 Then
    C1 = &B00000011
    End If
    
    If C > 2 Then
    C = 0
    Goto Q:
    End If
    
    End Sub
    
    $include "color16x16.font"
    اگه یه میکرو دیگه پیدا کردم کار بردش رو افزایش می دهم

    فونت 16*16 همراه با برنامه :

    http://up98.org/upload/server1/02/j/wnut888cxbppvns1tpws.rar
  2. #2
    2009/12/12
    336
    6

    پاسخ : نقاشي حرفه اي با PCF8833

    آقا اين LCD خاي PCF 8833 رو از کجا ميشه خريد؟
    بايد بگيم چه نوع LCD اي بده؟همين اسمشه؟
    قيمتشاون چقدره؟
  3. #3
    2011/06/19
    تهران
    1,706
    9

    پاسخ : نقاشی حرفه ای با PCF8833

    من این ال سی دی رو از جهان کیت خریدم 5.5 تومن . (پشت ویترین گذاشته)

    این ال سی دی ها مال یه سری از گوشی های نوکیا هست که یکیه مثل 6030 و ...

  4. #4
    2009/12/12
    336
    6

    پاسخ : نقاشي حرفه اي با PCF8833

    خب من که تهران نيستم از جهان کيت بخرم.
    ميرم گوشي فروشي ببينم چي پيدا ميشه.بعد اين پايه هاش چجوريه؟چطور ميتونم اول روي برد برد راه اندازيش کنم؟

    ميتوني يه عکس کامل از LCD خودت بزاري من ببينم بايد چي بخرم؟
  5. #5
    2011/06/19
    تهران
    1,706
    9

    پاسخ : نقاشی حرفه ای با PCF8833

    اینجا چند تا عکس هست

    http://www.xcore.com/projects/nokia-6100-display-driver-pcf8833-controller

    http://thomaspfeifer.net/nokia_6100_display_en.htm

    این برنامه اسم هر گوشی رو بزنی عکس ال سی دیش رو نشون میده

    http://uplod.ir/oxhtesxzrx4y/Nokia_Lcd_Finder_V-3_by_Mehmood_Riaz.rar.htm

  6. #6
    2009/11/20
    365
    4

    پاسخ : نقاشی حرفه ای با PCF8833

    سلام
    خسته نباشید من امروز رفتم یه lcd خریدم چیپش همین pcf8833 است می خوام راش بندازم.

    کار کناش یا علی.(اگه یکم دار جواب دادم .درگیر کارم)
    1- فقط یک عکس یا یه نوشته نشون بده.

    رفيقان قدر يكديگر بدانيد چو معلوم است شرح از بر مخوانيد

    مقالات نصيحت گو همين است كه سنگ انداز هجران در كمين است
  7. #7
    2011/09/26
    خراسان رضوي-مشهد
    759
    28

    پاسخ : نقاشي حرفه اي با PCF8833

    http://www.eca.ir/forum2/index.php?topic=40178.msg441975#msg441975
  8. #8
    2011/11/12
    276
    9

    پاسخ : نقاشي حرفه اي با PCF8833

    نقل قول نوشته اصلی توسط erfan m
    اينجا چند تا عکس هست

    http://www.xcore.com/projects/nokia-6100-display-driver-pcf8833-controller

    http://thomaspfeifer.net/nokia_6100_display_en.htm

    اين برنامه اسم هر گوشي رو بزني عکس ال سي ديش رو نشون ميده

    http://uplod.ir/oxhtesxzrx4y/Nokia_Lcd_Finder_V-3_by_Mehmood_Riaz.rar.htm
    لينکا کار نمي کنه !!!!!!!!!!!!!
    ( بابا يه نگاهي بدوروبرتون بندازين...!!! :biggrin: :biggrin: :mrgreen: :mrgreen
    *****عيب جامعه اين است که همه مي خواند آدم مهمي باشند ولي هيچ کس نمي خواهد فرد مفيدي باشد.*****
    http://electerodl.ir/forum
  9. #9
    2011/06/19
    تهران
    1,706
    9

    پاسخ : نقاشی حرفه ای با PCF8833

    متاسفانه دیگه برنامه رو ندارم
نمایش نتایج: از 1 به 9 از 9

موضوعات مشابه

  1. پاسخ: 2
    آخرين نوشته: 2013/11/17, 14:23
  2. pcf8833
    توسط porya_markazi در انجمن میکروکنترلرهای AVR
    پاسخ: 6
    آخرين نوشته: 2011/12/06, 23:59
  3. پروژه دفتر نقاشی دیجیتال با استفاده از برنامه c
    توسط zahra torbt در انجمن میکروکنترلرهای AVR
    پاسخ: 3
    آخرين نوشته: 2010/12/13, 18:03
  4. دفتر نقاشی
    توسط hamedb3269 در انجمن میکروکنترلرهای AVR
    پاسخ: 3
    آخرين نوشته: 2010/08/26, 23:23
  5. نقاشی با امواج مغزی!!!
    توسط bioemm.com در انجمن مهندسی پزشکی - بيو الكتريك
    پاسخ: 0
    آخرين نوشته: 2007/09/12, 12:57

کلمات کلیدی این موضوع

علاقه مندي ها (Bookmarks)

علاقه مندي ها (Bookmarks)

مجوز های ارسال و ویرایش

  • شما نمیتوانید موضوع جدیدی ارسال کنید
  • شما امکان ارسال پاسخ را ندارید
  • شما نمیتوانید فایل پیوست کنید.
  • شما نمیتوانید پست های خود را ویرایش کنید
  •