123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392 |
- /* Federico Benavento <benavento@gmail.com> */
- #include <u.h>
- #include <libc.h>
- #include <draw.h>
- #include <event.h>
- enum {
- Facesize = 48
- };
- void memoinit(void);
- void redraw(void);
- void eresized(int);
- void resize(int i);
- void afaces(void);
- void allocblocks(void);
- Image *openface(char *path);
- Image *face[18];
- char buf[100];
- ushort winflag, level;
- Image *back;
- Image *fore;
- enum
- {
- Eninit,
- Eshow,
- Ehide,
- Edisc,
- };
- struct
- {
- Image *face;
- Rectangle r;
- int flag;
- }block[36];
- char *buttons[] =
- {
- "restart",
- "easy",
- "hard",
- "exit",
- 0
- };
- Menu menu =
- {
- buttons
- };
- void
- main(int argc, char *argv[])
- {
- Mouse m;
- int i, j;
- ushort ran, score, attempt, prev, br[2];
- Image *c[2];
- char *fmt;
- level = 16;
- fmt = "win in %d attempts!";
- ARGBEGIN{
- default:
- goto Usage;
- case 'h':
- level=36;
- break;
- }ARGEND
- if(argc){
- Usage:
- fprint(2, "usage: %s [-h]\n", argv0);
- exits("usage");
- }
- if(initdraw(0,0,"memo") < 0)
- sysfatal("initdraw failed: %r");
- srand(time(0));
- memoinit();
- einit(Emouse);
- Start:
- afaces();
- winflag=0;
- prev=level+1;
- score=attempt=0;
- for(i=0;i!=level;i++)
- block[i].flag = Eninit;
- for(i=0;i!=level/2;i++){
- for(j=0;j!=2;){
- ran = rand()%level;
- if(block[ran].flag == Eninit){
- block[ran].face = face[i];
- block[ran].flag = Eshow;
- j++;
- }
- }
- }
- eresized(0);
- for(;;m=emouse())
- if(m.buttons)
- break;
- for(i=0;i!=level;i++)
- block[i].flag = Ehide;
- redraw();
- j = 0;
- for(;; m=emouse()){
- switch(m.buttons){
- case 1:
- while(m.buttons){
- for(i=0;i!=level;i++){
- if(i!=prev && ptinrect(m.xy,block[i].r)){
- if(block[i].flag==Ehide && j<2){
- block[i].flag = Eshow;
- draw(screen, block[i].r, block[i].face, nil, ZP);
- c[j] = block[i].face;
- br[j] = prev = i;
- j++;
- }
- break;
- }
- }
- m=emouse();
- }
- break;
- case 4:
- switch(emenuhit(3, &m, &menu)) {
- case 0: /* restart */
- goto Start;
- break;
- case 1:
- level=16;
- goto Start;
- break;
- case 2:
- level=36;
- goto Start;
- break;
- case 3:
- exits(0);
- break;
- }
- }
- if(j==2){
- attempt++;
- prev = level+1;
- j = 0;
- if(c[0] == c[1]){
- score++;
- block[br[0]].flag = Edisc;
- block[br[1]].flag = Edisc;
- } else{
- block[br[0]].flag = Ehide;
- block[br[1]].flag = Ehide;
- }
- redraw();
- continue;
- }
- if(score == level/2){
- winflag = 1;
- sprint(buf, fmt, attempt);
- redraw();
- for(;;m=emouse())
- if(m.buttons&1 || m.buttons&4)
- break;
- goto Start;
- }
- }
- }
- void
- memoinit(void)
- {
- back = allocimagemix(display, DPalebluegreen,DWhite);
- fore = allocimagemix(display, 0x00DDDDFF, 0x00DDDDFF);
- }
- void
- eresized(int new)
- {
- double sq;
- Point p;
- if(new && getwindow(display, Refnone) < 0){
- fprint(2, "can't reattach to window");
- exits("resized");
- }
- sq = sqrt(level);
- p = Pt(Dx(screen->r)+8, Dy(screen->r)+8);
- if(!new || !eqpt(p, Pt(Facesize*sq+sq*4+17, Facesize*sq+sq*4+17)))
- resize(Facesize*sq+sq*4+17);
- allocblocks();
- draw(screen, screen->r, back, nil, ZP);
- redraw();
- }
- void
- redraw(void)
- {
- int i;
- Rectangle r;
- Point p;
- if(winflag == 1){
- p = Pt(Dx(screen->r)/8, Dy(screen->r)/4);
- r = screen->r;
- r.min = addpt(r.min, p);
- r.max = subpt(r.max, p);
- draw(screen, r, fore, nil, ZP);
- p=addpt(r.min, Pt(5,5));
- string(screen,p,display->black,ZP,font,buf);
- return;
- }
- for(i=0;i!=level;i++){
- r = block[i].r;
- switch(block[i].flag){
- case Eshow:
- draw(screen, r,block[i].face,nil,ZP);
- break;
- case Edisc:
- draw(screen, r, back, nil, ZP);
- break;
- case Ehide:
- draw(screen, r, fore, nil, ZP);
- break;
- default:
- fprint(2, "something went wrong!");
- exits("wrong");
- break;
- }
- }
- }
- char *facepaths[] = {
- /* logos */
- "/lib/face/48x48x4/g/glenda.1",
- "/lib/face/48x48x2/p/pjw+9ball.2",
- /* /sys/doc/9.ms authors */
- "/lib/face/48x48x2/k/ken.1",
- "/lib/face/48x48x4/b/bobf.1",
- "/lib/face/48x48x4/p/philw.1",
- "/lib/face/48x48x4/p/presotto.1",
- "/lib/face/48x48x4/r/rob.1",
- "/lib/face/48x48x4/s/sean.1",
- /* additional authors and luminaries for harder levels */
- "/lib/face/48x48x4/b/bwk.1",
- "/lib/face/48x48x4/c/cyoung.1",
- "/lib/face/48x48x4/d/dmr.1",
- "/lib/face/48x48x4/d/doug.1",
- "/lib/face/48x48x4/h/howard.1",
- "/lib/face/48x48x4/j/jmk.1",
- "/lib/face/48x48x4/s/sape.1",
- "/lib/face/48x48x4/s/seanq.1",
- "/lib/face/48x48x4/t/td.1",
- "/lib/face/48x48x8/l/lucent.1",
- };
- void
- afaces(void)
- {
- int i;
- for(i=0; i<18; i++)
- face[i] = openface(facepaths[i]);
- }
- void
- resize(int i)
- {
- int fd;
- fd = open("/dev/wctl", OWRITE);
- if(fd >= 0){
- fprint(fd, "resize -dx %d -dy %d", i, i);
- close(fd);
- }
- }
- Image *
- openimage(char *path)
- {
- Image *i;
- int fd;
- fd = open(path, OREAD);
- if(fd < 0)
- sysfatal("open %s: %r", path);
- i = readimage(display, fd, 0);
- if(i == nil)
- sysfatal("readimage %s: %r", path);
- close(fd);
- return i;
- }
- void
- allocblocks(void)
- {
- Rectangle r, b;
- ushort i, x, y, sq;
- sq = sqrt(level);
- r = insetrect(screen->r, 5);
- r.max.x = r.min.x+Facesize*sq+sq*4-1;
- r.max.y = r.min.y+Facesize*sq+sq*4-1;
- b.max.y = r.min.y;
- for(i=level-1, y=0; y!=sq; y++){
- b.min.y = b.max.y;
- b.max.y = r.min.y+Dy(r)*(y+1)/sq;
- b.max.x = r.min.x;
- for(x=0; x!=sq; x++, i--){
- b.min.x = b.max.x;
- b.max.x = r.min.x+Dx(r)*(x+1)/sq;
- block[i].r = insetrect(b, 2 );
- }
- }
- }
- Image*
- readbit(int fd, ulong chan, char *path)
- {
- char buf[4096], hx[4], *p;
- uchar data[Facesize*Facesize]; /* more than enough */
- int nhx, i, n, ndata, nbit;
- Image *img;
- n = readn(fd, buf, sizeof buf);
- if(n <= 0)
- return nil;
- if(n >= sizeof buf)
- n = sizeof(buf)-1;
- buf[n] = '\0';
- n = 0;
- nhx = 0;
- nbit = chantodepth(chan);
- ndata = (Facesize*Facesize*nbit)/8;
- p = buf;
- while(n < ndata) {
- p = strpbrk(p+1, "0123456789abcdefABCDEF");
- if(p == nil)
- break;
- if(p[0] == '0' && p[1] == 'x')
- continue;
- hx[nhx] = *p;
- if(++nhx == 2) {
- hx[nhx] = 0;
- i = strtoul(hx, 0, 16);
- data[n++] = ~i;
- nhx = 0;
- }
- }
- if(n < ndata)
- sysfatal("short face %s", path);
- img = allocimage(display, Rect(0,0,Facesize,Facesize), chan, 0, 0);
- if(img == nil)
- return nil;
- loadimage(img, img->r, data, ndata);
- return img;
- }
- Image*
- openface(char *path)
- {
- char *p;
- int fd, n;
- p = strstr(path, "48x48x");
- if(p == nil)
- return openimage(path);
- n = atoi(p+6);
- if(n < 4){
- if((fd = open(path, OREAD)) < 0)
- sysfatal("open %s: %r", path);
- return readbit(fd, n==1 ? GREY1 : GREY2, path);
- }
- return openimage(path);
- }
|