From: dmuntz@dip.eecs.umich.edu          Article 5456 of alt.sources
Article: 5456 of alt.sources
Xref: bloom-picayune.mit.edu alt.hackers:1325 alt.sources:5456
Path: bloom-picayune.mit.edu!snorkelwacker.mit.edu!usc!wupost!spool.mu.edu!umn.edu!umeecs!dip.eecs.umich.edu!dmuntz
From: dmuntz@dip.eecs.umich.edu (Daniel A Muntz)
Newsgroups: alt.hackers,alt.sources
Subject: pbmtostareogram.c
Message-ID: <1992Mar10.193505.29776@zip.eecs.umich.edu>
Date: 10 Mar 92 19:35:05 GMT
Article-I.D.: zip.1992Mar10.193505.29776
Sender: news@zip.eecs.umich.edu (Mr. News)
Distribution: na
Organization: University of Michigan EECS Dept., Ann Arbor, MI
Lines: 56
Approved: dmuntz@eecs.umich.edu

based on code recently posted in alt.hackers

This program takes a type P4 pbm and converts it to a type P1
pbm stareogram.  
Test with: xbmtopbm <x11bitmapdir>/xlogo64 | pbmtostareogram | pbmtoxwd | xwud
Improvements are welcome (error checking, more pbmfriendliness...)

begin 644 pbmtostareogram.c
M+RH@:6YP=70Z('1Y<&4@4#0@<&)M.R!O=71P=70Z('1Y<&4@4#$@<&)M('-T
M87)E;V=R86T@*B\*(VEN8VQU9&4@/'-T9&EO+F@^"FUA:6XH*0I["B!C:&%R
M("II;G)O=RPJ;W5T<F]W+&IU;FM;,3`P72QC:#L*(&EN="!X+'DL92QS979E
M;G1Y;FEN92P@<W5B<F]W+"!S=6)C;VPL(&)I='!O<RP@8FET8V]U;G0L=VED
M=&@L:&5I9VAT.PH*('-C86YF*"(E6UY<;EU<;B(L(&IU;FLI.R`O*B!0-"`J
M+PH@<V-A;F8H(B5D("5D7&XB+"9W:61T:"P@)FAE:6=H="D["B!S979E;G1Y
M;FEN92`]('=I9'1H*C$N,CL*(&EN<F]W/2AC:&%R("HI;6%L;&]C*'=I9'1H
M*S$I.PH@;W5T<F]W/2AC:&%R("HI;6%L;&]C*'-E=F5N='EN:6YE*S$I.PH@
M<')I;G1F*")0,5QN(BD["B!P<FEN=&8H(B5D("5D7&XB+'-E=F5N='EN:6YE
M*C,L:&5I9VAT*C,I.PH*(&9O<B`H>3UH96EG:'0@.R!Y(#X@,"`[('DM+2D*
M("!["B`@(&)I='!O<R`](#<["B`@(&-H(#T@9V5T8VAA<B@I.R`O*B!P8FT@
M<V5E;7,@=&\@9FEL;"!O=70@;&%S="!B>71E(&%T(')O=R!E;F0J+PH@("!F
M;W(@*&)I=&-O=6YT(#T@,"`[(&)I=&-O=6YT(#P@=VED=&@@.R!B:71C;W5N
M="LK*0H@("`@>PH@("`@(&EF("@H8V@^/F)I='!O<RDF,2D*("`@("`@(&EN
M<F]W6V)I=&-O=6YT72`]("<C)SL*("`@("!E;'-E"B`@("`@("!I;G)O=UMB
M:71C;W5N=%T@/2`G+B<["B`@("`@8FET<&]S+2T["B`@("`@:68@*"AB:71C
M;W5N="`A/2!W:61T:"TQ*2`F)B`H8FET<&]S(#P@,"DI"B`@("`@('L*("`@
M("`@(&)I='!O<R`](#<["B`@("`@("!C:"`](&=E=&-H87(H*3L*("`@("`@
M?0H@("`@?0H@("!I;G)O=UMW:61T:%T],#L*("`@;W5T<F]W6W-E=F5N='EN
M:6YE73TP.PH@("!E/3`["B`@(&9O<B`H>"`](#`@.R!X(#P@<V5V96YT>6YI
M;F4@.R!X*RLI"B`@("!["B`@("`@:68@*&5\?'@\,38I"B`@("`@("!O=71R
M;W=;>%T@/2!R86YD;VTH*24U,3(["B`@("`@96QS90H@("`@("`@;W5T<F]W
M6WA=(#T@;W5T<F]W6W@M,39=.PH@("`@(&4@/2`P.PH@("`@('=H:6QE("AI
M;G)O=UMX+3$V73T])R,G("8F('@\<V5V96YT>6YI;F4@)B8@>#XQ-2D*("`@
M("`@>PH@("`@("`@92`](#$["B`@("`@("!O=71R;W=;>%T@/2!O=71R;W=;
M>"TQ-5T["B`@("`@("!X*RL["B`@("`@('T*("`@('T*("`@9F]R("AS=6)R
M;W<@/2`P(#L@<W5B<F]W(#P@,R`[('-U8G)O=RLK*0H@("`@(&9O<B`H>"`]
M(#`@.R!X(#P@<V5V96YT>6YI;F4@.R!X*RLI"B`@("`@("!F;W(@*'-U8F-O
M;"`](#`@.R!S=6)C;VP@/"`S(#L@<W5B8V]L*RLI"B`@("`@("`@(&EF("AO
M=71R;W=;>%TF*#$\/"AS=6)R;W<K<W5B8V]L*2DI"B`@("`@("`@("`@<')I
M;G1F*"(Q(BD["B`@("`@("`@(&5L<V4*("`@("`@("`@("!P<FEN=&8H(C`B
**3L*("!]"GT*"B`@
`
end

  -Dan
   dmuntz@eecs.umich.edu

stareosig
!KH29sm_+Dykz:D/!KH29sm_+Dykz:D/!KH29sm_+Dykz:D/!KH29sm_+Dykz:D/!KH29sm_+Dykz:D
|`cvf#BbR?bK[i]\|`cvf#BbR?bK[i]\|`cvf#BbR?bK[i]\|`cvf#BbR?bK[i]\|`cvf#BbR?bK[i]
_P9CoQMEtq4q/#KV_P9oQMEtqb4q/#KV_9oYQMEtb4wq#KsV_oY\QEt=b4q#XKV_oY\QEYtb4q#XKV'
fOazWh\+$KE|wi?8fOaWhH\+KE[|wi?8faWhHn+KE[K|i?)8fWhGH+KE0[|ib?)8fhiGH+KE0[|b?O)
iQREW;@<8v'@LSjpiQRW;R@<v'0@LSjpiRW]R@<q'0G@Sj(piW]wR<q`0R@S$j(pi]RwR<q`0@S$.j(
1?(EoY5JtTe/NkNy1?(oYi5JTecNkmNy1(o?Y5?JecMNmN[y1o?1Y?J|eMNmUN[y1?q1Y?J|MNzmUN[
$FS\dZ$#6aL-8\de$FSdZ$#6arL8\]de$Sd.Z$#6rL_8\de$SdD.Z#6zrL8\Ide$SD..Z#6rL8\Ider
O>=OZ:{$lZ3I*]+jO>=OZ:{$lZ3I*]+jO>=OZ:{$lZ3I*]+jO>=OZ:{$lZ3I*]+jO>=OZ:{$lZ3I*]+
T7M3F^Q'k[r4'#Q!T7M3F^Q'k[r4'#Q!T7M3F^Q'k[r4'#Q!T7M3F^Q'k[r4'#Q!T7M3F^Q'k[r4'#Q