- // VERTEX
- "layout (location=0) in vec2 a_co;"
- "uniform mat4 uPv;"
- "uniform mat4 uMdl;"
- ""
- "void main()"
- "{"
- " vec4 vert_pos = uPv * uMdl * vec4( a_co.x, 0.0, a_co.y, 1.0 );"
- " gl_Position = vert_pos;"
- "}",
-
- // FRAGMENT
- "out vec4 FragColor;"
- "uniform vec4 uColour;"
- ""
- "void main()"
- "{"
- " FragColor = uColour;"
- "}"
- ,
- UNIFORMS({ "uPv", "uMdl", "uColour" })
-)
-
-SHADER_DEFINE( tilemap_shader,
-
- // VERTEX
- "layout (location=0) in vec2 a_co;" // XY
- "layout (location=1) in vec2 a_offset;" // XY offset
- "layout (location=2) in vec4 a_data;" // atlas-uv, amt, other
- "uniform mat4 uPv;"
- "uniform vec2 uOrigin;"
- ""
- "out vec2 aCoords;"
- ""
- "void main()"
- "{"
- "vec2 world_coord = a_co+a_offset+uOrigin;"
- "gl_Position = uPv * vec4( world_coord.x, 0.0, world_coord.y, 1.0 );"
- "aCoords = (a_co*0.98+0.01 + a_data.xy) * 0.125;"
- "}",
-
- // FRAGMENT
- "uniform sampler2D uTexTiles;"
-
- "in vec2 aCoords;"
- "out vec4 FragColor;"
-
- "void main()"
- "{"
- "vec4 glyph = texture( uTexTiles, aCoords );"
- "FragColor = vec4( glyph.xyz, 1.0 );"
- "}"
- ,
- UNIFORMS({ "uPv", "uTexTiles", "uOrigin" })
-)
-
-mat4 m_projection;
-mat4 m_view;
-mat4 m_mdl;
-
-int main( int argc, char *argv[] )
-{
- vg_init( argc, argv, "FishLadder" );
-}
-
-#define CELL_FLAG_INPUT 0x1
-#define CELL_FLAG_OUTPUT 0x2
- #define CELL_FLAG_IO (CELL_FLAG_INPUT|CELL_FLAG_OUTPUT)
-#define CELL_FLAG_WALL 0x4
-#define CELL_FLAG_HOVER 0x8
-#define CELL_FLAG_ITER 0x10
-#define CELL_FLAG_CANAL 0x20
-#define CELL_FLAG_SPLIT 0x40 /* Does this cell split and have an incoming vertical connection? */
-#define CELL_FLAG_WALKABLE (CELL_FLAG_IO|CELL_FLAG_CANAL)
-#define CELL_FLAG_VISITED 0x80
-#define CELL_FLAG_UPLVL 0x100
-#define CELL_FLAG_MERGE 0x200
-
-static struct
-{
- u32 x,y;
-
- struct cell
- {
- u32 flags;
- u32 model_id;
-
- char *conditions;
-
- int level;
- int state;
- }
- * cells;
-
- struct fish
- {
- int alive;
- int co[2];
- int dir[2];
- char data;
- }
- fishes[ 20 ];
- int num_fishes;
-
- vec3 origin;
- struct cell *selected;
- int select_valid;
- int playing;
- u32 frame;
-
- u32 *io;
-
- struct vstack
- {
- struct vframe
- {
- int x, y;
- int i;
- }
- frames[ 64 ];
-
- int level;
- u32 flags;
- }
- stack;
-
- GLuint tile_texture;
- GLuint flow_texture;
-
- GLuint tiles_vao;
- GLuint tiles_vbo;
-}
-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 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( (int[2]){frame->x+dir[0], frame->y+dir[1]} );
- frame->i ++;
-
- 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];
- }
- else
- tile = NULL;
- }
- else
- {
- map.stack.level --;
- tile = NULL;
-
- if( map.stack.level < 0 )
- return NULL;
- }
- }
-
- return tile;
-}
-
-static void map_update_visual(void)
-{
- u8 celldata[ 4096 ];
-
- for( int i = 0; i < map.x*map.y; i ++ )
- {
- celldata[i*4+0] = i & 0x7;
- celldata[i*4+1] = (i & ~0x7) >> 3;
- }
-
- 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 *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;
-
- 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;
-}
-
-static int map_tile_availible( int co[2] )
-{
- // Extract 5x5 grid surrounding tile
- 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 ++ )
- {
- struct cell *cell = map_tile_at( (int[2]){ x, y } );
-
- if( cell && (cell->flags & 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
- 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])) )
- {
- // (reference window: 0x1CE7) Illegal moves
- // 0100011100010 ;
- // 0000001100011 ;
- // 0000011000110 ;
- // 0110001100000 ;
- // 1100011000000 ;
- // 0100001100010 ;
- // 0100011000010 ;
-
- 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;
- glm_ortho( -size, size, -size*ratio, size*ratio, 0.01f, 150.f, m_projection );
-
- glm_mat4_identity( m_view );
- glm_translate_z( m_view, -10.f );
- glm_rotate_x( m_view, 1.5708f, m_view );
-
- glm_mat4_mul( m_projection, m_view, vg_pv );
-
- // 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 = map_tile_at( (int [2]){ x, y } );
- tile->flags &= ~(CELL_FLAG_SPLIT|CELL_FLAG_MERGE|CELL_FLAG_UPLVL);
-
- if( tile->flags & CELL_FLAG_WALKABLE )
- {
- r = map_tile_at_cond( (int[2]){ x+1, y }, CELL_FLAG_WALKABLE );
- l = map_tile_at_cond( (int[2]){ x-1, y }, CELL_FLAG_WALKABLE );
-
- if( r && l )
- {
- upper = map_tile_at_cond( (int[2]){ x, y-1 }, CELL_FLAG_WALKABLE );
- lower = map_tile_at_cond( (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;
- }
- }
- }
- }
- }
-
- // Compute classification
- /*
- map_stack_refresh();
-
- for( int i = 0; i < arrlen( map.io ); i ++ )
- {
- struct *cell cell = &map.cells[ map.io ];
- int coords[2];
-
- if( cell->flags & CELL_FLAG_INPUT )
- {
- map_tile_coords_from_index( map.io, coords );
- map_stack_init( coords );
-
- do
- {
- if( cell->flags & CELL_FLAG_CONNECTOR )
- {
-
- }
- }
- while( (cell = map_stack_next()) );
- }
- }*/
-
- // 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 );