123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394 |
- /* Federico Benavento <benavento@gmail.com> */
- #include <u.h>
- #include <libc.h>
- #include <draw.h>
- #include <event.h>
- void eresized(int);
- void resize(int i);
- void afaces(void);
- void allocblocks(void);
- Image *openface(char *path);
- Image *face[18];
- Rectangle brect[36];
- char buf[100];
- ushort winflag, level;
- typedef enum{
- ninit,
- hide,
- disc
- }bflag;
- struct Block
- {
- ushort nr;
- ushort nc;
- bflag 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], c[2];
- char *fmt;
- level=16;
- fmt = "you 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));
- einit(Emouse);
- Start:
- afaces();
- winflag=0;
- prev=level+1;
- score=attempt=0;
- for(i=0;i!=level;i++){
- block[i].nr=i;
- block[i].nc=20;
- block[i].flag=ninit;
- }
- for(i=0;i!=level/2;i++){
- for(j=0;j!=2;){
- ran=rand()%level;
- if(block[ran].nc==20){
- block[ran].nc=i;
- j++;
- }
- }
- }
- eresized(0);
- for(;;){
- m=emouse();
- if(m.buttons)
- break;
- }
- for(i=0;i!=level;i++)
- block[i].flag=hide;
- eresized(0);
- 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,brect[i])){
- if(block[i].flag == hide && j<2){
- draw( screen,
- brect[i],
- face[block[i].nc],
- nil,
- ZP);
- c[j]=block[i].nc;
- br[j]=i;
- j++;
- prev=i;
- }
- 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=disc;
- block[br[1]].flag=disc;
- draw( screen,
- brect[br[0]],
- allocimagemix(display,DPalebluegreen,DWhite),
- nil,
- ZP);
- draw( screen,
- brect[br[1]],
- allocimagemix(display,DPalebluegreen,DWhite),
- nil,
- ZP);
- }else{
- draw( screen,
- brect[br[0]],
- allocimagemix(display, 0x00DDDDFF, 0x00DDDDFF),
- nil,
- ZP);
- draw( screen,
- brect[br[1]],
- allocimagemix(display, 0x00DDDDFF, 0x00DDDDFF),
- nil,
- ZP);
- }
- }
- if(score==level/2){
- winflag=1;
- sprint(buf, fmt, attempt);
- eresized(0);
- for(;;){
- m=emouse();
- if((m.buttons & 1) || (m.buttons & 4))
- break;
- }
- goto Start;
- }
- }
- }
- void
- eresized(int new)
- {
- ushort i, nx, ny;
- Point p;
- Rectangle wr;
- if(new && getwindow(display, Refnone) < 0){
- fprint(2, "can't reattach to window");
- exits("resized");
- }
- allocblocks();
- draw(screen, screen->r, allocimagemix(display, DPalebluegreen,DWhite), nil, ZP);
- if(winflag == 1){
- nx=screen->r.max.x/8;
- ny=screen->r.max.y/4;
- wr=Rect(screen->r.min.x+nx,
- screen->r.min.y+ny,
- screen->r.max.x-nx,
- screen->r.max.y-ny);
- draw(screen, wr, allocimagemix(display, 0x00DDDDFF, 0x00DDDDFF), nil, ZP);
- p=addpt(wr.min, Pt(5,5));
- draw(screen,
- Rpt(p, addpt(p, stringsize(font,buf))),
- allocimagemix(display,0x00DDDDFF,0x00DDDDFFF),
- nil,p);
- string(screen,p,display->black,ZP,font,buf);
- }else{
- for(i=0;i!=level;i++){
- switch(block[i].flag){
- case ninit:
- draw(screen,brect[i],face[block[i].nc],nil,ZP);
- break;
- case disc:
- draw( screen,
- brect[i],
- allocimagemix(display,DPalebluegreen,DWhite),
- nil,
- ZP);
- break;
- case hide:
- draw( screen,
- brect[i],
- allocimagemix(display, 0x00DDDDFF, 0x00DDDDFF),
- 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
- allocblocks(void)
- {
- Rectangle r, b;
- ushort i, x, y, sq;
- sq=sqrt(level);
- resize(48*sq+sq*4+17);
- r=insetrect(screen->r, 5);
- r=Rect(r.min.x, r.min.y, r.min.x+48*sq+sq*4-1, r.min.y+48*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+(r.max.y-r.min.y)*(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+(r.max.x-r.min.x)*(x+1)/sq;
- brect[i]=insetrect(b, 2 );
- }
- }
- }
- 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;
- }
- enum { Facesize = 48 };
- 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);
- }
|