i have found an error on the Sub
[code:1:0fc51f6317]Sub Writecustomcharacter(byval Characters As Byte)
Local Count As Byte
For Count = 1 To Characters 'Number of characters that need to be programmed, must match with the characters in the data
Restore Customcharacter 'Goto the begin of the data
Writereg Vm0 , &B01000100 'Disable osd
Read Regdata 'Read the first databyte, is the character to will be programmed
Writereg Cmah , Regdata 'Write to the register
For Lus = 0 To 53 'Each Character is made of 54bytes
Writereg Cmal , Lus 'Write the byteno of the character
Read Regdata 'Read the data from the datatable
Writereg Cmdi , Regdata 'program the data in the shadowram
Next Lus
Writereg Cmm , &HA0 'Copy shadowram to NVram
Waitms 200 'Wait until copy is ready
Next Count
Writereg Vm0 , &B01001100 'enable osd
End Sub[/code:1:0fc51f6317]
I dont know why, but it flashed only the first char into the max7456!
↧
