GIF decoder

$regfile = "m32def.dat"
$crystal = 8000000
$hwstack = 32
$swstack = 32
$framesize = 24

'---- this section from Gif Properties
Const Total_frame = 8
Const Width = 24
Const Height = 24
'---- end of Gif Properties

Const Number_of_matrix_in_row = Width / 8
Const Byte_in_col = Height / 8
Const Frame_size = Width * Byte_in_col
Const Number_of_byte_in_8_col = Byte_in_col * 8

Declare Sub Readframe(byval Frame_number As Word)
' Port A for COL refresh
Config Porta = Output
' Port D for 74595 register
Config Portd = Output
Config Timer0 = Timer , Prescale = 64                       'Clock value: 15.625 kHz
On Ovf0 Refresh
Enable Timer0                                               ' enable the timer interrupt
Enable Interrupts
Sh_cp Alias Portd.3
Ds Alias Portd.4
St_cp Alias Portd.5
Mr Alias Portd.6
Oe Alias Portd.7
Col_port Alias Porta
Dim Col As Byte
Dim Buf(frame_size) As Byte
Dim I As Byte
Dim Matrix_counter As Word
Dim Buf_idx As Word
Dim Col_number_in_buf As Byte
Dim Frame_count As Word

Reset Mr
Set Mr
Reset Oe
Do
For Frame_count = 1 To Total_frame
Readframe Frame_count
Waitms 200
Next Frame_count
Loop
End                                                         'end program

Sub Readframe(byval Frame_number As Word)
Local Idx As Word
Local Lookup_idx As Word
Disable Timer0
Decr Frame_number
'Start of Frame in lookup table
Lookup_idx = Frame_number * Frame_size
For Idx = 0 To Frame_size
  Buf(idx) = Lookup(lookup_idx , Ani )
  Incr Lookup_idx
Next Idx
Enable Timer0
End Sub

Refresh:
Reset Mr
Set Mr
Col_port = &H00
Set Oe
Col_port = 2 ^ Col
For Matrix_counter = 1 To Number_of_matrix_in_row
  Col_number_in_buf = Number_of_matrix_in_row - Matrix_counter
  Col_number_in_buf = Col_number_in_buf * Number_of_byte_in_8_col
  Buf_idx = Col * Byte_in_col
  Buf_idx = Buf_idx + Col_number_in_buf
  For I = 1 To Byte_in_col
   Shiftout Ds , Sh_cp , Buf(buf_idx) , 1 , 8
   Incr Buf_idx
  Next I
Next Matrix_counter
Reset St_cp
Set St_cp
Reset Oe
If Col < 7 Then
Incr Col
Else
Col = 0
End If
Return

'---- this delay table from Frame Properties
Delay:
'Frame 1
Data 200%
'Frame 2
Data 100%
'Frame 3
Data 100%
'Frame 4
Data 100%
'Frame 5
Data 100%
'Frame 6
Data 100%
'Frame 7
Data 100%
'Frame 8
Data 100%

Ani:

Test Gif Animation

Sample Gif Animation (click to generate code)

'****************************************************
'* This Code Generate By : Hossein Lachini          *
'* The GIF Animation to Hex Code for LED Sign Board *
'* For to get more details visit :                  *
'*                           www.HLachini.com       *
'* Contact to me by : eLachini@Gmail.com            *
'* Mobile/SMS :              +98 912 381 2060       *
'****************************************************
' Width : 24
' Height : 24
' Toltal Frame : 12

' Frame 1
' Delay : 200ms
Data &H3F, &H33, &HF3 '..######..##..######..##

Data &H3F, &H33, &HF3 '..######..##..######..##

Data &HCC, &HFC, &HCF '##..##..######..##..####

Data &HF3, &HCF, &H3C '####..####..####..####..

Data &HCC, &HFC, &HCF '##..##..######..##..####

Data &H3F, &H33, &HF3 '..######..##..######..##

Data &HF3, &HCF, &H3C '####..####..####..####..

Data &H3F, &H33, &HF3 '..######..##..######..##

Data &HCC, &HFC, &HCF '##..##..######..##..####

Data &HF3, &HCF, &H3C '####..####..####..####..

Data &HCC, &HFC, &HCF '##..##..######..##..####

Data &H3F, &H33, &HF3 '..######..##..######..##

Data &HF3, &HCF, &H3C '####..####..####..####..

' Frame 2
' Delay : 200ms
Data &H7F, &HB7, &HFB '.########.##.########.##

Data &HBF, &H7B, &HF7 '#.######.####.######.###

Data &HDE, &HFD, &HEF '##.####.######.####.####

Data &HED, &HFE, &HDF '###.##.########.##.#####

Data &HF3, &HFF, &H3F '####..##########..######

Data &HED, &HFE, &HDF '###.##.########.##.#####

Data &HDE, &HFD, &HEF '##.####.######.####.####

Data &HBF, &H7B, &HF7 '#.######.####.######.###

Data &H7F, &HB7, &HFB '.########.##.########.##

Data &HFF, &HCF, &HFC '##########..##########..

Data &H7F, &HB7, &HFB '.########.##.########.##

Data &HBF, &H7B, &HF7 '#.######.####.######.###

Data &HDE, &HFD, &HEF '##.####.######.####.####

Data &HED, &HFE, &HDF '###.##.########.##.#####

Data &HF3, &HFF, &H3F '####..##########..######

Data &HED, &HFE, &HDF '###.##.########.##.#####

Data &HDE, &HFD, &HEF '##.####.######.####.####

Data &HBF, &H7B, &HF7 '#.######.####.######.###

Data &H7F, &HB7, &HFB '.########.##.########.##

Data &HFF, &HCF, &HFC '##########..##########..

' Frame 3
' Delay : 200ms
Data &H7F, &HB7, &HFB '.########.##.########.##

Data &HBF, &H7B, &HF7 '#.######.####.######.###

Data &HDE, &HFD, &HEF '##.####.######.####.####

Data &HED, &HFE, &HDF '###.##.########.##.#####

Data &HF3, &HCF, &H3C '####..####..####..####..

Data &HED, &HFE, &HDF '###.##.########.##.#####

Data &HDE, &HFD, &HEF '##.####.######.####.####

Data &HBF, &H7B, &HF7 '#.######.####.######.###

Data &H7F, &HB7, &HFB '.########.##.########.##

Data &HF3, &HCF, &H3C '####..####..####..####..

Data &H7F, &HB7, &HFB '.########.##.########.##

Data &HBF, &H7B, &HF7 '#.######.####.######.###

Data &HDE, &HFD, &HEF '##.####.######.####.####

Data &HED, &HFE, &HDF '###.##.########.##.#####

Data &HF3, &HCF, &H3C '####..####..####..####..

Data &HED, &HFE, &HDF '###.##.########.##.#####

Data &HDE, &HFD, &HEF '##.####.######.####.####

Data &HBF, &H7B, &HF7 '#.######.####.######.###

Data &H7F, &HB7, &HFB '.########.##.########.##

Data &HF3, &HCF, &H3C '####..####..####..####..

' Frame 4
' Delay : 200ms
Data &H73, &H87, &H38 '.###..###....###..###...

Data &HB3, &H4B, &H34 '#.##..##.#..#.##..##.#..

Data &HD2, &HCD, &H2C '##.#..#.##..##.#..#.##..

Data &HE1, &HCE, &H1C '###....###..###....###..

Data &H00, &H00, &H00 '........................

Data &HE1, &HCE, &H1C '###....###..###....###..

Data &HD2, &HCD, &H2C '##.#..#.##..##.#..#.##..

Data &HB3, &H4B, &H34 '#.##..##.#..#.##..##.#..

Data &H73, &H87, &H38 '.###..###....###..###...

Data &H00, &H00, &H00 '........................

Data &H73, &H87, &H38 '.###..###....###..###...

Data &HB3, &H4B, &H34 '#.##..##.#..#.##..##.#..

Data &HD2, &HCD, &H2C '##.#..#.##..##.#..#.##..

Data &HE1, &HCE, &H1C '###....###..###....###..

Data &H00, &H00, &H00 '........................

Data &HE1, &HCE, &H1C '###....###..###....###..

Data &HD2, &HCD, &H2C '##.#..#.##..##.#..#.##..

Data &HB3, &H4B, &H34 '#.##..##.#..#.##..##.#..

Data &H73, &H87, &H38 '.###..###....###..###...

Data &H00, &H00, &H00 '........................

' Frame 5
' Delay : 200ms
Data &H61, &H86, &H18 '.##....##....##....##...

Data &HB3, &H4B, &H34 '#.##..##.#..#.##..##.#..

Data &HD2, &HCD, &H2C '##.#..#.##..##.#..#.##..

Data &H61, &H86, &H18 '.##....##....##....##...

Data &H00, &H00, &H00 '........................

Data &H61, &H86, &H18 '.##....##....##....##...

Data &HD2, &HCD, &H2C '##.#..#.##..##.#..#.##..

Data &HB3, &H4B, &H34 '#.##..##.#..#.##..##.#..

Data &H61, &H86, &H18 '.##....##....##....##...

Data &H00, &H00, &H00 '........................

Data &H61, &H86, &H18 '.##....##....##....##...

Data &HB3, &H4B, &H34 '#.##..##.#..#.##..##.#..

Data &HD2, &HCD, &H2C '##.#..#.##..##.#..#.##..

Data &H61, &H86, &H18 '.##....##....##....##...

Data &H00, &H00, &H00 '........................

Data &H61, &H86, &H18 '.##....##....##....##...

Data &HD2, &HCD, &H2C '##.#..#.##..##.#..#.##..

Data &HB3, &H4B, &H34 '#.##..##.#..#.##..##.#..

Data &H61, &H86, &H18 '.##....##....##....##...

Data &H00, &H00, &H00 '........................

' Frame 6
' Delay : 200ms
Data &H9E, &H79, &HE7 '#..####..####..####..###

Data &H4C, &HB4, &HCB '.#..##..#.##.#..##..#.##

Data &H2D, &H32, &HD3 '..#.##.#..##..#.##.#..##

Data &H9E, &H79, &HE7 '#..####..####..####..###

Data &HFF, &HFF, &HFF '########################

Data &H9E, &H79, &HE7 '#..####..####..####..###

Data &H2D, &H32, &HD3 '..#.##.#..##..#.##.#..##

Data &H4C, &HB4, &HCB '.#..##..#.##.#..##..#.##

Data &H9E, &H79, &HE7 '#..####..####..####..###

Data &HFF, &HFF, &HFF '########################

Data &H9E, &H79, &HE7 '#..####..####..####..###

Data &H4C, &HB4, &HCB '.#..##..#.##.#..##..#.##

Data &H2D, &H32, &HD3 '..#.##.#..##..#.##.#..##

Data &H9E, &H79, &HE7 '#..####..####..####..###

Data &HFF, &HFF, &HFF '########################

Data &H9E, &H79, &HE7 '#..####..####..####..###

Data &H2D, &H32, &HD3 '..#.##.#..##..#.##.#..##

Data &H4C, &HB4, &HCB '.#..##..#.##.#..##..#.##

Data &H9E, &H79, &HE7 '#..####..####..####..###

Data &HFF, &HFF, &HFF '########################

' Frame 7
' Delay : 200ms
Data &H9E, &H79, &HE7 '#..####..####..####..###

Data &H4C, &HB4, &HCB '.#..##..#.##.#..##..#.##

Data &H2D, &H32, &HD3 '..#.##.#..##..#.##.#..##

Data &H9E, &H79, &HE7 '#..####..####..####..###

Data &HF3, &HCF, &H3C '####..####..####..####..

Data &H9E, &H79, &HE7 '#..####..####..####..###

Data &H2D, &H32, &HD3 '..#.##.#..##..#.##.#..##

Data &H4C, &HB4, &HCB '.#..##..#.##.#..##..#.##

Data &H9E, &H79, &HE7 '#..####..####..####..###

Data &HF3, &HCF, &H3C '####..####..####..####..

Data &H9E, &H79, &HE7 '#..####..####..####..###

Data &H4C, &HB4, &HCB '.#..##..#.##.#..##..#.##

Data &H2D, &H32, &HD3 '..#.##.#..##..#.##.#..##

Data &H9E, &H79, &HE7 '#..####..####..####..###

Data &HF3, &HCF, &H3C '####..####..####..####..

Data &H9E, &H79, &HE7 '#..####..####..####..###

Data &H2D, &H32, &HD3 '..#.##.#..##..#.##.#..##

Data &H4C, &HB4, &HCB '.#..##..#.##.#..##..#.##

Data &H9E, &H79, &HE7 '#..####..####..####..###

Data &HF3, &HCF, &H3C '####..####..####..####..

' Frame 8
' Delay : 200ms
Data &H55, &H55, &H55 '.#.#.#.#.#.#.#.#.#.#.#.#

Data &HAA, &HAA, &HAA '#.#.#.#.#.#.#.#.#.#.#.#.

Data &H55, &H55, &H55 '.#.#.#.#.#.#.#.#.#.#.#.#

Data &HAA, &HAA, &HAA '#.#.#.#.#.#.#.#.#.#.#.#.

Data &H55, &H55, &H55 '.#.#.#.#.#.#.#.#.#.#.#.#

Data &HAA, &HAA, &HAA '#.#.#.#.#.#.#.#.#.#.#.#.

Data &H55, &H55, &H55 '.#.#.#.#.#.#.#.#.#.#.#.#

Data &HAA, &HAA, &HAA '#.#.#.#.#.#.#.#.#.#.#.#.

Data &H55, &H55, &H55 '.#.#.#.#.#.#.#.#.#.#.#.#

Data &HAA, &HAA, &HAA '#.#.#.#.#.#.#.#.#.#.#.#.

Data &H55, &H55, &H55 '.#.#.#.#.#.#.#.#.#.#.#.#

Data &HAA, &HAA, &HAA '#.#.#.#.#.#.#.#.#.#.#.#.

Data &H55, &H55, &H55 '.#.#.#.#.#.#.#.#.#.#.#.#

Data &HAA, &HAA, &HAA '#.#.#.#.#.#.#.#.#.#.#.#.

Data &H55, &H55, &H55 '.#.#.#.#.#.#.#.#.#.#.#.#

Data &HAA, &HAA, &HAA '#.#.#.#.#.#.#.#.#.#.#.#.

Data &H55, &H55, &H55 '.#.#.#.#.#.#.#.#.#.#.#.#

Data &HAA, &HAA, &HAA '#.#.#.#.#.#.#.#.#.#.#.#.

Data &H55, &H55, &H55 '.#.#.#.#.#.#.#.#.#.#.#.#

Data &HAA, &HAA, &HAA '#.#.#.#.#.#.#.#.#.#.#.#.

Data &H55, &H55, &H55 '.#.#.#.#.#.#.#.#.#.#.#.#

Data &HAA, &HAA, &HAA '#.#.#.#.#.#.#.#.#.#.#.#.

Data &H55, &H55, &H55 '.#.#.#.#.#.#.#.#.#.#.#.#

Data &HAA, &HAA, &HAA '#.#.#.#.#.#.#.#.#.#.#.#.

' Frame 9
' Delay : 200ms
Data &H55, &H55, &H55 '.#.#.#.#.#.#.#.#.#.#.#.#

Data &HEE, &HEE, &HEE '###.###.###.###.###.###.

Data &H55, &H55, &H55 '.#.#.#.#.#.#.#.#.#.#.#.#

Data &HBB, &HBB, &HBA '#.###.###.###.###.###.#.

Data &H55, &H55, &H55 '.#.#.#.#.#.#.#.#.#.#.#.#

Data &HEE, &HEE, &HEA '###.###.###.###.###.#.#.

Data &H55, &H55, &H55 '.#.#.#.#.#.#.#.#.#.#.#.#

Data &HBB, &HBB, &HAA '#.###.###.###.###.#.#.#.

Data &H55, &H55, &H55 '.#.#.#.#.#.#.#.#.#.#.#.#

Data &HEE, &HEE, &HAA '###.###.###.###.#.#.#.#.

Data &H55, &H55, &H55 '.#.#.#.#.#.#.#.#.#.#.#.#

Data &HBB, &HBA, &HAA '#.###.###.###.#.#.#.#.#.

Data &H55, &H55, &H55 '.#.#.#.#.#.#.#.#.#.#.#.#

Data &HEE, &HEA, &HAA '###.###.###.#.#.#.#.#.#.

Data &H55, &H55, &H55 '.#.#.#.#.#.#.#.#.#.#.#.#

Data &HBB, &HAA, &HAA '#.###.###.#.#.#.#.#.#.#.

Data &H55, &H55, &H55 '.#.#.#.#.#.#.#.#.#.#.#.#

Data &HEE, &HAA, &HAA '###.###.#.#.#.#.#.#.#.#.

Data &H55, &H55, &H55 '.#.#.#.#.#.#.#.#.#.#.#.#

Data &HBA, &HAA, &HAA '#.###.#.#.#.#.#.#.#.#.#.

Data &H55, &H55, &H55 '.#.#.#.#.#.#.#.#.#.#.#.#

Data &HEA, &HAA, &HAA '###.#.#.#.#.#.#.#.#.#.#.

Data &H55, &H55, &H55 '.#.#.#.#.#.#.#.#.#.#.#.#

Data &HAA, &HAA, &HAA '#.#.#.#.#.#.#.#.#.#.#.#.

' Frame 10
' Delay : 200ms
Data &HAA, &HAA, &HAA '#.#.#.#.#.#.#.#.#.#.#.#.

Data &H11, &H11, &H11 '...#...#...#...#...#...#

Data &HAA, &HAA, &HAA '#.#.#.#.#.#.#.#.#.#.#.#.

Data &H44, &H44, &H45 '.#...#...#...#...#...#.#

Data &HAA, &HAA, &HAA '#.#.#.#.#.#.#.#.#.#.#.#.

Data &H11, &H11, &H15 '...#...#...#...#...#.#.#

Data &HAA, &HAA, &HAA '#.#.#.#.#.#.#.#.#.#.#.#.

Data &H44, &H44, &H55 '.#...#...#...#...#.#.#.#

Data &HAA, &HAA, &HAA '#.#.#.#.#.#.#.#.#.#.#.#.

Data &H11, &H11, &H55 '...#...#...#...#.#.#.#.#

Data &HAA, &HAA, &HAA '#.#.#.#.#.#.#.#.#.#.#.#.

Data &H44, &H45, &H55 '.#...#...#...#.#.#.#.#.#

Data &HAA, &HAA, &HAA '#.#.#.#.#.#.#.#.#.#.#.#.

Data &H11, &H15, &H55 '...#...#...#.#.#.#.#.#.#

Data &HAA, &HAA, &HAA '#.#.#.#.#.#.#.#.#.#.#.#.

Data &H44, &H55, &H55 '.#...#...#.#.#.#.#.#.#.#

Data &HAA, &HAA, &HAA '#.#.#.#.#.#.#.#.#.#.#.#.

Data &H11, &H55, &H55 '...#...#.#.#.#.#.#.#.#.#

Data &HAA, &HAA, &HAA '#.#.#.#.#.#.#.#.#.#.#.#.

Data &H45, &H55, &H55 '.#...#.#.#.#.#.#.#.#.#.#

Data &HAA, &HAA, &HAA '#.#.#.#.#.#.#.#.#.#.#.#.

Data &H15, &H55, &H55 '...#.#.#.#.#.#.#.#.#.#.#

Data &HAA, &HAA, &HAA '#.#.#.#.#.#.#.#.#.#.#.#.

Data &H55, &H55, &H55 '.#.#.#.#.#.#.#.#.#.#.#.#

' Frame 11
' Delay : 200ms
Data &H55, &H55, &H55 '.#.#.#.#.#.#.#.#.#.#.#.#

Data &HEE, &HEE, &HEE '###.###.###.###.###.###.

Data &H55, &H55, &H55 '.#.#.#.#.#.#.#.#.#.#.#.#

Data &HBB, &HBB, &HBA '#.###.###.###.###.###.#.

Data &H55, &H55, &H57 '.#.#.#.#.#.#.#.#.#.#.###

Data &HEE, &HEE, &HEA '###.###.###.###.###.#.#.

Data &H55, &H55, &H5D '.#.#.#.#.#.#.#.#.#.###.#

Data &HBB, &HBB, &HAA '#.###.###.###.###.#.#.#.

Data &H55, &H55, &H77 '.#.#.#.#.#.#.#.#.###.###

Data &HEE, &HEE, &HAA '###.###.###.###.#.#.#.#.

Data &H55, &H55, &HDD '.#.#.#.#.#.#.#.###.###.#

Data &HBB, &HBA, &HAA '#.###.###.###.#.#.#.#.#.

Data &H55, &H57, &H77 '.#.#.#.#.#.#.###.###.###

Data &HEE, &HEA, &HAA '###.###.###.#.#.#.#.#.#.

Data &H55, &H5D, &HDD '.#.#.#.#.#.###.###.###.#

Data &HBB, &HAA, &HAA '#.###.###.#.#.#.#.#.#.#.

Data &H55, &H77, &H77 '.#.#.#.#.###.###.###.###

Data &HEE, &HAA, &HAA '###.###.#.#.#.#.#.#.#.#.

Data &H55, &HDD, &HDD '.#.#.#.###.###.###.###.#

Data &HBA, &HAA, &HAA '#.###.#.#.#.#.#.#.#.#.#.

Data &H57, &H77, &H77 '.#.#.###.###.###.###.###

Data &HEA, &HAA, &HAA '###.#.#.#.#.#.#.#.#.#.#.

Data &H5D, &HDD, &HDD '.#.###.###.###.###.###.#

Data &HAA, &HAA, &HAA '#.#.#.#.#.#.#.#.#.#.#.#.

' Frame 12
' Delay : 200ms
Data &HAA, &HAA, &HAA '#.#.#.#.#.#.#.#.#.#.#.#.

Data &H11, &H11, &H11 '...#...#...#...#...#...#

Data &HAA, &HAA, &HAA '#.#.#.#.#.#.#.#.#.#.#.#.

Data &H44, &H44, &H45 '.#...#...#...#...#...#.#

Data &HAA, &HAA, &HA8 '#.#.#.#.#.#.#.#.#.#.#...

Data &H11, &H11, &H15 '...#...#...#...#...#.#.#

Data &HAA, &HAA, &HA2 '#.#.#.#.#.#.#.#.#.#...#.

Data &H44, &H44, &H55 '.#...#...#...#...#.#.#.#

Data &HAA, &HAA, &H88 '#.#.#.#.#.#.#.#.#...#...

Data &H11, &H11, &H55 '...#...#...#...#.#.#.#.#

Data &HAA, &HAA, &H22 '#.#.#.#.#.#.#.#...#...#.

Data &H44, &H45, &H55 '.#...#...#...#.#.#.#.#.#

Data &HAA, &HA8, &H88 '#.#.#.#.#.#.#...#...#...

Data &H11, &H15, &H55 '...#...#...#.#.#.#.#.#.#

Data &HAA, &HA2, &H22 '#.#.#.#.#.#...#...#...#.

Data &H44, &H55, &H55 '.#...#...#.#.#.#.#.#.#.#

Data &HAA, &H88, &H88 '#.#.#.#.#...#...#...#...

Data &H11, &H55, &H55 '...#...#.#.#.#.#.#.#.#.#

Data &HAA, &H22, &H22 '#.#.#.#...#...#...#...#.

Data &H45, &H55, &H55 '.#...#.#.#.#.#.#.#.#.#.#

Data &HA8, &H88, &H88 '#.#.#...#...#...#...#...

Data &H15, &H55, &H55 '...#.#.#.#.#.#.#.#.#.#.#

Data &HA2, &H22, &H22 '#.#...#...#...#...#...#.

Data &H55, &H55, &H55 '.#.#.#.#.#.#.#.#.#.#.#.#

Led Sign Tool by Hossein Lachini