| نمايش موضوع قبلي :: نمايش موضوع بعدي |
| نويسنده |
پيغام |
|
hedayati
کاربر جدید
وضعيت: آفلاين
26 خرداد ماه ، 1388
تعداد ارسالها: 4
امتياز: 0
تشکر کرده: 0
تشکر شده 3 بار در 3 پست
|
 ارسال شده در: شنبه، 30 خرداد ماه ، 1388 11:37:41 موضوع مطلب: تابلو روان با شیفت رجیستر |
|
|
سلام
من دارم یه تابلو روان با شیفت رجیستر کار می کنم
میخوام برنامه ای بنویسم که یه حرف ساده مثل " نام" روی ان حرکت کند
ولی مشکلی که دارم حرکت نمی کنه
فونتها روی هم قرار می گیرن
اگه کسی می تونه کمکم کنه ممنوم میشم
| :كد |
'*******************************************************************************
$regfile = "m16def.dat"
$crystal = 8000000
Config Porta = Output
Config Portd = Output
'*******************************************************************************
Dim A As Byte
Dim B As Byte
Dim D As Bit
Dim K1 As Byte
Dim K2 As Byte
Dim J As Byte
Dim I As Byte
Dim Index As Byte
'*******************************************************************************
Clk Alias Porta.1
'*******************************************************************************
A = &B01111111
Clk = 0
nop
K1 = 0
K2 = 15
Set Portd
Waitms 500
Do
For Index = K1 To K2
B = Lookup(index , Star)
Rotate A , Left
For I = 0 To 7
Porta.0 = B.i
Clk = 1
nop
Clk = 0
Next
Waitms 2
Portd = A
Next
Waitms 50
Loop
End
Star:
Data &H00 , &H00 , &H00 , &H00 , &H04 , &H10 , &H10 , &H1F , _
&H80 , &H80 , &H80 , &H80 , &H80 , &H80 , &H80 , &H00
|
|
|
|
بازگشت به بالا |
|
| کاربرانی که برای این ارسال از hedayati تشکر کرده اند |
|
 |
|
hedayati
کاربر جدید
وضعيت: آفلاين
26 خرداد ماه ، 1388
تعداد ارسالها: 4
امتياز: 0
تشکر کرده: 0
تشکر شده 3 بار در 3 پست
|
| ارسال شده در: يكشنبه، 31 خرداد ماه ، 1388 10:03:58 موضوع مطلب: |
|
|
سلام
کسی نیست جواب بده
مشکل حرکت برنامه در ست شد ولی بازم حروف روی هم می افته
اینم برنامه جدید
| :كد |
A = &B01111111
Clk = 0
nop
K1 = 0
K2 = 55
K3 = 0
J = 0
Set Portd
Waitms 500
Do
For Index = K1 To K2
B = Lookup(index , Star)
Rotate A , Left
For I = 0 To K3
Porta.0 = B.i
Clk = 1
nop
Clk = 0
Next
Waitms 3
Portd = A
Next
Incr K3
If K3 = 22 Then K3 = 0
Waitms 50
Loop
End
Star:
Data &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 'space
Data &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 'space
Data &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 'space
Data &H00 , &H00 , &HF8 , &H08 , &H08 , &H20 , &H00 , &H00 ' ä
Data &H00 , &H00 , &H01 , &H01 , &H01 , &H01 , &H01 , &H01 ' Ç
Data &H20 , &H20 , &H20 , &H20 , &H3C , &H0C , &H00 , &H00 ' ã
Data &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 'space
Data &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 'space
|
|
|
|
بازگشت به بالا |
|
| کاربرانی که برای این ارسال از hedayati تشکر کرده اند |
|
|
|
hedayati
کاربر جدید
وضعيت: آفلاين
26 خرداد ماه ، 1388
تعداد ارسالها: 4
امتياز: 0
تشکر کرده: 0
تشکر شده 3 بار در 3 پست
|
| ارسال شده در: يكشنبه، 31 خرداد ماه ، 1388 18:50:06 موضوع مطلب: |
|
|
سلام آقای مهندس لاچینی
تورو خدا کمک کنید  |
|
|
بازگشت به بالا |
|
| کاربرانی که برای این ارسال از hedayati تشکر کرده اند |
|
|
|
bestfriend
کاربر فعال
وضعيت: آفلاين
5 بهمن ماه ، 1387
تعداد ارسالها: 30
امتياز: 7
تشکر کرده: 1
تشکر شده 21 بار در 21 پست
|
| ارسال شده در: شنبه، 20 تير ماه ، 1388 18:37:10 موضوع مطلب: |
|
|
شما از چه شیفت رجیستری استفاده میکنید؟
تابلو روان شما چند در چنده؟ |
|
|
بازگشت به بالا |
|
| کاربرانی که برای این ارسال از bestfriend تشکر کرده اند |
|
|
|
hadi123
کاربر فعال
وضعيت: آفلاين
3 خرداد ماه ، 1388
تعداد ارسالها: 50
امتياز: 75
تشکر کرده: 1
تشکر شده 15 بار در 14 پست
|
| ارسال شده در: يكشنبه، 21 تير ماه ، 1388 00:08:42 موضوع مطلب: |
|
|
سلام دوست عزیز....
مشکل شما این است که برنامه خودتون را نمیتونید تحلیل کنید !!! 
شما ستون اول را فعال و کد آن را در سطر قرار میدهید ، ولی وقتی که ستون بعد را انتخواب میکنید اطلاعات سطر قبل در ستون بعدی قرار
میگیرد البته به طور لحظه ای.
راحه حل: بعد از جاروب هر ستون اطلاعات سطر قبل را پاک کنید. 
| :كد |
A = &B11111110
as = &H00
Do
For Index = 0 To 32
B = Lookup(index , Star)
For I = 0 To 7
Porta.0 = B.i
Clk = 1
nop
Clk = 0
Next
Portd = A
Waitms 3
For I = 0 To 7
Porta.0 = as.i
Clk = 1
nop
Clk = 0
Next
Portd = &H00
Rotate A , Left
Next
Loop
|
پیشنهاد :
بهتره ستون اول به بیت اول پورت D نصب شود.
معایب:
مقدار صحیح برای حلقه اول که وظیفه حرکت را حروف را بر عهده دارد 31 میباشد.
در حلقه سریال شما مقدار حلقه باید 7 باشد تا تمامی بیت های متغیر ارسال شود.
نکته:
من بیسیک خیلی کم کارکرده ام و مطالب ارایه شده بیشتر از اطلاعات زبان C من است ، اگر مشکلی در مطالب بود ببخشید.  |
|
|
بازگشت به بالا |
|
| کاربرانی که برای این ارسال از hadi123 تشکر کرده اند |
|
|
|
bestfriend
کاربر فعال
وضعيت: آفلاين
5 بهمن ماه ، 1387
تعداد ارسالها: 30
امتياز: 7
تشکر کرده: 1
تشکر شده 21 بار در 21 پست
|
| ارسال شده در: يكشنبه، 21 تير ماه ، 1388 07:14:11 موضوع مطلب: |
|
|
| تو این کد clk و nop چیکار میکنه؟ |
|
|
بازگشت به بالا |
|
| کاربرانی که برای این ارسال از bestfriend تشکر کرده اند |
|
|
|
bestfriend
کاربر فعال
وضعيت: آفلاين
5 بهمن ماه ، 1387
تعداد ارسالها: 30
امتياز: 7
تشکر کرده: 1
تشکر شده 21 بار در 21 پست
|
| ارسال شده در: يكشنبه، 21 تير ماه ، 1388 10:12:09 موضوع مطلب: |
|
|
| سلام ببخشید کسی نیست جواب من رو بده؟ |
|
|
بازگشت به بالا |
|
| کاربرانی که برای این ارسال از bestfriend تشکر کرده اند |
|
|
|
bestfriend
کاربر فعال
وضعيت: آفلاين
5 بهمن ماه ، 1387
تعداد ارسالها: 30
امتياز: 7
تشکر کرده: 1
تشکر شده 21 بار در 21 پست
|
| ارسال شده در: يكشنبه، 21 تير ماه ، 1388 17:06:58 موضوع مطلب: |
|
|
| سلام آقای هدایتی شما از چه شیفت رجیستری استفاده میکنید؟ |
|
|
بازگشت به بالا |
|
| کاربرانی که برای این ارسال از bestfriend تشکر کرده اند |
|
|
|
mohsensadeghi
کاربر فعال
وضعيت: آفلاين
30 مرداد ماه ، 1388
تعداد ارسالها: 20
امتياز: 11
تشکر کرده: 2
تشکر شده 12 بار در 12 پست
|
| ارسال شده در: جمعه، 30 مرداد ماه ، 1388 13:09:55 موضوع مطلب: |
|
|
با سلام خدمت استاد گرامی جناب مهندس لاچینی . یک سوال برای من در مراحل ساخت تابلو روان 16*128 پیش اومده . من وقتی محیط شبه ساز رو باز می کنم و برنامه رو اجرا می کنم نوشته های ارسالی به ماتریسها تا چهار ماتریس نوشته میشه اما بعد از اون نوشته ها نمایش داده نمی شن . می خواستم بدونم مشکل از کجاست . با تشکر فراوان از شما استاد گرامی .
محسن صادقی پور |
|
|
بازگشت به بالا |
|
| کاربرانی که برای این ارسال از mohsensadeghi تشکر کرده اند |
|
|
|
SoS
مدیر سایت
وضعيت: آفلاين
11 شهريور ماه ، 1387
تعداد ارسالها: 556
امتياز: 344
تشکر کرده: 13
تشکر شده 333 بار در 292 پست
|
| ارسال شده در: جمعه، 30 مرداد ماه ، 1388 14:31:36 موضوع مطلب: تابلو روان توسط شیفت رجیستر |
|
|
دوست گرامی آقای محسن صادقی پور نوشتن یک سئوال در چند تاپیک با موضوعات مختلف هیچ سودی برای شما ندارد و جز اینکه باعث شلوعی و بهم ریختن نظم موجود در سایت خواهد شد و پیگیری پاسخها را از سوی شما دچار مشکل میکند و زمان مدیران سایت را جهت پاک کردن آن خواهد گرفت فایده ای ندارد. پس از تکرار این موضوع خودداری کنید.
در رابطه با سئوال شما هم باید گفت که در سایت ما فقط در تابلو روان قابل اتصال به پورت سریال کامپیوتر نقشه 128 ستونی را قرار دادیم که در این مدار هم دلیل اینکه فقط 4 ماتریس اول تابلو کار میکند محدود شدن توسط برنامه درون میکرو هست و شما نمیتوانید آنرا افزایش یا کاهش دهید. |
|
|
بازگشت به بالا |
|
| کاربرانی که برای این ارسال از SoS تشکر کرده اند |
|
|
|
سوالات رايج مربوط به تالارهاي گفتمان
جستجو
گروههاي كاربري
مشخصات
ورود به سيستم و كنترل پيغامهاي شخصي
ورود به سيستم
