Penulis Topik: Mikrokontroler dengan Dot Matrik  (Dibaca 13635 kali)

0 Anggota dan 1 Pengunjung sedang melihat topik ini.

Offline remistael

  • Newbie
  • *
  • Tulisan: 9
Mikrokontroler dengan Dot Matrik
« pada: Maret 28, 2011, 10:45:24 PM »
Ada gak Rangkaian Untuk membuat Nama Huruf Berjalan menggunakan Mikrokontroler di gabung dengan Dot Matrik?

Mohon Penjlasan nya!

Offline cocack

  • Newbie
  • *
  • Tulisan: 28
Re:Mikrokontroler dengan Dot Matrik
« Jawab #1 pada: April 01, 2011, 02:49:16 PM »
iya nih ada gak ya saya juga bingung mencarinya,,,, konek1

Offline Cosphi84

  • Full Member
  • ****
  • Tulisan: 118
Re:Mikrokontroler dengan Dot Matrik
« Jawab #2 pada: Mei 28, 2011, 09:17:52 AM »

Offline M Febriansyah

  • Full Member
  • ****
  • Tulisan: 173
  • SINTESA IKAN LAPER 3
Re:Mikrokontroler dengan Dot Matrik
« Jawab #3 pada: Juli 06, 2011, 08:22:56 PM »
Ada gak Rangkaian Untuk membuat Nama Huruf Berjalan menggunakan Mikrokontroler di gabung dengan Dot Matrik?

Selain menggunakan PIC, ATMEL (MCs & AVR) juga bisa. Sebelumnya saya mau tanya rangkaiannya buat apaan?
kalo mau beli yang sudah jadi aja merk china. Sudah banyak dipasaran kok...
IKAN LAPER
PENDIDIKAN PELATIHAN PENYIAR & REPORTER

Offline prabudi

  • Jr. Member
  • **
  • Tulisan: 99
  • Testing
    • pematangsiantar
Re:Mikrokontroler dengan Dot Matrik
« Jawab #4 pada: September 18, 2011, 09:01:43 PM »
coba ke jalan cari1  http://technologination.blogspot.com/2011/05/dot-matrix-5x7.html



Listing program dot matrix 5x7 dengan Bascom AVR:

'===============================================================
'DOTMATRIX 5x7 DISPLAY
'PROGRAMMER = WAHYU RAHMANIAR
'COMPANY = TECHNOLOGINATION
'===============================================================

$regfile = "m32def.dat"
$crystal = 8000000
$baud = 9600

Dim Char As Byte , C As Byte , Digit As Byte , L As Byte , I As Byte , Temp(2) As Byte , Temp2 As Byte
Dim X As Word, Y As Integer
Dim Str_temp As String * 1 , Reeks(250) As Byte
Dim Str_text As String * 160 , Str_len As Byte , Col_len As Byte , R As Byte
Dim Tempmsb As Byte , Templsb As Byte , Tempstr As String * 2
Dim Scroll_speed As Byte
Dim Text(4) As String * 40

Declare Sub Show_text
Declare Sub Set_volt
Declare Sub Set_text
Declare Sub Test_display
Declare Sub Read_volt
Declare Sub Read_temp

Config Portc = Output                                       'shift register 74HC595
Config Portb = Output                                       'Dotmatrix 8x8

Goto Main

Sub Set_text
C = 1
For Digit = 1 To Str_len
Str_temp = Mid(str_text , Digit , 1)
Char = Asc(str_temp)
X = Char * 5
For I = 1 To 5
Reeks(c) = Lookup(x , Text_data)
X = X + 1
C = C + 1
Next I
Reeks(c) = 0
C = C + 1
Next Digit
End Sub Set_string

'show text
Sub Show_text
If Str_len > 4 Then

For L = 0 To Col_len
C = 1
   For R = 1 To Scroll_speed
       Set Portc.0
       Toggle Portc.1
       Toggle Portc.1
       Toggle Portc.2
       Toggle Portc.2
       Char = C + L
       Portb = Reeks(char)
       Waitms 1
       C = C + 1
       Reset Portc.0
       For X = 1 To 19
       Toggle Portc.1
       Toggle Portc.1
       Toggle Portc.2
       Toggle Portc.2
       Char = C + L
       Portb = Reeks(char)
       Waitms 1
       C = C + 1
       Next X
       C = 1
  Next R
Next L

Else

For L = 0 To Col_len
C = 1
   For R = 1 To Scroll_speed
       Set Portc.0
       Toggle Portc.1
       Toggle Portc.1
       Toggle Portc.2
       Toggle Portc.2
       Portb = Reeks(c)
       Waitms 1
       C = C + 1
       Reset Portc.0
       For X = 1 To 19
       Toggle Portc.1
       Toggle Portc.1
       Toggle Portc.2
       Toggle Portc.2
       Portb = Reeks(c)
       Waitms 1
       C = C + 1
       Next X
       C = 1
  Next R
Next L

End If

End Sub Show_text

Sub Test_display
Portb = 255
For X = 1 To 20
       Set Portc.0
       Toggle Portc.1
       Toggle Portc.1
       Toggle Portc.2
       Toggle Portc.2
Next X
End Sub Test_display

'---------------------

Main:

Call Test_display
Waitms 100
Scroll_speed = 16
Call Set_text
Do
Input "Masukkan Text (max 50): " , Str_text
Text(1) = Mid(str_text , 1 , 40)
Text(2) = Mid(str_text , 41 , 40)
Text(3) = Mid(str_text , 81 , 40)
Text(4) = Mid(str_text , 121 , 40)

For Y = 1 To 4
Str_text = Text(y)
Str_len = Len(str_text)
Col_len = Str_len * 6
Call Set_text
Call Show_text
Next
Loop
End


Text_data:
Data 0 , 0 , 0 , 0 , 0                                      '
Data 0 , 0 , 0 , 0 , 0                                      '
Data 0 , 0 , 0 , 0 , 0                                      '
Data 0 , 0 , 0 , 0 , 0                                      '
Data 0 , 0 , 0 , 0 , 0                                      '
Data 0 , 0 , 0 , 0 , 0                                      '
Data 0 , 0 , 0 , 0 , 0                                      '
Data 0 , 0 , 0 , 0 , 0                                      '
Data 0 , 0 , 0 , 0 , 0                                      '
Data 0 , 0 , 0 , 0 , 0                                      '
Data 0 , 0 , 0 , 0 , 0                                      '
Data 0 , 0 , 0 , 0 , 0                                      '
Data 0 , 0 , 0 , 0 , 0                                      '
Data 0 , 0 , 0 , 0 , 0                                      '
Data 0 , 0 , 0 , 0 , 0                                      '
Data 0 , 0 , 0 , 0 , 0                                      '
Data 0 , 0 , 0 , 0 , 0                                      '
Data 0 , 0 , 0 , 0 , 0                                      '
Data 0 , 0 , 0 , 0 , 0                                      '
Data 0 , 0 , 0 , 0 , 0                                      '
Data 0 , 0 , 0 , 0 , 0                                      '
Data 0 , 0 , 0 , 0 , 0                                      '
Data 0 , 0 , 0 , 0 , 0                                      '
Data 0 , 0 , 0 , 0 , 0                                      '
Data 0 , 0 , 0 , 0 , 0                                      '
Data 0 , 0 , 0 , 0 , 0                                      '
Data 0 , 0 , 0 , 0 , 0                                      '
Data 0 , 0 , 0 , 0 , 0                                      '
Data 0 , 0 , 0 , 0 , 0                                      '
Data 0 , 0 , 0 , 0 , 0                                      '
Data 0 , 0 , 0 , 0 , 0                                      '
Data 0 , 0 , 0 , 0 , 0                                      '
Data 0 , 0 , 0 , 0 , 0                                      'space
Data 0 , 0 , 95 , 0 , 0                                     '!
Data 0 , 7 , 0 , 7 , 0                                      ''
Data 20 , 127 , 20 , 127 , 20                               '#
Data 36 , 42 , 127 , 42 , 18                                '$
Data 39 , 21 , 107 , 84 , 114                               '%
Data 54 , 73 , 86 , 32 , 80                                 '&
Data 0 , 0 , 11 , 7 , 0                                     ''
Data 0 , 28 , 34 , 65 , 0                                   ' (
Data 0 , 65 , 34 , 28 , 0                                   ')
Data 42 , 28 , 127 , 28 , 42                                '*
Data 8 , 8 , 62 , 8 , 8                                     '+
Data 0 , 88 , 56 , 0 , 0                                    ',
Data 8 , 8 , 8 , 8 , 8                                      '-
Data 0 , 96 , 96 , 0 , 0                                    '.
Data 32 , 16 , 8 , 4 , 2                                    '/
Data 62 , 81 , 73 , 69 , 62                                 '0
Data 0 , 66 , 127 , 64 , 0                                  '1
Data 114 , 73 , 73 , 73 , 70                                '2
Data 34 , 65 , 73 , 73 , 54                                 '3
Data 24 , 20 , 18 , 127 , 16                                '4
Data 39 , 69 , 69 , 69 , 57                                 '5
Data 60 , 74 , 73 , 73 , 48                                 '6
Data 1 , 113 , 9 , 5 , 3                                    '7
Data 54 , 73 , 73 , 73 , 54                                 '8
Data 6 , 73 , 73 , 41 , 30                                  '9
Data 0 , 54 , 54 , 0 , 0                                    ':
Data 0 , 91 , 59 , 0 , 0                                    ';
Data 8 , 20 , 34 , 65 , 0                                   '<
Data 20 , 20 , 20 , 20 , 20                                 '=
Data 0 , 65 , 34 , 20 , 8                                   '>
Data 2 , 1 , 81 , 9 , 6                                     '?
Data 50 , 73 , 121 , 65 , 62                                '@
Data 124 , 18 , 17 , 18 , 124                               'A
Data 65 , 127 , 73 , 73 , 62                                'B
Data 62 , 65 , 65 , 65 , 34                                 'C
Data 65 , 127 , 65 , 65 , 62                                'D
Data 127 , 73 , 73 , 65 , 65                                'E
Data 127 , 9 , 9 , 1 , 1                                    'F
Data 62 , 65 , 73 , 73 , 58                                 'G
Data 127 , 8 , 8 , 8 , 127                                  'H
Data 0 , 65 , 127 , 65 , 0                                  'I
Data 32 , 64 , 65 , 63 , 1                                  'J
Data 127 , 8 , 20 , 34 , 65                                 'K
Data 127 , 64 , 64 , 64 , 64                                'L
Data 127 , 2 , 12 , 2 , 127                                 'M
Data 127 , 2 , 4 , 8 , 127                                  'N
Data 62 , 65 , 65 , 65 , 62                                 'O
Data 127 , 9 , 9 , 9 , 6                                    'P
Data 62 , 65 , 65 , 33 , 94                                 'Q
Data 127 , 9 , 25 , 41 , 70                                 'R
Data 38 , 73 , 73 , 73 , 50                                 'S
Data 1 , 1 , 127 , 1 , 1                                    'T
Data 63 , 64 , 64 , 64 , 63                                 'U
Data 7 , 24 , 96 , 24 , 7                                   'V
Data 127 , 32 , 24 , 32 , 127                               'W
Data 99 , 20 , 8 , 20 , 99                                  'X
Data 3 , 4 , 120 , 4 , 3                                    'Y
Data 97 , 81 , 73 , 69 , 67                                 'Z
Data 0 , 127 , 65 , 65 , 0                                  '[
Data 2 , 4 , 8 , 16 , 32                                    '\
Data 0 , 65 , 65 , 127 , 0                                  ']
Data 4 , 2 , 1 , 2 , 4                                      '^
Data 64 , 64 , 64 , 64 , 64                                 '_
Data 0 , 0 , 7 , 11 , 0                                     ''
Data 32 , 84 , 84 , 84 , 56                                 'a
Data 127 , 40 , 68 , 68 , 56                                'b
Data 0 , 56 , 68 , 68 , 68                                  'c
Data 56 , 68 , 68 , 40 , 127                                'd
Data 56 , 84 , 84 , 84 , 24                                 'e
Data 8 , 126 , 9 , 9 , 2                                    'f
Data 8 , 84 , 84 , 84 , 60                                  'g
Data 127 , 16 , 8 , 8 , 112                                 'h
Data 0 , 68 , 125 , 0 , 0                                   'i
Data 32 , 64 , 68 , 61 , 0                                  'j
Data 0 , 127 , 16 , 40 , 68                                 'k
Data 0 , 65 , 127 , 64 , 0                                  'l
Data 124 , 4 , 120 , 4 , 120                                'm
Data 124 , 8 , 4 , 4 , 120                                  'n
Data 56 , 68 , 68 , 68 , 56                                 'o
Data 124 , 20 , 20 , 20 , 8                                 'p
Data 8 , 20 , 20 , 20 , 124                                 'q
Data 124 , 8 , 4 , 4 , 8                                    'r
Data 72 , 84 , 84 , 84 , 36                                 's
Data 0 , 4 , 63 , 68 , 68                                   't
Data 60 , 64 , 64 , 32 , 124                                'u
Data 28 , 32 , 64 , 32 , 28                                 'v
Data 60 , 64 , 60 , 64 , 60                                 'w
Data 68 , 40 , 16 , 40 , 68                                 'x
Data 12 , 80 , 80 , 80 , 60                                 'y
Data 68 , 100 , 84 , 76 , 68                                'z
Data 0 , 8 , 54 , 65 , 0                                    '{
Data 0 , 0 , 119 , 0 , 0                                    '|
Data 0 , 65 , 54 , 8 , 0                                    '}
Data 2 , 1 , 2 , 4 , 2                                      '~
Data 42 , 85 , 42 , 85 , 42                                 '
1,2,3 test.....dicoba......1,2,3 dicoba......test

Pematangsiantar

Offline bayu.ngka

  • Newbie
  • *
  • Tulisan: 47
Re:Mikrokontroler dengan Dot Matrik
« Jawab #5 pada: September 18, 2011, 10:04:08 PM »
Ini dia tread yang saya tunggu tunggu. Ada yang bisa menjelaskan logika dalam Running Text?

Katanya sama dengan menyalakan 7 segmen. Yang jadi pertanyaan itu kalau 7 segmen kan cuma 8 led, nah kalau dot matrix kan led bisa ribuan. Trus untuk menghandle ribuan led menggunakan Shift Register, itu maksudnya gimana..

 hallo1 hallo1 hallo1
Maaf saya tidak mampu menyumbangkan ilmu, Mohon izin untuk menimba Ilmu.
Blog Saya

Offline M Febriansyah

  • Full Member
  • ****
  • Tulisan: 173
  • SINTESA IKAN LAPER 3
Re:Mikrokontroler dengan Dot Matrik
« Jawab #6 pada: September 28, 2011, 10:21:19 AM »
Secara teori garis besarnya adalah mikro mengirimkan terlebih dahulu kolom mana yang akan dihidupkan, yaitu dengan cara mengeser data sepanjang kolom matrix lewat shift register.....jika data sudah sampai pada matrix yang paling ujung, tinggal menghidupkan baris dimulai dari baris pertama dari matrix...nanti kembali lagi data shift register dikirim kemudian baris ke dua matrix yang dihidupkan.....begitu terus sampai baris terakhir.....metode ini untuk matrix lama.....teknik matrix sekarang sudah menghidupkan led matrixnya pertitik.....Bedanya kalo perbaris nanti ada led matrix hurufnya nyala lebih terang dari huruf lain contoh huruf I atau .(titik) dengan huruf A...tapi klo teknik matrix pertitik nanti semua huruf terang nyalanya sama......
IKAN LAPER
PENDIDIKAN PELATIHAN PENYIAR & REPORTER

Offline dzafoe

  • Full Member
  • ****
  • Tulisan: 136
    • http://dzafoe-elektronik.blogspot.com/
Re:Mikrokontroler dengan Dot Matrik
« Jawab #7 pada: September 28, 2011, 11:10:02 AM »
kalau dilihat dirangkaiannya kira2 ini yang type lama atau type terbaru ya? kalau terbaru pasti lebih ok nih bisa lebih terang nyalanya bisa buat dicobain 8) 8) 8)...kalau pada codingnya kira2 bisa ga ya ditambah jumlah karakternya lebih dari 50 karakter? caranya bagaimana?
mohon dishare para master...

Offline bayu.ngka

  • Newbie
  • *
  • Tulisan: 47
Re:Mikrokontroler dengan Dot Matrik
« Jawab #8 pada: September 28, 2011, 04:28:52 PM »
Secara teori garis besarnya adalah mikro mengirimkan terlebih dahulu kolom mana yang akan dihidupkan, yaitu dengan cara mengeser data sepanjang kolom matrix lewat shift register.....jika data sudah sampai pada matrix yang paling ujung, tinggal menghidupkan baris dimulai dari baris pertama dari matrix...nanti kembali lagi data shift register dikirim kemudian baris ke dua matrix yang dihidupkan.....begitu terus sampai baris terakhir.....metode ini untuk matrix lama.....teknik matrix sekarang sudah menghidupkan led matrixnya pertitik.....Bedanya kalo perbaris nanti ada led matrix hurufnya nyala lebih terang dari huruf lain contoh huruf I atau .(titik) dengan huruf A...tapi klo teknik matrix pertitik nanti semua huruf terang nyalanya sama......

Di mengerti untuk per baris dan per titik. Cuma logikanya dalam running text belum nyantol. konek1 konek1 konek1

Adakah yang bisa menjelaskan logikanya.. Pusing belajar sendiri 1 tahun gak nyantol nyantol.
Maaf saya tidak mampu menyumbangkan ilmu, Mohon izin untuk menimba Ilmu.
Blog Saya

Offline M Febriansyah

  • Full Member
  • ****
  • Tulisan: 173
  • SINTESA IKAN LAPER 3
Re:Mikrokontroler dengan Dot Matrik
« Jawab #9 pada: September 29, 2011, 03:03:25 PM »
Agak susah juga klo ngejelasinnya....harus pake gambar dan butuh banyak gambar......intinya saat text pada matrix mau dibuat berjalan, maka teori yg saya jelaskan tadi (baris & kolom) dijalankan satu-satu lalu pindah lagi ke kolom berikutnya....bgt strusnya....

Saya kasih gambaran yg paling pendek :
. . . . . . . . . . . |                                                                                                || . . . . . . . . . . .
. . . . . . . . . . x |                                                                                                || . . . . . . . . . . x
. . . . . . . . . . x |                                                                                                || . . . . . . . . . . x
. . . . . . . . . . x |                                                                                                || . . . . . . . . . . x
. . . . . . . . . . x |                                                                                                || . . . . . . . . . . x
============
. . . . . . . . . . . | . . . . . . . . . . x |                                                                        || . . . . . . . . . . x
. . . . . . . . . x . | . . . . . . . . . . . |                                                                        || . . . . . . . . . x .
. . . . . . . . . x . | . . . . . . . . . . x |                                                                        || . . . . . . . . . x x
. . . . . . . . . x . | . . . . . . . . . . . |                                                                        || . . . . . . . . . x .
. . . . . . . . . x . | . . . . . . . . . . . |                                                                        || . . . . . . . . . x .
============
. . . . . . . . . . . | . . . . . . . . . x . |. . . . . . . . . . . |                                                || . . . . . . . . . x .
. . . . . . . . x . . | . . . . . . . . . . . |. . . . . . . . . . x |                                                || . . . . . . . . x . x
. . . . . . . . x . . | . . . . . . . . . x . |. . . . . . . . . . x |                                               || . . . . . . . . x x x
. . . . . . . . x . . | . . . . . . . . . . . |. . . . . . . . . . x |                                                || . . . . . . . . x . x
. . . . . . . . x . . | . . . . . . . . . . . |. . . . . . . . . . x |                                                || . . . . . . . . x . x
============
Nah terus begitu....nanti huruf A-nya Jalan (tanda x = LED ON)....Maaf gambarannya jelek.......Ingat harus bagian bawa dulu atau shift register dahulu yg jalan (kolom) baru baris.........
IKAN LAPER
PENDIDIKAN PELATIHAN PENYIAR & REPORTER

Offline Iccank Devilz

  • Newbie
  • *
  • Tulisan: 13
    • http://www.zer07even.com
Re:Mikrokontroler dengan Dot Matrik
« Jawab #10 pada: Oktober 29, 2011, 02:40:08 PM »
dot matrixnya brapa x brapa mas??
Robotic & Microcontroller @ http://www.zer07even.com

Offline M Febriansyah

  • Full Member
  • ****
  • Tulisan: 173
  • SINTESA IKAN LAPER 3
Re:Mikrokontroler dengan Dot Matrik
« Jawab #11 pada: November 17, 2011, 10:27:00 AM »
dot matrixnya brapa x brapa mas??

Yang standart bisa (5x7) atau yang agak besar juga boleh (8x8) yang penting di IC shift registernya Bung.... dada2
IKAN LAPER
PENDIDIKAN PELATIHAN PENYIAR & REPORTER

Offline rey

  • Jr. Member
  • **
  • Tulisan: 69
Re:Mikrokontroler dengan Dot Matrik
« Jawab #12 pada: Agustus 03, 2012, 01:33:27 PM »
ada yg punya schematic running tex pakai pic degan 7 segmen????? para master mohon bantuanya .... drop1

Offline dendi90

  • Newbie
  • *
  • Tulisan: 10
Re:Mikrokontroler dengan Dot Matrik
« Jawab #13 pada: Maret 30, 2013, 05:01:17 AM »
salam knal smuanya gan
mta tulung dunk gan, ada yang punya contoh  source code running text led at89s51
yang msih dalam bntuk .asm atu .txt
mohon bantuanya agan-agan... :) :)
trima kasih sblumnya gan.

Offline wawan29

  • Newbie
  • *
  • Tulisan: 1
Re:Mikrokontroler dengan Dot Matrik
« Jawab #14 pada: Februari 04, 2014, 05:01:26 AM »
hallo salam kenal
 kalau yang pake ic hef4094 gimana ya pak soalnya ini lagi belajar tentang itu.
Terima kasih