Hallo Forum,
i have a 5x7 Led Matrix and i will scroll a Message. The Message are in a Table and the Charters are in EEProm. I write a Code, but the Message not scroll.
Why not scroll the message ? Where is the Fallacy.
Greetings Chris
i have a 5x7 Led Matrix and i will scroll a Message. The Message are in a Table and the Charters are in EEProm. I write a Code, but the Message not scroll.
Why not scroll the message ? Where is the Fallacy.
Greetings Chris
Code:
'#############################################
'## PINOUT 20X2 ##
'## ##
'## Pin b.0 = Sdata ##
'## Pin B.1 = Sclock ##
'## Pin B.2 = Strobe ##
'## Pin B.3 = Column ##
'## Pin B.4 = Res ##
'## ##
'#############################################
#picaxe 20X2
setfreq m64
dirsB = %11111111
adcsetup = 0
symbol Sdata = Pinb.0
symbol Sclock = b.1
symbol Strobe = b.2
symbol Column = b.3
symbol Res = b.4
symbol Value = b0
symbol Position = b1
symbol Char = b2
symbol Crevice = b3
symbol Loops = b4
symbol Search = b5
symbol Sign = b6
eeprom 0,(248,36,34,36,248,0) ;A
eeprom 6,(130,254,146,146,124,0) ;B
eeprom 12,(124,130,130,130,68,0) ;C
eeprom 18,(130,254,130,130,124,0) ;D
eeprom 24,(254,146,146,130,130,0) ;E
eeprom 30,(254,18,18,2,2,0) ;F
eeprom 36,(124,130,146,146,116,0) ;G
eeprom 42,(254,16,16,16,254,0) ;H
eeprom 48,(0,130,254,130,0,0) ;I
eeprom 54,(64,128,130,126,2,0) ;J
eeprom 60,(254,16,40,68,130,0) ;K
eeprom 66,(254,128,128,128,128,0) ;L
eeprom 72,(254,4,24,4,254,0) ;M
eeprom 78,(254,4,8,16,254,0) ;N
eeprom 84,(124,130,130,130,124,0) ;O
eeprom 90,(254,18,18,18,12,0) ;P
eeprom 96,(124,130,130,66,188,0) ;Q
eeprom 102,(254,18,50,82,140,0) ;R
eeprom 108,(76,146,146,146,100,0) ;S
eeprom 114,(2,2,254,2,2,0) ;T
eeprom 120,(126,128,128,128,126,0) ;U
eeprom 126,(14,48,192,48,14,0) ;V
eeprom 132,(254,64,48,64,254,0) ;W
eeprom 138,(198,40,16,40,198,0) ;X
eeprom 144,(6,8,240,8,6,0) ;Y
eeprom 150,(194,162,146,138,134,0) ;Z
eeprom 156,(124,162,146,138,124,0) ;0
eeprom 162,(0,132,254,128,0,0) ;1
eeprom 168,(228,146,146,146,140,0) ;2
eeprom 174,(68,130,146,146,108,0) ;3
eeprom 180,(48,40,36,254,32,0) ;4
eeprom 186,(78,138,138,138,114,0) ;5
eeprom 192,(120,148,146,146,96,0) ;6
eeprom 198,(2,226,18,10,6,0) ;7
eeprom 204,(108,146,146,146,108,0) ;8
eeprom 210,(12,146,146,82,60,0) ;9
eeprom 216,(0,0,0,0,0,0) ;Space
eeprom 222,(16,16,16,16,16,0) ;-
eeprom 228,(16,16,124,16,16,0) ;+
eeprom 234,(84,56,254,56,84,0) ;*
eeprom 240,(0,130,68,40,16,0) ;>
eeprom 246,(16,40,68,130,0,0) ;<
table 0,("MARRY CHRISTMAS") ;Output Message
start:
for Search = 0 to 14 ;(Marry Christmas)
readtable Search,Sign
lookdown Sign,("ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789 -+*><"),Char
Char = Char * 6 ;(EEprom, each 6 Chars)
main:
For Loops = 0 To 30
For Crevice = 0 To 4
Position=Crevice+Char
read Position,Value ' Shift Register read
Sdata = bit7 : pulsout Sclock,1
Sdata = bit6 : pulsout Sclock,1
Sdata = bit5 : pulsout Sclock,1
Sdata = bit4 : pulsout Sclock,1
Sdata = bit3 : pulsout Sclock,1
Sdata = bit2 : pulsout Sclock,1
Sdata = bit1 : pulsout Sclock,1
Sdata = bit0 : pulsout Sclock,1
pulsout Strobe,1 ' Shift Register set (Strobe)
Sdata = 0 ' Shift Register clear
pulsout Sclock,1
pulsout Sclock,1
pulsout Sclock,1
pulsout Sclock,1
pulsout Sclock,1
pulsout Sclock,1
pulsout Sclock,1
pulsout Sclock,1
pulsout Strobe,1 ' Shift Register set (Strobe)
pulsout Column,1
next Crevice
inc Crevice
next Loops
pulsout Res,1
next Search
if Search>14 then goto Start
goto main