From robert Sat Nov 6 18:30:56 1993 To: adam Subject: Ascii stereo Article 2711 of alt.3d: Newsgroups: alt.3d Path: nntp-server.caltech.edu!news.claremont.edu!uunet!europa.eng.gtefsd.com!darwin.sura.net!news-feed-2.peachnet.edu!umn.edu!lynx.unm.edu!mimbres.cs.unm.edu!bbx!dthomas From: dthomas@bbx.basis.com (Dave Thomas) Subject: (long) ASCII stereograms Message-ID: <1993Jul6.164913.18680@bbx.basis.com> Organization: BASIS Int'l, Albuquerque NM USA References: <2JUL199315040784@zeus.tamu.edu> Date: Tue, 6 Jul 1993 16:49:13 GMT Lines: 129 First of all, here's a couple of hand-generated ones. O O n n n n n n n n n n n n n n n n f f f f f f f f f f f f f e e e e e e e e e e e e e e e e a a a a a a a a a a a a a a a a a a a a a a a a a a a a a r r r r r r r r r r r r r r r r r r r r r r r r r r r r r g g g g g g g g g g g g g g g g g g g g g g g g g r r r r r r r r r r r r r r r r r r r e e e e e e e e e e e e e e e a a a a a a a a a a a a a t t t t t t t t t t t <<<<>>>><<<<>>>><<<<>>>><<<<>>>><<<<>>>><<<<>>>><<<<>>>><<<<>>>><<<<>>>> d d d d d d d d d d d e e e e e e e e e e e e e p p p p p p p p p p p p p p p t t t t t t t t t t t t t t t t t t t h h h h h h h h h h h h h h h h h h h h h h h h h Wow.. I'd forgotten how much I enjoyed those! Now here's a hack of a hack I found on the net. Basically it generates stereograms from ascii diagrams. Here's the program first: #define DEPTH0 16 #define COLS 79 #include main() { long now; int col; char m[COLS+1],s[COLS+1]; int i,e,c; /* seed random number generator */ time (&now); srand (now); /* print fusion X's */ for (col = 0; COLS - col >= DEPTH0; col += DEPTH0) { for (i = 0; i < DEPTH0-1; ++i) putchar (' '); putchar ('X'); } putchar ('\n'); /* process input image */ while (memset(m,'\0',COLS+1),fgets (m, COLS+1, stdin)) { e = 0; s[COLS] = 0; for(i=0; i= DEPTH0 && i < COLS && (c = m[i - DEPTH0]) >= '0' && c <= '9') { e = 1; s[i] = s[i-DEPTH0+c-'0']; ++i; } s[i++] = (e || i < DEPTH0) ? randasc() : s[i-DEPTH0]; } puts (s); } } randasc() { #if 1 return ('!'+rand()%92); #else return ('a'+rand()%26); #endif } Try passing it this file as the standard input: 22222222222222222 11111111111111111111111 2222222222222222222 11111111111111111111111 22222222222222222222 11111111111111111111111 22222 22222 11111 22222 22222 11111 22222 22222 11111 22222 22222 11111 22222 22222 11111 22222 22222 11111 22222222222222222222 11111 2222222222222222222 11111 22222222222222222 11111 You'll get this output: X X X X "i`<$$Co6&`R(D(v"i`<$$Co6&`R(D(v"i`<$$Co6&`R(D(v"i`<$$Co6&`R(D(v"i`<$$Co6&`R(D( dZ<$wamwBy&>`,QFdZ<$wamwBy&>`,QFdZ<$wamwBy&>`,QFdZ<$wamwBy&>`,QFdZ<$wamwBy&>`,Q rHt&{:7Z,o:.sw5[rHt&{:7Z,osw5[rHt&{:7Z,osw505[rHt&{:7Zosw505[rHt&{:7Zosw505[rRH 3C&B[8g"EzQy{lW_3C&B[8g"Ez{lW_3C&B[8g"Ez{lW_3S3C&B[8g"z{lW_3S3C&B[8g"z{lW_3S3yC {TAtrJyiQ?fiVF!G{TAtrJyiQ?VF!G{TAtrJyiQ?VF!G{T]TAtrJyi?VF!G{T]TAtrJyi?VF!G{T]sT #Y8igID(]?"A0+;<>Y8ID(]?"A0+;<>Y8ID(]?"?"A0+;<>Y8ID(]?"?A0+;Y8ID(]?"? D0tscheRl5hfJx.cD0tscheRl5Jx.cD0tscheRl5Jx.cDeD0tscheRl5Jx.cDeDtscheiRl5Jx.cDeD -AaV^hv,r7f6%<)R-AaV^hv,r7%<)R-AaV^hv,r7%<)p)R-AaV^hv,r7%<)p)R-aV^hv>,r7%<)p)R- IRW)ytVbWqd^]qi(IRW)ytVbWqd^]qi(IRW)ytVbWqd^]qi(IRW)ytVbWqd^]qi(IRW)ytVbWqd^]qi BX(Aqq`^Y-z8v=[gBX(Aqq`^Y-z8v=[gBX(Aqq`^Y-z8v=[gBX(Aqq`^Y-z8v=[gBX(Aqq`^Y-z8v=[ Enjoy! David Article 2721 of alt.3d: Path: nntp-server.caltech.edu!elroy.jpl.nasa.gov!usc!howland.reston.ans.net!darwin.sura.net!news-feed-1.peachnet.edu!umn.edu!gaia.ucs.orst.edu!news.csos.orst.edu!atlantis.CSOS.ORST.EDU!jeremy From: jeremy@atlantis.CSOS.ORST.EDU ((-| Jeremy |-) Smith) Newsgroups: alt.3d Subject: Re: (long) ASCII stereograms Date: 9 Jul 1993 07:39:35 GMT Organization: OSU CS Outreach Services, Corvallis, Oregon Lines: 24 Message-ID: <21j7bn$bvq@CSOS.ORST.EDU> References: <2JUL199315040784@zeus.tamu.edu> <1993Jul6.164913.18680@bbx.basis.com> NNTP-Posting-Host: atlantis.csos.orst.edu dthomas@bbx.basis.com (Dave Thomas) writes: >Enjoy! > David X X X X %s8ahdtUVf1|JK>`%s8ahdtUVf1|JK>`%s8ahdtUVf1|JK>`%s8ahdtUVf1|JK>`%s8ahdtUVf1|JK> WjR%Bo=^>iu72VOjWjR%Bo=^>iu72VOjWjR%Bo=^>iu72VOjWjR%Bo=^>iu72VOjWjR%Bo=^>iu72VO )o^l*28*&1dAJU@:)o^l*28&1dAJU@:)%o^l*28&1dAJU@:^l*2b*28&1dAJU@:*2b*28&1dA{AJU@: I>498fc*7,nTcBf=I>498fc7,nTcBf=I>4w98fc7,nTcBf4w98fc;fc7,nTcBf48fc;fc7,nTcB%Bf4 7b)dEJ8I&0#9y]7r7b)dEJ8&0#9uy]77b)dHEJ8&0#9uyb)dHEJ8&%8&0#9uyb)EJ8&x&%8&9uybmb) \d]nx#fsmlp1$..=\d]nx#fmlp1q$..\d]nDx#fmlp1q\d]nQ]#fmlbmlp1q\d]]#fm;mlbm1q\d*d] e&|:mT.>InK.K1JUe&|:mT.InK.K1JUe&|X:mT.InK.Ue&|j&|X.InK?nK.Ue&||X.I5InK?.Ue&P&| 3!nIN%q7CY=_p:>!3!nIN%qCY=_p:>!3N!nIN%qCY=>!3N!nIN%qCY=>K=>!3N!N%qCOCY=>>!3NSN! ^S1@6x7xt8EAWKTk^S1@6x7t8EA)WTk^Sf1@6x7t8WTk^Sf1@6x7t8WTk@Tk^Sf6x7tPt8WTTk^SYSf ,L?>#yM"by`Chr#/,L?>#yMby`CZhr/,L?Z>#yMbZhr/^r/,L?Z>#yhr/^g/^r/?Z>#yhr/^g/^|^r/ ycndQ5_mHdp4uP{\ycndQ5_Hdp4/uP{ycndCQ5_4/uPZuP{ycndCQ5_PZuP/uP{ndCQ5_PZuP&P/uP{ @?&@ej(FAjWt:YdT@?&@ej(FAjWt:YdT@?&@ej(FAjWt:YdT@?&@ej(FAjWt:YdT@?&@ej(FAjWt:Yd BRun*p#rlA`i%=RJBRun*p#rlA`i%=RJBRun*p#rlA`i%=RJBRun*p#rlA`i%=RJBRun*p#rlA`i%=R -- Jeremy |-) Smith jeremy@atlantis.cs.orst.edu A new smiley ;_0 (The munged-case smiley - SHIFT :-)