diff --git a/InForm/extensions/GIFPlay.bas b/InForm/extensions/GIFPlay.bas index 2762122..e34d4a5 100644 --- a/InForm/extensions/GIFPlay.bas +++ b/InForm/extensions/GIFPlay.bas @@ -621,7 +621,6 @@ $IF GIFPLAY_BAS = UNDEFINED THEN rawFrame.globalPalette = STRING$(768, 0) rawFrame.localPalette = STRING$(768, 0) rawFrame.transparentColor = -1 ' no transparent color - rawFrame.duration = 10 ' 0.1 seconds if no duration is specified (this behavior is from the erstwhile GIFPlay library) ' Global color table? IF _READBIT(i, 7) THEN rawFrame.globalColors = _SHL(1, ((i AND 7) + 1)) @@ -715,6 +714,7 @@ $IF GIFPLAY_BAS = UNDEFINED THEN END IF __GIFPlay(idx).lastFrame = frameIdx ' make the last frame to point to this __GIFPlayFrame(frameIdx).disposalMethod = rawFrame.disposalMethod + IF rawFrame.duration = 0 THEN rawFrame.duration = 10 ' 0.1 seconds if no duration is specified (this behavior is from the erstwhile GIFPlay library) __GIFPlayFrame(frameIdx).duration = rawFrame.duration * 10 ' convert to ticks (ms) __GIFPlay(idx).duration = __GIFPlay(idx).duration + __GIFPlayFrame(frameIdx).duration ' add the frame duration to the global duration __GIFPlay(idx).frameCount = __GIFPlay(idx).frameCount + 1 @@ -724,7 +724,7 @@ $IF GIFPLAY_BAS = UNDEFINED THEN rawFrame.localPalette = STRING$(768, 0) rawFrame.disposalMethod = 0 rawFrame.transparentColor = -1 ' no transparent color - rawFrame.duration = 10 ' 0.1 seconds if no duration is specified (this behavior is from the erstwhile GIFPlay library) + rawFrame.duration = 0 CASE &H21 ' extension introducer DIM j AS _UNSIGNED _BYTE: j = StringFile_ReadByte(sf) ' extension type diff --git a/examples/GIFPlaySample/fire.gif b/examples/GIFPlaySample/fire.gif new file mode 100644 index 0000000..c9265fa Binary files /dev/null and b/examples/GIFPlaySample/fire.gif differ diff --git a/examples/GIFPlaySample/gifgrid.gif b/examples/GIFPlaySample/gifgrid.gif new file mode 100644 index 0000000..777c267 Binary files /dev/null and b/examples/GIFPlaySample/gifgrid.gif differ diff --git a/examples/GIFPlaySample/porsche.gif b/examples/GIFPlaySample/porsche.gif new file mode 100644 index 0000000..916014e Binary files /dev/null and b/examples/GIFPlaySample/porsche.gif differ diff --git a/examples/GIFPlaySample/solid2.gif b/examples/GIFPlaySample/solid2.gif new file mode 100644 index 0000000..4e9524b Binary files /dev/null and b/examples/GIFPlaySample/solid2.gif differ diff --git a/examples/GIFPlaySample/treescap-interlaced.gif b/examples/GIFPlaySample/treescap-interlaced.gif new file mode 100644 index 0000000..15cb77b Binary files /dev/null and b/examples/GIFPlaySample/treescap-interlaced.gif differ diff --git a/examples/GIFPlaySample/treescap.gif b/examples/GIFPlaySample/treescap.gif new file mode 100644 index 0000000..f9fb545 Binary files /dev/null and b/examples/GIFPlaySample/treescap.gif differ diff --git a/examples/GIFPlaySample/wedge.gif b/examples/GIFPlaySample/wedge.gif new file mode 100644 index 0000000..6d0bf32 Binary files /dev/null and b/examples/GIFPlaySample/wedge.gif differ diff --git a/examples/GIFPlaySample/welcome2.gif b/examples/GIFPlaySample/welcome2.gif new file mode 100644 index 0000000..0068b3f Binary files /dev/null and b/examples/GIFPlaySample/welcome2.gif differ diff --git a/examples/GIFPlaySample/x-trans.gif b/examples/GIFPlaySample/x-trans.gif new file mode 100644 index 0000000..6dab62d Binary files /dev/null and b/examples/GIFPlaySample/x-trans.gif differ