پرداخت حق عضویت سالیانه سایت
تبلیغات
کانال تلگرام مجستیک
آخرین ارسالی های انجمن
عنوان | پاسخ | بازدید | توسط |
مباحث مرتبط به ساخت و مونتاژ فلاشرها | 4 | 3022 | draingrating |
نصب ریسه نور برای لباس | 0 | 308 | majestic |
ریسه ها و درجه کیفیت آنها طبق IP | 0 | 264 | majestic |
مدار ساده برای روشن کردن یک عدد ال ای دی با برق 220 ولت شهری | 2 | 3771 | mahmood1889 |
آموزش تصویری چیدمان led ها در تابلو ثابت | 18 | 14656 | alireza4653 |
نرم افزار ساخت افکت برای فلاشرهای تابلو led | 15 | 8760 | djmiladdj |
فلزیاب گلد اسکن | 1 | 1630 | sina4556 |
بررسی و سوال جواب | 3 | 1778 | sina4556 |
نحوه ایجاد فرکانس مورد نیاز با 555 | 2 | 2070 | behnam90 |
نحوه راه اندازی اینفرارد برای دوربین | 0 | 1676 | majestic |
سری کردن تعداد زیادی ال ای دی با هم | 6 | 7872 | elekteroban9292 |
نورپردازی با استیریپهای IC دار | 6 | 2933 | unique |
ساخت اکولایزر | 2 | 2622 | mrj |
ساخت فلاشر - مدارات رقص نور | 7 | 8444 | ebrahimtalaie |
پاسخ به سوالات مربوط به ساخت تابلو led | 9 | 4782 | aliavr |
نرم افزارهای طراحی متن و چیدمان ال ای دی | 4 | 7977 | h_zarei |
اموزش تعمیر لامپ کم مصرف | 4 | 19586 | h_zarei |
قیمت خرید فلزیاب | 0 | 2183 | majestic |
فروش انواع فلاشر و led برای تابلو ثابت led | 4 | 4411 | majestic |
ولـتاژ و جریان ال ای دی | 1 | 3929 | majestic |
برنامه تابلو روان 8 در 16 با زبان بسکام جهت اشنایی بیشتر شما با ساخت و عملکرد این نمایشگرها
‘*************************************
$ regfile = “M32def.dat”
$crystal = 8000000
‘*************************************
Config Porta = Output
Config Portb = Output
Config Portc = Output
‘*************************************
Dim Buf(16) As Byte
Dim K As Byte
Dim H16 As Byte
Dim Ref As Byte
Dim P As Word
Dim I As Word
Dim Endmatn As Word
‘*******************************************************************************
‘*******************************************************************************
Do
P = 0
Endmatn = 208
For I = 1 To 16
Buf(i) = Lookup(p , Jb)
Incr P
Next
M1:
Gosub Nama
For K = 1 To 15
Buf(k) = Buf(k + 1)
Next
Buf(16) = Lookup(p , Jb)
Incr P
If P = Endmatn Then P = 0
If P < Endmatn Then Goto M1
Loop
End
‘*******************************************************************************
‘*******************************************************************************
Nama:
For Ref = 1 To 16
For H16 = 1 To 16
Select Case H16
Case 1 : Porta = &B11111110
Case 2 : Porta = &B11111101
Case 3 : Porta = &B11111011
Case 4 : Porta = &B11110111
Case 5 : Porta = &B11101111
Case 6 : Porta = &B11011111
Case 7 : Porta = &B10111111
Case 8 : Porta = &B01111111
Case 9 : Portc = &B11111110
Porta = &B11111111
Case 10 : Portc = &B11111101
Case 11 : Portc = &B11111011
Case 12 : Portc = &B11110111
Case 13 : Portc = &B11101111
Case 14 : Portc = &B11011111
Case 15 : Portc = &B10111111
Case 16 : Portc = &B01111111
End Select
Portb = Buf(h16)
Waitus 400
Portb = 0
Next H16
Next Ref
Return
‘*******************************************************************************
‘*******************************************************************************
Jb:
Data 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0
Data 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0
Data &B00011000
Data &B00001100
Data &B00011000
Data &B00001100
Data &B00011000
Data &B00001100
Data &B00001100
Data &B11111000
Data &B01111100
Data &B00001100
Data &B00001100
Data &B00001100
Data &B00001100
Data &B11111100
برچسب ها برنامه تابلو روانتابلو رواناموزش برنامه نویسیساخت تابلو روانفروش قطعات تابلو رواننمایشگر دیجیتالتابلو های ال ای دیled
reza : سلام
آقا من شماتیک این برنامه رو خیلی نیاز دارم و خیلی وقته دنبال اونم میشه شماتیکشو هم بزارید؟
خیلی ممنون