2 * twiddle.c: Puzzle involving rearranging a grid of squares by
3 * rotating subsquares. Adapted and generalised from a
4 * door-unlocking puzzle in Metroid Prime 2 (the one in the Main
17 #define PREFERRED_TILE_SIZE 48
18 #define TILE_SIZE (ds->tilesize)
19 #define BORDER (TILE_SIZE / 2)
20 #define HIGHLIGHT_WIDTH (TILE_SIZE / 20)
21 #define COORD(x) ( (x) * TILE_SIZE + BORDER )
22 #define FROMCOORD(x) ( ((x) - BORDER + TILE_SIZE) / TILE_SIZE - 1 )
24 #define ANIM_PER_RADIUS_UNIT 0.13F
25 #define FLASH_FRAME 0.13F
49 int just_used_solve
; /* used to suppress undo animation */
50 int used_solve
; /* used to suppress completion flash */
51 int movecount
, movetarget
;
52 int lastx
, lasty
, lastr
; /* coordinates of last rotation */
55 static game_params
*default_params(void)
57 game_params
*ret
= snew(game_params
);
61 ret
->rowsonly
= ret
->orientable
= FALSE
;
68 static void free_params(game_params
*params
)
73 static game_params
*dup_params(game_params
*params
)
75 game_params
*ret
= snew(game_params
);
76 *ret
= *params
; /* structure copy */
80 static int game_fetch_preset(int i
, char **name
, game_params
**params
)
86 { "3x3 rows only", { 3, 3, 2, TRUE
, FALSE
} },
87 { "3x3 normal", { 3, 3, 2, FALSE
, FALSE
} },
88 { "3x3 orientable", { 3, 3, 2, FALSE
, TRUE
} },
89 { "4x4 normal", { 4, 4, 2, FALSE
} },
90 { "4x4 orientable", { 4, 4, 2, FALSE
, TRUE
} },
91 { "4x4 radius 3", { 4, 4, 3, FALSE
} },
92 { "5x5 radius 3", { 5, 5, 3, FALSE
} },
93 { "6x6 radius 4", { 6, 6, 4, FALSE
} },
96 if (i
< 0 || i
>= lenof(presets
))
99 *name
= dupstr(presets
[i
].title
);
100 *params
= dup_params(&presets
[i
].params
);
105 static void decode_params(game_params
*ret
, char const *string
)
107 ret
->w
= ret
->h
= atoi(string
);
109 ret
->rowsonly
= ret
->orientable
= FALSE
;
111 while (*string
&& isdigit(*string
)) string
++;
112 if (*string
== 'x') {
114 ret
->h
= atoi(string
);
115 while (*string
&& isdigit(*string
)) string
++;
117 if (*string
== 'n') {
119 ret
->n
= atoi(string
);
120 while (*string
&& isdigit(*string
)) string
++;
123 if (*string
== 'r') {
124 ret
->rowsonly
= TRUE
;
125 } else if (*string
== 'o') {
126 ret
->orientable
= TRUE
;
127 } else if (*string
== 'm') {
129 ret
->movetarget
= atoi(string
);
130 while (string
[1] && isdigit(string
[1])) string
++;
136 static char *encode_params(game_params
*params
, int full
)
139 sprintf(buf
, "%dx%dn%d%s%s", params
->w
, params
->h
, params
->n
,
140 params
->rowsonly ?
"r" : "",
141 params
->orientable ?
"o" : "");
142 /* Shuffle limit is part of the limited parameters, because we have to
143 * supply the target move count. */
144 if (params
->movetarget
)
145 sprintf(buf
+ strlen(buf
), "m%d", params
->movetarget
);
149 static config_item
*game_configure(game_params
*params
)
154 ret
= snewn(7, config_item
);
156 ret
[0].name
= "Width";
157 ret
[0].type
= C_STRING
;
158 sprintf(buf
, "%d", params
->w
);
159 ret
[0].sval
= dupstr(buf
);
162 ret
[1].name
= "Height";
163 ret
[1].type
= C_STRING
;
164 sprintf(buf
, "%d", params
->h
);
165 ret
[1].sval
= dupstr(buf
);
168 ret
[2].name
= "Rotation radius";
169 ret
[2].type
= C_STRING
;
170 sprintf(buf
, "%d", params
->n
);
171 ret
[2].sval
= dupstr(buf
);
174 ret
[3].name
= "One number per row";
175 ret
[3].type
= C_BOOLEAN
;
177 ret
[3].ival
= params
->rowsonly
;
179 ret
[4].name
= "Orientation matters";
180 ret
[4].type
= C_BOOLEAN
;
182 ret
[4].ival
= params
->orientable
;
184 ret
[5].name
= "Number of shuffling moves";
185 ret
[5].type
= C_STRING
;
186 sprintf(buf
, "%d", params
->movetarget
);
187 ret
[5].sval
= dupstr(buf
);
198 static game_params
*custom_params(config_item
*cfg
)
200 game_params
*ret
= snew(game_params
);
202 ret
->w
= atoi(cfg
[0].sval
);
203 ret
->h
= atoi(cfg
[1].sval
);
204 ret
->n
= atoi(cfg
[2].sval
);
205 ret
->rowsonly
= cfg
[3].ival
;
206 ret
->orientable
= cfg
[4].ival
;
207 ret
->movetarget
= atoi(cfg
[5].sval
);
212 static char *validate_params(game_params
*params
)
215 return "Rotation radius must be at least two";
216 if (params
->w
< params
->n
)
217 return "Width must be at least the rotation radius";
218 if (params
->h
< params
->n
)
219 return "Height must be at least the rotation radius";
224 * This function actually performs a rotation on a grid. The `x'
225 * and `y' coordinates passed in are the coordinates of the _top
226 * left corner_ of the rotated region. (Using the centre would have
227 * involved half-integers and been annoyingly fiddly. Clicking in
228 * the centre is good for a user interface, but too inconvenient to
231 static void do_rotate(int *grid
, int w
, int h
, int n
, int orientable
,
232 int x
, int y
, int dir
)
236 assert(x
>= 0 && x
+n
<= w
);
237 assert(y
>= 0 && y
+n
<= h
);
240 return; /* nothing to do */
242 grid
+= y
*w
+x
; /* translate region to top corner */
245 * If we were leaving the result of the rotation in a separate
246 * grid, the simple thing to do would be to loop over each
247 * square within the rotated region and assign it from its
248 * source square. However, to do it in place without taking
249 * O(n^2) memory, we need to be marginally more clever. What
250 * I'm going to do is loop over about one _quarter_ of the
251 * rotated region and permute each element within that quarter
252 * with its rotational coset.
254 * The size of the region I need to loop over is (n+1)/2 by
255 * n/2, which is an obvious exact quarter for even n and is a
256 * rectangle for odd n. (For odd n, this technique leaves out
257 * one element of the square, which is of course the central
258 * one that never moves anyway.)
260 for (i
= 0; i
< (n
+1)/2; i
++) {
261 for (j
= 0; j
< n
/2; j
++) {
268 p
[2] = (n
-j
-1)*w
+(n
-i
-1);
271 for (k
= 0; k
< 4; k
++)
274 for (k
= 0; k
< 4; k
++) {
275 int v
= g
[(k
+dir
) & 3];
277 v
^= ((v
+dir
) ^ v
) & 3; /* alter orientation */
284 * Don't forget the orientation on the centre square, if n is
287 if (orientable
&& (n
& 1)) {
288 int v
= grid
[n
/2*(w
+1)];
289 v
^= ((v
+dir
) ^ v
) & 3; /* alter orientation */
294 static int grid_complete(int *grid
, int wh
, int orientable
)
298 for (i
= 1; i
< wh
; i
++)
299 if (grid
[i
] < grid
[i
-1])
302 for (i
= 0; i
< wh
; i
++)
309 static char *new_game_desc(game_params
*params
, random_state
*rs
,
310 game_aux_info
**aux
, int interactive
)
313 int w
= params
->w
, h
= params
->h
, n
= params
->n
, wh
= w
*h
;
320 * Set up a solved grid.
322 grid
= snewn(wh
, int);
323 for (i
= 0; i
< wh
; i
++)
324 grid
[i
] = ((params
->rowsonly ? i
/w
: i
) + 1) * 4;
327 * Shuffle it. This game is complex enough that I don't feel up
328 * to analysing its full symmetry properties (particularly at
329 * n=4 and above!), so I'm going to do it the pedestrian way
330 * and simply shuffle the grid by making a long sequence of
331 * randomly chosen moves.
333 total_moves
= params
->movetarget
;
335 /* Add a random move to avoid parity issues. */
336 total_moves
= w
*h
*n
*n
*2 + random_upto(rs
, 2);
340 int rw
, rh
; /* w/h of rotation centre space */
344 prevmoves
= snewn(rw
* rh
, int);
345 for (i
= 0; i
< rw
* rh
; i
++)
348 for (i
= 0; i
< total_moves
; i
++) {
349 int x
, y
, r
, oldtotal
, newtotal
, dx
, dy
;
352 x
= random_upto(rs
, w
- n
+ 1);
353 y
= random_upto(rs
, h
- n
+ 1);
354 r
= 2 * random_upto(rs
, 2) - 1;
357 * See if any previous rotations has happened at
358 * this point which nothing has overlapped since.
359 * If so, ensure we haven't either undone a
360 * previous move or repeated one so many times that
361 * it turns into fewer moves in the inverse
362 * direction (i.e. three identical rotations).
364 oldtotal
= prevmoves
[y
*rw
+x
];
365 newtotal
= oldtotal
+ r
;
366 } while (abs(newtotal
) < abs(oldtotal
) || abs(newtotal
) > 2);
368 do_rotate(grid
, w
, h
, n
, params
->orientable
, x
, y
, r
);
371 * Log the rotation we've just performed at this point,
372 * for inversion detection in the next move.
374 * Also zero a section of the prevmoves array, because
375 * any rotation area which _overlaps_ this one is now
376 * entirely safe to perform further moves in.
378 * Two rotation areas overlap if their top left
379 * coordinates differ by strictly less than n in both
382 prevmoves
[y
*rw
+x
] += r
;
383 for (dy
= -n
+1; dy
<= n
-1; dy
++) {
384 if (y
+ dy
< 0 || y
+ dy
>= rh
)
386 for (dx
= -n
+1; dx
<= n
-1; dx
++) {
387 if (x
+ dx
< 0 || x
+ dx
>= rw
)
389 if (dx
== 0 && dy
== 0)
391 prevmoves
[(y
+dy
)*rw
+(x
+dx
)] = 0;
398 } while (grid_complete(grid
, wh
, params
->orientable
));
401 * Now construct the game description, by describing the grid
402 * as a simple sequence of integers. They're comma-separated,
403 * unless the puzzle is orientable in which case they're
404 * separated by orientation letters `u', `d', `l' and `r'.
408 for (i
= 0; i
< wh
; i
++) {
412 k
= sprintf(buf
, "%d%c", grid
[i
] / 4,
413 (char)(params
->orientable ?
"uldr"[grid
[i
] & 3] : ','));
415 ret
= sresize(ret
, retlen
+ k
+ 1, char);
416 strcpy(ret
+ retlen
, buf
);
419 if (!params
->orientable
)
420 ret
[retlen
-1] = '\0'; /* delete last comma */
426 static void game_free_aux_info(game_aux_info
*aux
)
428 assert(!"Shouldn't happen");
431 static char *validate_desc(game_params
*params
, char *desc
)
434 int w
= params
->w
, h
= params
->h
, wh
= w
*h
;
440 for (i
= 0; i
< wh
; i
++) {
441 if (*p
< '0' || *p
> '9')
442 return "Not enough numbers in string";
443 while (*p
>= '0' && *p
<= '9')
445 if (!params
->orientable
&& i
< wh
-1) {
447 return "Expected comma after number";
448 } else if (params
->orientable
&& i
< wh
) {
449 if (*p
!= 'l' && *p
!= 'r' && *p
!= 'u' && *p
!= 'd')
450 return "Expected orientation letter after number";
451 } else if (i
== wh
-1 && *p
) {
452 return "Excess junk at end of string";
455 if (*p
) p
++; /* eat comma */
461 static game_state
*new_game(midend_data
*me
, game_params
*params
, char *desc
)
463 game_state
*state
= snew(game_state
);
464 int w
= params
->w
, h
= params
->h
, n
= params
->n
, wh
= w
*h
;
471 state
->orientable
= params
->orientable
;
472 state
->completed
= 0;
473 state
->used_solve
= state
->just_used_solve
= FALSE
;
474 state
->movecount
= 0;
475 state
->movetarget
= params
->movetarget
;
476 state
->lastx
= state
->lasty
= state
->lastr
= -1;
478 state
->grid
= snewn(wh
, int);
482 for (i
= 0; i
< wh
; i
++) {
483 state
->grid
[i
] = 4 * atoi(p
);
484 while (*p
>= '0' && *p
<= '9')
487 if (params
->orientable
) {
489 case 'l': state
->grid
[i
] |= 1; break;
490 case 'd': state
->grid
[i
] |= 2; break;
491 case 'r': state
->grid
[i
] |= 3; break;
501 static game_state
*dup_game(game_state
*state
)
503 game_state
*ret
= snew(game_state
);
508 ret
->orientable
= state
->orientable
;
509 ret
->completed
= state
->completed
;
510 ret
->movecount
= state
->movecount
;
511 ret
->movetarget
= state
->movetarget
;
512 ret
->lastx
= state
->lastx
;
513 ret
->lasty
= state
->lasty
;
514 ret
->lastr
= state
->lastr
;
515 ret
->used_solve
= state
->used_solve
;
516 ret
->just_used_solve
= state
->just_used_solve
;
518 ret
->grid
= snewn(ret
->w
* ret
->h
, int);
519 memcpy(ret
->grid
, state
->grid
, ret
->w
* ret
->h
* sizeof(int));
524 static void free_game(game_state
*state
)
530 static int compare_int(const void *av
, const void *bv
)
532 const int *a
= (const int *)av
;
533 const int *b
= (const int *)bv
;
542 static game_state
*solve_game(game_state
*state
, game_aux_info
*aux
,
545 game_state
*ret
= dup_game(state
);
549 * Simply replace the grid with a solved one. For this game,
550 * this isn't a useful operation for actually telling the user
551 * what they should have done, but it is useful for
552 * conveniently being able to get hold of a clean state from
553 * which to practise manoeuvres.
555 qsort(ret
->grid
, ret
->w
*ret
->h
, sizeof(int), compare_int
);
556 for (i
= 0; i
< ret
->w
*ret
->h
; i
++)
558 ret
->used_solve
= ret
->just_used_solve
= TRUE
;
559 ret
->completed
= ret
->movecount
= 1;
564 static char *game_text_format(game_state
*state
)
566 char *ret
, *p
, buf
[80];
567 int i
, x
, y
, col
, o
, maxlen
;
570 * First work out how many characters we need to display each
571 * number. We're pretty flexible on grid contents here, so we
572 * have to scan the entire grid.
575 for (i
= 0; i
< state
->w
* state
->h
; i
++) {
576 x
= sprintf(buf
, "%d", state
->grid
[i
] / 4);
577 if (col
< x
) col
= x
;
579 o
= (state
->orientable ?
1 : 0);
582 * Now we know the exact total size of the grid we're going to
583 * produce: it's got h rows, each containing w lots of col+o,
584 * w-1 spaces and a trailing newline.
586 maxlen
= state
->h
* state
->w
* (col
+o
+1);
588 ret
= snewn(maxlen
+1, char);
591 for (y
= 0; y
< state
->h
; y
++) {
592 for (x
= 0; x
< state
->w
; x
++) {
593 int v
= state
->grid
[state
->w
*y
+x
];
594 sprintf(buf
, "%*d", col
, v
/4);
598 *p
++ = "^<v>"[v
& 3];
606 assert(p
- ret
== maxlen
);
611 static game_ui
*new_ui(game_state
*state
)
616 static void free_ui(game_ui
*ui
)
620 static void game_changed_state(game_ui
*ui
, game_state
*oldstate
,
621 game_state
*newstate
)
625 struct game_drawstate
{
632 static game_state
*make_move(game_state
*from
, game_ui
*ui
, game_drawstate
*ds
,
633 int x
, int y
, int button
)
635 int w
= from
->w
, h
= from
->h
, n
= from
->n
, wh
= w
*h
;
639 button
= button
& (~MOD_MASK
| MOD_NUM_KEYPAD
);
641 if (button
== LEFT_BUTTON
|| button
== RIGHT_BUTTON
) {
643 * Determine the coordinates of the click. We offset by n-1
644 * half-blocks so that the user must click at the centre of
645 * a rotation region rather than at the corner.
647 x
-= (n
-1) * TILE_SIZE
/ 2;
648 y
-= (n
-1) * TILE_SIZE
/ 2;
651 dir
= (button
== LEFT_BUTTON ?
1 : -1);
652 if (x
< 0 || x
> w
-n
|| y
< 0 || y
> h
-n
)
654 } else if (button
== 'a' || button
== 'A' || button
==MOD_NUM_KEYPAD
+'7') {
656 dir
= (button
== 'A' ?
-1 : +1);
657 } else if (button
== 'b' || button
== 'B' || button
==MOD_NUM_KEYPAD
+'9') {
660 dir
= (button
== 'B' ?
-1 : +1);
661 } else if (button
== 'c' || button
== 'C' || button
==MOD_NUM_KEYPAD
+'1') {
664 dir
= (button
== 'C' ?
-1 : +1);
665 } else if (button
== 'd' || button
== 'D' || button
==MOD_NUM_KEYPAD
+'3') {
668 dir
= (button
== 'D' ?
-1 : +1);
669 } else if (button
==MOD_NUM_KEYPAD
+'8' && (w
-n
) % 2 == 0) {
673 } else if (button
==MOD_NUM_KEYPAD
+'2' && (w
-n
) % 2 == 0) {
677 } else if (button
==MOD_NUM_KEYPAD
+'4' && (h
-n
) % 2 == 0) {
681 } else if (button
==MOD_NUM_KEYPAD
+'6' && (h
-n
) % 2 == 0) {
685 } else if (button
==MOD_NUM_KEYPAD
+'5' && (w
-n
) % 2 == 0 && (h
-n
) % 2 == 0){
690 return NULL
; /* no move to be made */
694 * This is a valid move. Make it.
696 ret
= dup_game(from
);
697 ret
->just_used_solve
= FALSE
; /* zero this in a hurry */
699 do_rotate(ret
->grid
, w
, h
, n
, ret
->orientable
, x
, y
, dir
);
705 * See if the game has been completed. To do this we simply
706 * test that the grid contents are in increasing order.
708 if (!ret
->completed
&& grid_complete(ret
->grid
, wh
, ret
->orientable
))
709 ret
->completed
= ret
->movecount
;
713 /* ----------------------------------------------------------------------
717 static void game_size(game_params
*params
, game_drawstate
*ds
,
718 int *x
, int *y
, int expand
)
722 * Each window dimension equals the tile size times one more
723 * than the grid dimension (the border is half the width of the
726 tsx
= *x
/ (params
->w
+ 1);
727 tsy
= *y
/ (params
->h
+ 1);
732 ds
->tilesize
= min(ts
, PREFERRED_TILE_SIZE
);
734 *x
= TILE_SIZE
* params
->w
+ 2 * BORDER
;
735 *y
= TILE_SIZE
* params
->h
+ 2 * BORDER
;
738 static float *game_colours(frontend
*fe
, game_state
*state
, int *ncolours
)
740 float *ret
= snewn(3 * NCOLOURS
, float);
744 frontend_default_colour(fe
, &ret
[COL_BACKGROUND
* 3]);
747 * Drop the background colour so that the highlight is
748 * noticeably brighter than it while still being under 1.
750 max
= ret
[COL_BACKGROUND
*3];
751 for (i
= 1; i
< 3; i
++)
752 if (ret
[COL_BACKGROUND
*3+i
] > max
)
753 max
= ret
[COL_BACKGROUND
*3+i
];
754 if (max
* 1.2F
> 1.0F
) {
755 for (i
= 0; i
< 3; i
++)
756 ret
[COL_BACKGROUND
*3+i
] /= (max
* 1.2F
);
759 for (i
= 0; i
< 3; i
++) {
760 ret
[COL_HIGHLIGHT
* 3 + i
] = ret
[COL_BACKGROUND
* 3 + i
] * 1.2F
;
761 ret
[COL_HIGHLIGHT_GENTLE
* 3 + i
] = ret
[COL_BACKGROUND
* 3 + i
] * 1.1F
;
762 ret
[COL_LOWLIGHT
* 3 + i
] = ret
[COL_BACKGROUND
* 3 + i
] * 0.8F
;
763 ret
[COL_LOWLIGHT_GENTLE
* 3 + i
] = ret
[COL_BACKGROUND
* 3 + i
] * 0.9F
;
764 ret
[COL_TEXT
* 3 + i
] = 0.0;
767 *ncolours
= NCOLOURS
;
771 static game_drawstate
*game_new_drawstate(game_state
*state
)
773 struct game_drawstate
*ds
= snew(struct game_drawstate
);
779 ds
->bgcolour
= COL_BACKGROUND
;
780 ds
->grid
= snewn(ds
->w
*ds
->h
, int);
781 ds
->tilesize
= 0; /* haven't decided yet */
782 for (i
= 0; i
< ds
->w
*ds
->h
; i
++)
788 static void game_free_drawstate(game_drawstate
*ds
)
795 int cx
, cy
, cw
, ch
; /* clip region */
796 int ox
, oy
; /* rotation origin */
797 float c
, s
; /* cos and sin of rotation angle */
798 int lc
, rc
, tc
, bc
; /* colours of tile edges */
801 static void rotate(int *xy
, struct rotation
*rot
)
804 float xf
= xy
[0] - rot
->ox
, yf
= xy
[1] - rot
->oy
;
807 xf2
= rot
->c
* xf
+ rot
->s
* yf
;
808 yf2
= - rot
->s
* xf
+ rot
->c
* yf
;
810 xy
[0] = xf2
+ rot
->ox
+ 0.5; /* round to nearest */
811 xy
[1] = yf2
+ rot
->oy
+ 0.5; /* round to nearest */
815 static void draw_tile(frontend
*fe
, game_drawstate
*ds
, game_state
*state
,
816 int x
, int y
, int tile
, int flash_colour
,
817 struct rotation
*rot
)
823 * If we've been passed a rotation region but we're drawing a
824 * tile which is outside it, we must draw it normally. This can
825 * occur if we're cleaning up after a completion flash while a
826 * new move is also being made.
828 if (rot
&& (x
< rot
->cx
|| y
< rot
->cy
||
829 x
>= rot
->cx
+rot
->cw
|| y
>= rot
->cy
+rot
->ch
))
833 clip(fe
, rot
->cx
, rot
->cy
, rot
->cw
, rot
->ch
);
836 * We must draw each side of the tile's highlight separately,
837 * because in some cases (during rotation) they will all need
838 * to be different colours.
841 /* The centre point is common to all sides. */
842 coords
[4] = x
+ TILE_SIZE
/ 2;
843 coords
[5] = y
+ TILE_SIZE
/ 2;
844 rotate(coords
+4, rot
);
847 coords
[0] = x
+ TILE_SIZE
- 1;
848 coords
[1] = y
+ TILE_SIZE
- 1;
849 rotate(coords
+0, rot
);
850 coords
[2] = x
+ TILE_SIZE
- 1;
852 rotate(coords
+2, rot
);
853 draw_polygon(fe
, coords
, 3, TRUE
, rot ? rot
->rc
: COL_LOWLIGHT
);
854 draw_polygon(fe
, coords
, 3, FALSE
, rot ? rot
->rc
: COL_LOWLIGHT
);
858 coords
[3] = y
+ TILE_SIZE
- 1;
859 rotate(coords
+2, rot
);
860 draw_polygon(fe
, coords
, 3, TRUE
, rot ? rot
->bc
: COL_LOWLIGHT
);
861 draw_polygon(fe
, coords
, 3, FALSE
, rot ? rot
->bc
: COL_LOWLIGHT
);
866 rotate(coords
+0, rot
);
867 draw_polygon(fe
, coords
, 3, TRUE
, rot ? rot
->lc
: COL_HIGHLIGHT
);
868 draw_polygon(fe
, coords
, 3, FALSE
, rot ? rot
->lc
: COL_HIGHLIGHT
);
871 coords
[2] = x
+ TILE_SIZE
- 1;
873 rotate(coords
+2, rot
);
874 draw_polygon(fe
, coords
, 3, TRUE
, rot ? rot
->tc
: COL_HIGHLIGHT
);
875 draw_polygon(fe
, coords
, 3, FALSE
, rot ? rot
->tc
: COL_HIGHLIGHT
);
878 * Now the main blank area in the centre of the tile.
881 coords
[0] = x
+ HIGHLIGHT_WIDTH
;
882 coords
[1] = y
+ HIGHLIGHT_WIDTH
;
883 rotate(coords
+0, rot
);
884 coords
[2] = x
+ HIGHLIGHT_WIDTH
;
885 coords
[3] = y
+ TILE_SIZE
- 1 - HIGHLIGHT_WIDTH
;
886 rotate(coords
+2, rot
);
887 coords
[4] = x
+ TILE_SIZE
- 1 - HIGHLIGHT_WIDTH
;
888 coords
[5] = y
+ TILE_SIZE
- 1 - HIGHLIGHT_WIDTH
;
889 rotate(coords
+4, rot
);
890 coords
[6] = x
+ TILE_SIZE
- 1 - HIGHLIGHT_WIDTH
;
891 coords
[7] = y
+ HIGHLIGHT_WIDTH
;
892 rotate(coords
+6, rot
);
893 draw_polygon(fe
, coords
, 4, TRUE
, flash_colour
);
894 draw_polygon(fe
, coords
, 4, FALSE
, flash_colour
);
896 draw_rect(fe
, x
+ HIGHLIGHT_WIDTH
, y
+ HIGHLIGHT_WIDTH
,
897 TILE_SIZE
- 2*HIGHLIGHT_WIDTH
, TILE_SIZE
- 2*HIGHLIGHT_WIDTH
,
902 * Next, the triangles for orientation.
904 if (state
->orientable
) {
905 int xdx
, xdy
, ydx
, ydy
;
906 int cx
, cy
, displ
, displ2
;
920 default /* case 3 */:
926 cx
= x
+ TILE_SIZE
/ 2;
927 cy
= y
+ TILE_SIZE
/ 2;
928 displ
= TILE_SIZE
/ 2 - HIGHLIGHT_WIDTH
- 2;
929 displ2
= TILE_SIZE
/ 3 - HIGHLIGHT_WIDTH
;
931 coords
[0] = cx
- displ
* xdx
+ displ2
* ydx
;
932 coords
[1] = cy
- displ
* xdy
+ displ2
* ydy
;
933 rotate(coords
+0, rot
);
934 coords
[2] = cx
+ displ
* xdx
+ displ2
* ydx
;
935 coords
[3] = cy
+ displ
* xdy
+ displ2
* ydy
;
936 rotate(coords
+2, rot
);
937 coords
[4] = cx
- displ
* ydx
;
938 coords
[5] = cy
- displ
* ydy
;
939 rotate(coords
+4, rot
);
940 draw_polygon(fe
, coords
, 3, TRUE
, COL_LOWLIGHT_GENTLE
);
941 draw_polygon(fe
, coords
, 3, FALSE
, COL_LOWLIGHT_GENTLE
);
944 coords
[0] = x
+ TILE_SIZE
/2;
945 coords
[1] = y
+ TILE_SIZE
/2;
946 rotate(coords
+0, rot
);
947 sprintf(str
, "%d", tile
/ 4);
948 draw_text(fe
, coords
[0], coords
[1],
949 FONT_VARIABLE
, TILE_SIZE
/3, ALIGN_VCENTRE
| ALIGN_HCENTRE
,
955 draw_update(fe
, x
, y
, TILE_SIZE
, TILE_SIZE
);
958 static int highlight_colour(float angle
)
965 COL_HIGHLIGHT_GENTLE
,
966 COL_HIGHLIGHT_GENTLE
,
967 COL_HIGHLIGHT_GENTLE
,
978 COL_HIGHLIGHT_GENTLE
,
979 COL_HIGHLIGHT_GENTLE
,
980 COL_HIGHLIGHT_GENTLE
,
995 return colours
[(int)((angle
+ 2*PI
) / (PI
/16)) & 31];
998 static float game_anim_length(game_state
*oldstate
, game_state
*newstate
,
999 int dir
, game_ui
*ui
)
1001 if ((dir
> 0 && newstate
->just_used_solve
) ||
1002 (dir
< 0 && oldstate
->just_used_solve
))
1005 return ANIM_PER_RADIUS_UNIT
* sqrt(newstate
->n
-1);
1008 static float game_flash_length(game_state
*oldstate
, game_state
*newstate
,
1009 int dir
, game_ui
*ui
)
1011 if (!oldstate
->completed
&& newstate
->completed
&&
1012 !oldstate
->used_solve
&& !newstate
->used_solve
)
1013 return 2 * FLASH_FRAME
;
1018 static void game_redraw(frontend
*fe
, game_drawstate
*ds
, game_state
*oldstate
,
1019 game_state
*state
, int dir
, game_ui
*ui
,
1020 float animtime
, float flashtime
)
1023 struct rotation srot
, *rot
;
1024 int lastx
= -1, lasty
= -1, lastr
= -1;
1026 if (flashtime
> 0) {
1027 int frame
= (int)(flashtime
/ FLASH_FRAME
);
1028 bgcolour
= (frame
% 2 ? COL_LOWLIGHT
: COL_HIGHLIGHT
);
1030 bgcolour
= COL_BACKGROUND
;
1036 TILE_SIZE
* state
->w
+ 2 * BORDER
,
1037 TILE_SIZE
* state
->h
+ 2 * BORDER
, COL_BACKGROUND
);
1038 draw_update(fe
, 0, 0,
1039 TILE_SIZE
* state
->w
+ 2 * BORDER
,
1040 TILE_SIZE
* state
->h
+ 2 * BORDER
);
1043 * Recessed area containing the whole puzzle.
1045 coords
[0] = COORD(state
->w
) + HIGHLIGHT_WIDTH
- 1;
1046 coords
[1] = COORD(state
->h
) + HIGHLIGHT_WIDTH
- 1;
1047 coords
[2] = COORD(state
->w
) + HIGHLIGHT_WIDTH
- 1;
1048 coords
[3] = COORD(0) - HIGHLIGHT_WIDTH
;
1049 coords
[4] = coords
[2] - TILE_SIZE
;
1050 coords
[5] = coords
[3] + TILE_SIZE
;
1051 coords
[8] = COORD(0) - HIGHLIGHT_WIDTH
;
1052 coords
[9] = COORD(state
->h
) + HIGHLIGHT_WIDTH
- 1;
1053 coords
[6] = coords
[8] + TILE_SIZE
;
1054 coords
[7] = coords
[9] - TILE_SIZE
;
1055 draw_polygon(fe
, coords
, 5, TRUE
, COL_HIGHLIGHT
);
1056 draw_polygon(fe
, coords
, 5, FALSE
, COL_HIGHLIGHT
);
1058 coords
[1] = COORD(0) - HIGHLIGHT_WIDTH
;
1059 coords
[0] = COORD(0) - HIGHLIGHT_WIDTH
;
1060 draw_polygon(fe
, coords
, 5, TRUE
, COL_LOWLIGHT
);
1061 draw_polygon(fe
, coords
, 5, FALSE
, COL_LOWLIGHT
);
1067 * If we're drawing any rotated tiles, sort out the rotation
1068 * parameters, and also zap the rotation region to the
1069 * background colour before doing anything else.
1073 float anim_max
= game_anim_length(oldstate
, state
, dir
, ui
);
1076 lastx
= state
->lastx
;
1077 lasty
= state
->lasty
;
1078 lastr
= state
->lastr
;
1080 lastx
= oldstate
->lastx
;
1081 lasty
= oldstate
->lasty
;
1082 lastr
= -oldstate
->lastr
;
1086 rot
->cx
= COORD(lastx
);
1087 rot
->cy
= COORD(lasty
);
1088 rot
->cw
= rot
->ch
= TILE_SIZE
* state
->n
;
1089 rot
->ox
= rot
->cx
+ rot
->cw
/2;
1090 rot
->oy
= rot
->cy
+ rot
->ch
/2;
1091 angle
= (-PI
/2 * lastr
) * (1.0 - animtime
/ anim_max
);
1092 rot
->c
= cos(angle
);
1093 rot
->s
= sin(angle
);
1096 * Sort out the colours of the various sides of the tile.
1098 rot
->lc
= highlight_colour(PI
+ angle
);
1099 rot
->rc
= highlight_colour(angle
);
1100 rot
->tc
= highlight_colour(PI
/2 + angle
);
1101 rot
->bc
= highlight_colour(-PI
/2 + angle
);
1103 draw_rect(fe
, rot
->cx
, rot
->cy
, rot
->cw
, rot
->ch
, bgcolour
);
1108 * Now draw each tile.
1110 for (i
= 0; i
< state
->w
* state
->h
; i
++) {
1112 int tx
= i
% state
->w
, ty
= i
/ state
->w
;
1115 * Figure out what should be displayed at this location.
1116 * Usually it will be state->grid[i], unless we're in the
1117 * middle of animating an actual rotation and this cell is
1118 * within the rotation region, in which case we set -1
1121 if (oldstate
&& lastx
>= 0 && lasty
>= 0 &&
1122 tx
>= lastx
&& tx
< lastx
+ state
->n
&&
1123 ty
>= lasty
&& ty
< lasty
+ state
->n
)
1128 if (ds
->bgcolour
!= bgcolour
|| /* always redraw when flashing */
1129 ds
->grid
[i
] != t
|| ds
->grid
[i
] == -1 || t
== -1) {
1130 int x
= COORD(tx
), y
= COORD(ty
);
1132 draw_tile(fe
, ds
, state
, x
, y
, state
->grid
[i
], bgcolour
, rot
);
1136 ds
->bgcolour
= bgcolour
;
1139 * Update the status bar.
1142 char statusbuf
[256];
1145 * Don't show the new status until we're also showing the
1146 * new _state_ - after the game animation is complete.
1151 if (state
->used_solve
)
1152 sprintf(statusbuf
, "Moves since auto-solve: %d",
1153 state
->movecount
- state
->completed
);
1155 sprintf(statusbuf
, "%sMoves: %d",
1156 (state
->completed ?
"COMPLETED! " : ""),
1157 (state
->completed ? state
->completed
: state
->movecount
));
1158 if (state
->movetarget
)
1159 sprintf(statusbuf
+strlen(statusbuf
), " (target %d)",
1163 status_bar(fe
, statusbuf
);
1167 static int game_wants_statusbar(void)
1172 static int game_timing_state(game_state
*state
)
1178 #define thegame twiddle
1181 const struct game thegame
= {
1182 "Twiddle", "games.twiddle",
1189 TRUE
, game_configure
, custom_params
,
1198 TRUE
, game_text_format
,
1206 game_free_drawstate
,
1210 game_wants_statusbar
,
1211 FALSE
, game_timing_state
,
1212 0, /* mouse_priorities */