AVIReader.st
changeset 1848 864ca2cd4e71
parent 1847 b8f2855bf510
child 3855 1db7742d33ad
child 4148 d81244401c19
--- a/AVIReader.st	Wed Nov 19 16:33:55 2003 +0100
+++ b/AVIReader.st	Wed Nov 19 16:38:53 2003 +0100
@@ -471,40 +471,7 @@
     "Modified: 5.4.1997 / 14:47:41 / cg"
 ! !
 
-!AVIReader methodsFor:'reading'!
-
-fromStream:aStream
-    "read a AVI-movie from aStream. Return a frame sequence."
-
-    inStream := aStream.
-
-    riffReader := RIFFReader new.
-    riffReader client:self.
-    riffReader processStream:inStream.
-
-    "/ return the first frame as image
-
-    "/ ATTENTION: the following is not true:
-
-    colorMap := MappedPalette 
-                    redVector:redPalette 
-                    greenVector:greenPalette 
-                    blueVector:bluePalette.
-
-    photometric := #palette.
-    samplesPerPixel := 1.
-    bitsPerSample := #(8).
-
-    "
-     AVIReader readFile:'/phys/exept/home/pd_stuff/movies/avi/drlair.avi'.      
-     AVIReader readFile:'/phys/exept/home/pd_stuff/movies/avi/hangldm.avi'.      
-    "
-
-    "Created: 4.4.1997 / 22:35:53 / cg"
-    "Modified: 24.6.1997 / 15:58:29 / cg"
-! !
-
-!AVIReader methodsFor:'reading-private'!
+!AVIReader methodsFor:'private-reading'!
 
 getChunk_ISBJ:chunkSize
     "process (ignore) a ISBJ chunk"
@@ -1299,10 +1266,43 @@
     riffReader skipChunk:chunkSize
 ! !
 
+!AVIReader methodsFor:'reading'!
+
+fromStream:aStream
+    "read a AVI-movie from aStream. Return a frame sequence."
+
+    inStream := aStream.
+
+    riffReader := RIFFReader new.
+    riffReader client:self.
+    riffReader processStream:inStream.
+
+    "/ return the first frame as image
+
+    "/ ATTENTION: the following is not true:
+
+    colorMap := MappedPalette 
+                    redVector:redPalette 
+                    greenVector:greenPalette 
+                    blueVector:bluePalette.
+
+    photometric := #palette.
+    samplesPerPixel := 1.
+    bitsPerSample := #(8).
+
+    "
+     AVIReader readFile:'/phys/exept/home/pd_stuff/movies/avi/drlair.avi'.      
+     AVIReader readFile:'/phys/exept/home/pd_stuff/movies/avi/hangldm.avi'.      
+    "
+
+    "Created: 4.4.1997 / 22:35:53 / cg"
+    "Modified: 24.6.1997 / 15:58:29 / cg"
+! !
+
 !AVIReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/AVIReader.st,v 1.13 2003-11-19 15:33:55 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/AVIReader.st,v 1.14 2003-11-19 15:38:28 cg Exp $'
 ! !
 
 AVIReader initialize!