-static struct
-{
- u32 x,y;
-
- struct cell
- {
- u32 flags;
- u32 model_id;
-
- char *conditions;
-
- int level;
- int diff[2];
- }
- * cells;
-
- vec3 origin;
- struct cell *selected;
- int select_valid;
- u32 frame;
-
- u32 *io;
-
- struct vstack
- {
- struct vframe
- {
- int x, y;
- int i;
- }
- frames[ 64 ];
-
- int level;
- u32 flags;
- }
- stack;
-}
-map;
-
-static void map_free(void)
-{
- for( int i = 0; i < arrlen( map.io ); i ++ )
- {
- arrfree( map.cells[ map.io[i] ].conditions );
- }
-
- arrfree( map.cells );
- arrfree( map.io );
- map.x = 0;
- map.y = 0;
- map.cells = NULL;
- map.io = NULL;
-}
-
-static struct cell *map_tile_at( int pos[2] )
-{
- if( pos[0] >= 0 && pos[0] < map.x && pos[1] >= 0 && pos[1] < map.y )
- return map.cells + pos[1]*map.x + pos[0];
- return NULL;
-}
-
-static int map_load( const char *str )
-{
- map_free();
-
- char *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[2] = -((float)map.y) * 0.5f;
-
- vg_success( "Map loaded! (%u:%u)\n", map.x, map.y );
- return 1;
-}
-
-void vg_update(void)
-{
- // Update camera
- float ratio = (float)vg_window_y / (float)vg_window_x;
- float const size = 7.5f;
- glm_ortho( -size, size, -size*ratio, size*ratio, 0.1f, 100.f, m_projection );
-
- glm_mat4_identity( m_view );
- glm_translate_z( m_view, -10.f );
- glm_rotate_x( m_view, 1.0f, m_view );
-
- glm_mat4_mul( m_projection, m_view, vg_pv );
-
- // Compute map update
- map.frame ^= 0x1;
- for( int y = 0; y < map.y; y ++ )
- {
- for( int x = 0; x < map.x; x ++ )
- {
- // Cell is a connector if it has at least 3 connections
- int output_dirs[][2] = { {0,-1}, {-1,0}, {1,0}, {0,1} };
- u32 output_count = 0;
- struct cell *tile, *thistile;
- thistile = map_tile_at( (int [2]){x,y} );
-
- if( thistile->flags & CELL_FLAG_CANAL )
- {
- for( int i = 0; i < vg_list_size( output_dirs ); i ++ )
- {
- tile = map_tile_at( (int [2]){ x+output_dirs[i][0], y+output_dirs[i][1] } );
-
- if( tile && tile->flags & CELL_FLAG_CANAL )
- output_count ++;
- }
-
- if( output_count >= 3 )
- thistile->flags |= CELL_FLAG_CONNECTOR;
- else
- thistile->flags &= ~CELL_FLAG_CONNECTOR;
- }
- }
- }
-
- // Get mouse ray
- vec3 ray_origin;
- vec3 ray_dir;
-
- mat4 pv_inverse;
- vec4 vp = { 0.f, 0.f, vg_window_x, vg_window_y };
- glm_mat4_inv( vg_pv, pv_inverse );
- glm_unprojecti( (vec3){ vg_mouse_x, vg_window_y-vg_mouse_y, -1.f }, pv_inverse, vp, ray_dir );
- glm_unprojecti( (vec3){ vg_mouse_x, vg_window_y-vg_mouse_y, 0.f }, pv_inverse, vp, ray_origin );
- glm_vec3_sub( ray_dir, ray_origin, ray_dir );
-
- // Get floor tile intersection
- float ray_t = -ray_origin[1] / ray_dir[1];
-
- vec3 tile_pos;
- glm_vec3_copy( ray_origin, tile_pos );
- glm_vec3_muladds( ray_dir, ray_t, tile_pos );
- glm_vec3_sub( tile_pos, map.origin, tile_pos );
-
- int tile_x = floorf( tile_pos[0] );
- int tile_y = floorf( tile_pos[2] );
-
- map.selected = map_tile_at( (int [2]){tile_x, tile_y} );
-
- if( map.selected )
- {
- // Check if valid
- int validation[][2] = { {1,1}, {-1,1}, {-1,-1}, {1,-1} };
- struct cell *a, *b, *c;
-
- map.select_valid = 1;
- for( int i = 0; i < vg_list_size( validation ); i ++ )
- {
- a = map_tile_at( (int [2]){ tile_x+validation[i][0], tile_y } );
- b = map_tile_at( (int [2]){ tile_x, tile_y+validation[i][1] } );
-
- if( a && b && (a->flags & b->flags & CELL_FLAG_CANAL) )
- {
- c = map_tile_at( (int [2]){ tile_x+validation[i][0], tile_y+validation[i][1] } );
-
- if( c && (c->flags & CELL_FLAG_CANAL ) )
- {
- map.select_valid = 0;
- break;
- }
- }
- }
-
- if( map.select_valid )
- {
- if( vg_get_button_down("primary") )
- {
- if( map.selected->flags & CELL_FLAG_CANAL )
- {
- map.selected->flags &= ~(CELL_FLAG_CANAL | CELL_FLAG_CONNECTOR);
- }
- else
- {
- map.selected->flags |= CELL_FLAG_CANAL;
- }
- }
- }
- }
-}
-
-GLuint tile_vao;
-GLuint tile_vbo;
-
-void vg_render(void)