راهنمایی در نوشتن برنامه تابلو ر�

[ehsan1100]

باعرض سلام خدمت دوستان
اصل قضیه اینکه من یه تابلوی64 *8 ساختم که مدارشو از سایت اقای لاچینی گرفتم ومشکل اینجاست که من ال ای دی هاشو برعکس نصب کردم یعنی کاتدهاشو به عنوان ستون واند هاشونو به عنوان سطر وصل کردم واز اونجایی که در برنامه نویسی اماتور تشریف دارم از اساتید تقاضای کمک دارم

[electrotech]

ما که نمیدونیم کدوم مدار داخل سایت لاچینی را ساختی، بنابراین شماتیک مدار و سورسش را بگذار تا راهنمایی کنیم. احتمالاً با تغییر قسمت refresh داخل برنامه و/یا تغییر برخی قطعات داخل مدار، مدارت درست میشه.

[ehsan1100]

با عرض سلام
اینم شماتیک و سورس تابلو که البته یک دات ماتریس 8*8 ویک ای سی لچ اضافه در مدار استفاده شده که در شماتیک لحاظ نشده یعنی اندازه تابلو64*8 هست



'*********************************************
'* www.HLachini.com *
'* Contact to me by : eLachini@Gmail.com *
'* Mobile/SMS : +98 912 381 2060 *
'*********************************************

$regfile = "m16def.dat"
$crystal = 1000000

Config Porta = Output
Config Portb = Output
Config Portc = Output
Config Portd = Output

Dim Scan As Byte
Dim I As Word
Dim Refresh As Byte
Dim T As Byte
Dim B As Byte
Dim D As Word
Dim U As Word
Dim S As Word
Dim M As Word
Dim E As Word
Dim A As Word

Do

For S = 0 To 128
M = 128 - S
E = M + 7
For Refresh = 1 To 5
Scan = &H01
For I = M To E

For B = 0 To 7

D = B * 8
D = D + I
Portd = Lookup(d , Text00)

Portb = 2 ^ B
Portb = 0

Next B

Porta = Scan
Rotate Scan , Left , 1
Waitms 2
Porta = 0

Next I
Next Refresh
Next S

Loop
End

Text00:
Data &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00
Data &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00
Data &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00
Data &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00
Data &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00
Data &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00
Data &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00
Data &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00
Data &H00 , &H00 , &H00 , &HF8 , &H00 , &H00 , &H00 , &H00 'Farsi character
Data &H00 , &H00 , &H00 , &H08 , &H48 , &H48 , &H28 , &H10 'Farsi character
Data &H08 , &H08 , &H88 , &H28 , &H48 , &H48 , &H28 , &H10 'Farsi character
Data &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 'Farsi character
Data &H00 , &H07 , &H08 , &H08 , &H08 , &H14 , &H14 , &H08 'Farsi character
Data &H00 , &H00 , &H00 , &HF0 , &H08 , &H08 , &H08 , &H08 'Farsi character
Data &H08 , &H08 , &H08 , &H08 , &H48 , &H08 , &H08 , &H30 'Farsi character
Data &H08 , &H08 , &H08 , &H08 , &H0A , &H08 , &H08 , &H30 'Farsi character
Data &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00
Data &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00
Data &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00
Data &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00
Data &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00
Data &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00
Data &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00
Data &H00 , &

[ehsan1100]

[ehsan1100]

با عرض سلام من منتظر جواب دوستان هستم