-static void map_reclassify( v4i bounds )
-{
- u8 celldata[ 4096 ];
-
- for( int y = bounds[1]; y < bounds[3]; y ++ )
- {
- for( int x = bounds[0]; x < bounds[2]; 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 = getiftile( (int[2]){ x,y+1 }, CELL_FLAG_WALKABLE );
- b = getiftile( (int[2]){ x+1,y }, CELL_FLAG_WALKABLE );
- c = getiftile( (int[2]){ x,y-1 }, CELL_FLAG_WALKABLE );
- d = getiftile( (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;
- }
- else
- {
- // TODO: Random background tiles
- cellbytes[ 0 ] = 15;
- }
-
- cellbytes[ 1 ] = 0x00;
- cellbytes[ 2 ] = 0x00;
- cellbytes[ 3 ] = 0x00;
- }
- }
-
- glBindBuffer( GL_ARRAY_BUFFER, map.tiles_vbo );
- glBufferSubData( GL_ARRAY_BUFFER, 16*sizeof(float) + 1024*2*sizeof(float), map.x*map.y*4, celldata );
-}
-
-static int map_load( const char *str )
-{
- map_free();
-
- char const *c = str;
-
- // Scan for width
- for(;; map.x ++)
- {
- if( str[map.x] == ';' )
- break;
- else if( !str[map.x] )
- {
- vg_error( "Unexpected EOF when parsing level!\n" );
- return 0;
- }
- }
-
- struct cell *row = arraddnptr( map.cells, map.x );
- int cx = 0;
- int reg_start = 0, reg_end = 0;
-
- for(;;)
- {
- if( !*c )
- break;
-
- if( *c == ';' )
- {
- c ++;
-
- // Parse attribs
- if( *c != '\n' )
- {
- while( *c )
- {
- if( reg_start < reg_end )
- {
- if( *c >= 'a' && *c <= 'z' )
- {
- arrpush( map.cells[ map.io[ reg_start ] ].conditions, *c );
- }
- else
- {
- if( *c == ',' || *c == '\n' )
- {
- reg_start ++;
-
- if( *c == '\n' )
- break;
- }
- else
- {
- vg_error( "Unkown attrib '%c' (row: %u)\n", *c, map.y );
- return 0;
- }
- }
- }
- else
- {
- vg_error( "Over-assigned values (row: %u)\n", map.y );
- return 0;
- }
-
- c ++;
- }
- }
-
- if( reg_start != reg_end )
- {
- vg_error( "Not enough values assigned (row: %u, %u of %u)\n", map.y, reg_start, reg_end );
- return 0;
- }
-
- if( cx != map.x )
- {
- vg_error( "Map row underflow (row: %u, %u<%u)\n", map.y, cx, map.x );
- return 0;
- }
-
- row = arraddnptr( map.cells, map.x );
- cx = 0;
- map.y ++;
- reg_end = reg_start = arrlen( map.io );
- }
- else
- {
- if( cx == map.x )
- {
- vg_error( "Map row overflow (row: %u, %u>%u)\n", map.y, cx, map.x );
- return 0;
- }
-
- row[ cx ].conditions = NULL;
-
- // Parse the various cell types
- if( *c == '+' || *c == '-' )
- {
- arrpush( map.io, cx + map.y*map.x );
- row[ cx ++ ].flags = *c == '+'? CELL_FLAG_INPUT: CELL_FLAG_OUTPUT;
- reg_end ++;
- }
- else if( *c == '#' )
- {
- row[ cx ++ ].flags = CELL_FLAG_WALL;
- }
- else
- {
- row[ cx ++ ].flags = 0x00;
- }
- }
-
- c ++;
- }
-
- // Origin top left corner
- map.origin[0] = -((float)map.x) * 0.5f;
- map.origin[1] = -((float)map.y) * 0.5f;
-
- float *offset_array = (float *)malloc( map.x*map.y*2*sizeof(float) );
-
- for( int y = 0; y < map.y; y ++ )
- {
- for( int x = 0; x < map.x; x ++ )
- {
- float *coord = offset_array + (y*map.x+x)*2;
- coord[0] = x;
- coord[1] = y;
- }
- }
-
- glBindBuffer( GL_ARRAY_BUFFER, map.tiles_vbo );
- glBufferSubData( GL_ARRAY_BUFFER, 16*sizeof(float), map.x*map.y*2*sizeof(float), offset_array );
-
- free( offset_array );
- vg_success( "Map loaded! (%u:%u)\n", map.x, map.y );
- return 1;
-}
-
-// Determines if tile at position co is contentious
-static int map_tile_availible( int co[2] )
-{
- // Extract tiles area of influence as a 5x5 grid in bitfield format
- u32 blob = 0x1000;
- for( int y = vg_max( co[1]-2, 0 ); y < vg_min( map.y, co[1]+3 ); y ++ )
- for( int x = vg_max( co[0]-2, 0 ); x < vg_min( map.x, co[0]+3 ); x ++ )
- if( getiftile( (int[2]){ x, y }, CELL_FLAG_WALKABLE ) )
- blob |= 0x1 << ((y-(co[1]-2))*5 + x-(co[0]-2));
-
- // Run filter over center 3x3 grid to check for invalid configurations
- // The kernel codes both the offsets for reaching each tile inside it, as well as the offsets
- // to move the kernel as a whole.
- int kernel[] = { 0, 1, 2, 5, 6, 7, 10, 11, 12 };
- for( int i = 0; i < vg_list_size(kernel); i ++ )
- if( blob & (0x1 << (6+kernel[i])) )
- {
- // Illegal moves list in bitfield format
- u32 invalid[] = { 0x8E2, 0x63, 0xC6, 0xC60, 0x18C0, 0x862, 0x8C2 };
- u32 window = blob >> kernel[i];
-
- for( int j = 0; j < vg_list_size(invalid); j ++ )
- if((window & invalid[j]) == invalid[j])
- return 0;
- }
-
- return 1;
-}
-
-void vg_update(void)
-{
- // Update camera
- float ratio = (float)vg_window_y / (float)vg_window_x;
- float const size = 7.5f;
-
- m3x3_projection( m_projection, -size, size, size*ratio, -size*ratio );
- m3x3_identity( m_view );
- m3x3_mul( m_projection, m_view, vg_pv );
- vg_projection_update();
-
- // Compute map update
- for( int y = 0; y < map.y; y ++ )
- {
- for( int x = 0; x < map.x; x ++ )
- {
- struct cell *tile, *upper, *lower, *l, *r;
- tile = gettile( (int [2]){ x, y } );
- tile->flags &= ~(CELL_FLAG_SPLIT|CELL_FLAG_MERGE|CELL_FLAG_UPLVL);
-
- if( tile->flags & CELL_FLAG_WALKABLE )
- {
- r = getiftile( (int[2]){ x+1, y }, CELL_FLAG_WALKABLE );
- l = getiftile( (int[2]){ x-1, y }, CELL_FLAG_WALKABLE );
-
- if( r && l )
- {
- upper = getiftile( (int[2]){ x, y-1 }, CELL_FLAG_WALKABLE );
- lower = getiftile( (int[2]){ x, y+1 }, CELL_FLAG_WALKABLE );
-
- if( upper )
- {
- tile->flags |= CELL_FLAG_MERGE | CELL_FLAG_UPLVL;
- }
-
- if( lower )
- {
- tile->flags |= CELL_FLAG_SPLIT;
- l->flags |= CELL_FLAG_UPLVL;
- r->flags |= CELL_FLAG_UPLVL;
- }
- }
- }
- }
- }
-
- map_reclassify();
-
- v2f tile_pos;
- v2_copy( vg_mouse_ws, tile_pos );
- v2_sub( tile_pos, map.origin, tile_pos );
-
- int tile_x = floorf( tile_pos[0] );
- int tile_y = floorf( tile_pos[1] );
-
- map.selected = ptile( (int [2]){tile_x, tile_y} );
-
- if( map.playing )
- {
- if( vg_get_button_down( "go" ) )
- {
- map.playing = 0;
- vg_info( "Ending!\n" );
- }
- }
- else
- {
- if( vg_get_button_down( "go" ) )
- {
- map.playing = 1;
- vg_info( "Starting!\n" );
- }
-
- if( map.selected )
- {
- map.select_valid = map_tile_availible( (int[2]){ tile_x, tile_y } );
-
- if( map.select_valid )
- {
- if( vg_get_button_down("primary") )
- {
- if( map.selected->flags & CELL_FLAG_CANAL )
- {
- map.selected->flags &= ~(CELL_FLAG_CANAL);
- }
- else
- {
- map.selected->flags |= CELL_FLAG_CANAL;
- }
- }
- }
- }
- }
-}
-
-GLuint tile_vao;
-GLuint tile_vbo;
-GLuint fish_texture;