Subversion Repositories Kolibri OS

Rev

Rev 999 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 999 Rev 1079
Line 59... Line 59...
59
gif.Block.Introducer.Extension	     = 0x21
59
gif.Block.Introducer.Extension	     = 0x21
60
gif.Block.Introducer.ImageDescriptor = 0x2C
60
gif.Block.Introducer.ImageDescriptor = 0x2C
61
gif.Block.Introducer.EndOfFile	     = 0x3B
61
gif.Block.Introducer.EndOfFile	     = 0x3B
Line 62... Line 62...
62
 
62
 
-
 
63
struct gif.ImageDescriptor ; GIF87a
-
 
64
; we read Introducer before parsing gif.ImageDescriptor,
63
struct gif.ImageDescriptor ; GIF87a
65
; so it is convenient to not include it in struct
64
  b	     gif.Block ; Introducer = 2Ch (',')
66
;  b	     gif.Block ; Introducer = 2Ch (',')
65
  Left	     dw ?      ; X position of image on the display
67
  Left	     dw ?      ; X position of image on the display
66
  Top	     dw ?      ; Y position of image on the display
68
  Top	     dw ?      ; Y position of image on the display
67
  Width      dw ?      ; Width of the image in pixels
69
  Width      dw ?      ; Width of the image in pixels
68
  Height     dw ?      ; Height of the image in pixels
70
  Height     dw ?      ; Height of the image in pixels
Line 87... Line 89...
87
gif.Extension.Label.GraphicsControl = 0xF9
89
gif.Extension.Label.GraphicsControl = 0xF9
88
gif.Extension.Label.Comment	    = 0xFE
90
gif.Extension.Label.Comment	    = 0xFE
89
gif.Extension.Label.Application     = 0xFF
91
gif.Extension.Label.Application     = 0xFF
Line 90... Line 92...
90
 
92
 
91
struct gif.PlainTextExtension ; GIF89a
93
struct gif.PlainTextExtension ; GIF89a
92
  e		   gif.Extension ; Label = 01h
94
;  e		   gif.Extension ; Label = 01h
93
  BlockSize	   db ? 	 ; Size of Extension Block (always 0Ch)
95
;  BlockSize	   db ? 	 ; Size of Extension Block (always 0Ch)
94
  TextGridLeft	   dw ? 	 ; X position of text grid in pixels
96
  TextGridLeft	   dw ? 	 ; X position of text grid in pixels
95
  TextGridTop	   dw ? 	 ; Y position of text grid in pixels
97
  TextGridTop	   dw ? 	 ; Y position of text grid in pixels
96
  TextGridWidth    dw ? 	 ; Width of the text grid in pixels
98
  TextGridWidth    dw ? 	 ; Width of the text grid in pixels
97
  TextGridHeight   dw ? 	 ; Height of the text grid in pixels
99
  TextGridHeight   dw ? 	 ; Height of the text grid in pixels
Line 102... Line 104...
102
  PlainTextData    db ? 	 ; The Plain Text data (*)
104
  PlainTextData    db ? 	 ; The Plain Text data (*)
103
; Terminator       db ?          ; Block Terminator (always 0)
105
; Terminator       db ?          ; Block Terminator (always 0)
104
ends
106
ends
Line 105... Line 107...
105
 
107
 
106
struct gif.GraphicsControlExtension ; GIF89a
108
struct gif.GraphicsControlExtension ; GIF89a
107
  e	     gif.Extension ; Label = F9h
109
;  e	     gif.Extension ; Label = F9h
-
 
110
;  BlockSize  db ?	   ; Size of remaining fields (always 04h)
-
 
111
; previous fields are not included in this structure for convenience
108
  BlockSize  db ?	   ; Size of remaining fields (always 04h)
112
; (they are parsed before this)
109
  Packed     db ?	   ; Method of graphics disposal to use
113
  Packed     db ?	   ; Method of graphics disposal to use
110
  DelayTime  dw ?	   ; Hundredths of seconds to wait
114
  DelayTime  dw ?	   ; Hundredths of seconds to wait
111
  ColorIndex db ?	   ; Transparent Color Index
115
  ColorIndex db ?	   ; Transparent Color Index
112
; Terminator db ?          ; Block Terminator (always 0)
116
; Terminator db ?          ; Block Terminator (always 0)
Line 128... Line 132...
128
ends
132
ends
Line 129... Line 133...
129
 
133
 
Line 130... Line 134...
130
;;------------------------------------------------------------------------------------------------;;
134
;;------------------------------------------------------------------------------------------------;;
131
 
-
 
132
struct gif.Image
135
 
-
 
136
struct gif.Image
-
 
137
  info gif.ImageDescriptor
133
  gce  gif.GraphicsControlExtension
138
  gce  gif.GraphicsControlExtension
Line 134... Line 139...
134
  info gif.ImageDescriptor
139
;  lsd  gif.LogicalScreenDescriptor ; saved only in first image