-- perl -e'$u="\4\5\6";sub H{8*($_[1]%79)+($_[0]%8)}sub G{vec$u,H(@_),1}sub S{vec ($n,H(@_),1)=$_[2]}$_=q^{P`clear`;for$iX){PG($iY)?"O":" "forX8);P"\n"}for$iX){ forX8){$c=scalar [EMAIL PROTECTED];S$iY,G( $iY)?$c=~/[23]/?1:0:$c==3?1:0}}$u=$n;select$M,$C,$T,.2;redo}^;s/Z/],[\$i/g;s/Y /,\$_/xg;s/X/(0..7/g;s/P/print+/g;eval' # Michael C. Toren <[EMAIL PROTECTED]>
- unsubscribe Jonathan Crockett
- Re: unsubscribe calloway
- unsubscribe Michael C. Toren
- unsubscribe lvd1
- unsubscribe Kurt Gibson
- unsubscribe Boris Langendoen
- unsubscribe Mick England
- unsubscribe Nelson, Quinten Charles
- UNSUBSCRIBE Jean-Philippe Provost
- unsubscribe Nelson, Quinten Charles