+static struct cell *map_tile_at_cond( int pos[2], u32 flags )
+{
+ struct cell *cell = map_tile_at( pos );
+ if( cell && (cell->flags & flags) )
+ return cell;
+
+ return NULL;
+}
+
+static void map_tile_coords_from_index( int i, int coords[2] )
+{
+ coords[0] = i % map.x;
+ coords[1] = (i - coords[0])/map.x;
+}
+
+static void map_stack_refresh(void)
+{
+ for( int i = 0; i < map.x*map.y; i ++ )
+ map.cells[i].flags &= ~CELL_FLAG_VISITED;
+}
+
+static void map_stack_init( int coords[2] )
+{
+ map.stack.level = 0;
+ map.stack.frames[0].i = 0;
+ map.stack.frames[0].x = coords[0];
+ map.stack.frames[0].y = coords[1];
+}
+
+static struct cell *map_stack_next(void)
+{
+ struct cell *tile = NULL;
+
+ while( !tile )
+ {
+ struct vframe *frame = &map.stack.frames[ map.stack.level ];
+
+ int output_dirs[][2] = { {0,1}, {-1,0}, {1,0} };
+
+ if( frame->i < 3 )
+ {
+ int *dir = output_dirs[ frame->i ];
+ tile = map_tile_at_cond( (int[2]){frame->x+dir[0], frame->y+dir[1]}, CELL_FLAG_WALKABLE );
+
+ if( tile && !(tile->flags & CELL_FLAG_VISITED) )
+ {
+ map.stack.level ++;
+ frame[1].i = 0;
+ frame[1].x = frame[0].x+dir[0];
+ frame[1].y = frame[0].y+dir[1];
+
+ tile->flags |= CELL_FLAG_VISITED;
+
+ if( frame->i == 0 )
+ frame->i = 400;
+ }
+ else
+ tile = NULL;
+
+ frame->i ++;
+ }
+ else
+ {
+ map.stack.level --;
+ tile = NULL;
+
+ if( map.stack.level < 0 )
+ return NULL;
+ }
+ }
+
+ return tile;
+}
+
+static void map_stack_current_coords( int coords[2], int offset )
+{
+ coords[0] = map.stack.frames[ map.stack.level+offset ].x;
+ coords[1] = map.stack.frames[ map.stack.level+offset ].y;
+}
+
+static void map_update_visual(void)
+{
+ u8 celldata[ 4096 ];
+
+ static int compute_flow_counter = 0;
+ compute_flow_counter ^= 0x1;
+
+ for( int i = 0; i < map.y*map.x; i ++ )
+ {
+ struct cell *cell = map.cells + i;
+
+ cell->flowing[compute_flow_counter] = cell->flowing[compute_flow_counter^0x1];
+
+ if( !map.cells[i].source_count )
+ cell->flowing[ compute_flow_counter ] = vg_max( cell->flowing[ compute_flow_counter ] - 10, 0 );
+
+ map.cells[i].source_count = 0;
+ }
+
+ for( int y = 0; y < map.y; y ++ )
+ {
+ for( int x = 0; x < map.x; x ++ )
+ {
+ struct cell *cur = map.cells + y*map.x + x;
+ u8 *cellbytes = celldata + (y*map.x+x)*4;
+
+ if( cur->flags & CELL_FLAG_WALKABLE )
+ {
+ struct cell *a, *b, *c, *d;
+
+ a = map_tile_at_cond( (int[2]){ x,y+1 }, CELL_FLAG_WALKABLE );
+ b = map_tile_at_cond( (int[2]){ x+1,y }, CELL_FLAG_WALKABLE );
+ c = map_tile_at_cond( (int[2]){ x,y-1 }, CELL_FLAG_WALKABLE );
+ d = map_tile_at_cond( (int[2]){ x-1,y }, CELL_FLAG_WALKABLE );
+
+ u32 config = (a?0x1:0x0) | (b?0x2:0x0) | (c?0x4:0x0) | (d?0x8:0x0);
+ cellbytes[ 0 ] = config;
+
+ if( cur->flags & CELL_FLAG_OUTPUT )
+ cur->flowing[ compute_flow_counter ] = 128;
+ }
+ else
+ {
+ // TODO: Random background tiles
+ cellbytes[ 0 ] = 1;
+ }
+ }
+ }
+
+ int const k_rate_flow = 16;
+
+ map_stack_refresh();
+ for( int i = 0; i < arrlen( map.io ); i ++ )
+ {
+ int inputcoord[2];
+ if( map.cells[ map.io[i] ].flags & CELL_FLAG_OUTPUT )
+ {
+ map_tile_coords_from_index( map.io[i], inputcoord );
+ map_stack_init( inputcoord );
+ struct cell *cell = map_tile_at( inputcoord );
+
+ int cr[2];
+
+ do
+ {
+ map_stack_current_coords( cr, 0 );
+
+ u8 *cellbytes = celldata + (cr[1]*map.x+cr[0])*4;
+
+ int outflow = cell->flowing[ compute_flow_counter ^ 0x1 ];
+ int sourcing = outflow? 1: 0;
+ int outrate = outflow == 128? k_rate_flow: 0;
+
+ struct cell *a, *b, *d;
+ a = map_tile( (int[2]){ cr[0], cr[1]+1 } );
+ b = map_tile( (int[2]){ cr[0]+1, cr[1] } );
+ d = map_tile( (int[2]){ cr[0]-1, cr[1] } );
+
+ int compute_l = 0, compute_r = 0;
+
+ switch( cellbytes[0] )
+ {
+ // DOWN
+ case 1: case 5: case 11: case 9: case 3:
+ a->flowing[ compute_flow_counter ] += outrate;
+ a->source_count += sourcing;
+ break;
+ case 2: case 6: compute_r = 1; break;
+ case 8: case 12: compute_l = 1; break;
+ case 10: case 14: compute_l = 1; compute_r = 1; break;
+ default: break;
+ }
+
+ if( compute_r && (celldata[ (cr[1]*map.x+cr[0]+1)*4 ] != 14) )
+ {
+ b->flowing[ compute_flow_counter ] += outrate;
+ b->source_count += sourcing;
+ }
+
+ if( compute_l && (celldata[ (cr[1]*map.x+cr[0]-1)*4 ] != 14) )
+ {
+ d->flowing[ compute_flow_counter ] += outrate;
+ d->source_count += sourcing;
+ }
+
+ if( cellbytes[0] == 10 )
+ {
+ int crl[2];
+ map_stack_current_coords( crl, -1 );
+
+ if( crl[0] < cr[0] )
+ {
+ cellbytes[0] = 15;
+ }
+ }
+ }
+ while( (cell = map_stack_next()) );
+ }
+ }
+
+ for( int i = 0; i < map.y*map.x; i ++ )
+ {
+ map.cells[i].flowing[ compute_flow_counter ] = vg_min( 128, map.cells[i].flowing[ compute_flow_counter ] );
+ celldata[ i*4+2 ] = map.cells[i].flowing[ compute_flow_counter ];
+ }
+
+ glBindBuffer( GL_ARRAY_BUFFER, map.tiles_vbo );
+ glBufferSubData( GL_ARRAY_BUFFER, 16*sizeof(float) + 1024*2*sizeof(float), map.x*map.y*4, celldata );
+}
+