although i'm not around that often currently i wanna wish all old and new nekochaners nice and happy holidays and a great start into the new year
r-a-c.de
Servus Goetz. Same to you...foetz wrote: although i'm not around that often currently i wanna wish all old and new nekochaners nice and happy holidays and a great start into the new year![]()
foetz wrote: although i'm not around that often currently i wanna wish all old and new nekochaners nice and happy holidays and a great start into the new year![]()
: oxygen (4xR12k400) /
: neon (16xI2 1.6, 9MB L2) /
: beryllium (4xR12k270)
: nitrogen (R16k800) /
: carbon (2xR14k600) /
: lithium (R10k400) /
: fluorine (2xR12k300) / spare 2xR12k360
: hydrogen (R10k195) /
: sodium (R5k180) /
: R5k180->200 MB and PM only
: helium (R10k195, HighImpact) /
: boron (R4k250)/
: magnesium (R4k100) /
: aluminium (R5k180)
4D70GT : my very first one (now property of
musée bolo
and the foundation
mémoires informatiques
)
smj wrote: I'm grateful to have Nekochan available - thanks to everybody who makes it such a valuable resource/community, and thanks to nekonoko for keeping it on the air.
J5600, 2 x Mac, 3 x SUN, Alpha DS20E, Alpha 800 5/550, 3 x RS/6000, Amiga 4000 VideoToaster, Amiga4000 -030, 733MHz Sam440 AmigaOS 4.1 update 1.
Tandem Himalaya S-Series Nonstop S72000 ServerNet.
Code: Select all
typedef unsigned int ui;
ui __[]={
10,9,32,123,33,1,34,16,39,24,42,1,44,4,46,24,47,6,58,1,
66,1,72,1,78,1,79,1,83,1,89,1,91,1,92,6,93,1,94,6,95,1,
96,4, 97,3,100,1, 101, 4,102,
1,104,1,108, 1, 112,2, 114, 1,117,1,119,
1, 121, 1, 126, 1, 128, 252, 255,
182, 161, 66, 127, 204, 207, 217, 113,
164, 178, 44, 227, 165, 98,
243, 205,121, 199, 231, 208,
154, 23,88, 7, 61, 36,
195, 150,44, 149, 52, 23,
56,192,42, 252,69,251, 39, 191,203,144,
29,149,148, 6,230,186, 6, 95,139,255,40,
132,2,36,214,120,154,155,159,85,63,18,247,241,143,
254,205,138,235,137,204,189,164,5,30,110,241,149,141,200,
213,207,65,37,134,74,205,22,92,106,111,84,187,217,173,50,0};
#define X(o_o) for(_=o_o^o_o;_<o_o;_++)
#define T (1<<24)
#define B (1<<16)
#define i __[p++]
#define f(t) ((c-l)/(r/=t))
int main(ui _) {
ui l,
c,r,p=0,
n[129],s,y,
cf; extern int
putchar(int); X(129)
_[n]=_^_; while
(__[p]!=255 && (y=
__[p],1)) y[n]=__[++p],
p++;p++; s=0;X(128)y=_[n],n
[_]=s,s+=y;n[128]=s; l=c=0, r=
(ui)-1; X(4) c=c<<8|i;
X(s) { for (cf=f(s),y=0;
n[y+1]<=cf||(putchar(y),0)
;y++); l+=n[y]*r; r*=n[y+1]-y[n];
while ((l^l+r)<T||r<B&&((r=-l&B-1),1)
)c=c<<8
|i,r<<=
8,l<<=8
;} return 0;
}
Code: Select all
$ cc -o card card.c
$ ./card
ShadeOfBlue wrote: Copy the above into a file (e.g. card.c)
It's pretty clear that
a lot
of effort went into that. I'm very impressed. Not only are the sources in pretty patterns, but the output is some mighty nice ASCII art, too. I'm not even going to try to decipher the C source code, so I can't even begin to imagine what it must have taken to write it. Again, wow!
ShadeOfBlue wrote: It works even if you don't have MIPSpro (use /var/sysgen/root/usr/bin/cc) or with other compilers on other OS's (tested with gcc, icc and clang).
josehill wrote:ShadeOfBlue wrote: It works even if you don't have MIPSpro (use /var/sysgen/root/usr/bin/cc) or with other compilers on other OS's (tested with gcc, icc and clang).
Nice! I just ran it an old Mac OS X machine I have kicking around.![]()
J5600, 2 x Mac, 3 x SUN, Alpha DS20E, Alpha 800 5/550, 3 x RS/6000, Amiga 4000 VideoToaster, Amiga4000 -030, 733MHz Sam440 AmigaOS 4.1 update 1.
Tandem Himalaya S-Series Nonstop S72000 ServerNet.
halo
,
oct
ane
knightrider
,
d i g i t a l
AlphaPC164,
pond
, soekris net6501, misc cool stuff in a rack