r3dTerrain2::LoadLayerFromScript1( Script_c *script, r3dTerrainLayer* layer, int* count )
{
#if !R3D_TERRAIN_V2_GRAPHICS
	return false;
#endif

	char buffer[ MAX_PATH ];
	char szName[ MAX_PATH ];

	bool hasTextures = false;
    // fixed buffer steepsounds
	int DownScale = GetTerraTexDownScale();

	script->SkipToken( "{" );
	while ( ! script->EndOfFile() )
	{
		script->GetToken( buffer );
		if ( *buffer == '}' )
			break;

		if ( ! strcmp( buffer, "map_diffuse:" ) )
		{
			hasTextures = true;

			script->GetString( szName, sizeof( szName ) );
			layer->DiffuseTex = r3dRenderer->LoadTexture( szName, D3DFMT_UNKNOWN, false, DownScale );
		}
		else if( !strcmp(buffer, "split_enable:" ))
		{
			// unused
			script->GetInt();
		}
		else if ( ! strcmp( buffer, "scale:" ) )
		{
			layer->ScaleU = script->GetFloat();
			layer->ScaleV = layer->ScaleU;
		}
		else if ( ! strcmp( buffer, "split:" ) )
		{
			// unused
			script->GetFloat();
		}
		else if ( ! strcmp( buffer, "map_normal:" ) )
		{
			hasTextures = true;

			script->GetString( szName, sizeof( szName ) );
			layer->NormalTex = r3dRenderer->LoadTexture( szName, D3DFMT_UNKNOWN, false, DownScale );
		}
		else if ( ! strcmp( buffer, "gloss:" ) )
		{
			layer->SpecularPow = script->GetFloat();
		}
		else if( ! strcmp( buffer, "mat_type:"  ) )
		{
			char buff[ 512 ];

			buff[ sizeof buff - 1 ] = 0;

			script->GetLine( buff, sizeof buff - 1 );

			if(strstr(strupr(buff), "CONCRETE"))
				strcpy(buff,"Concrete");
			else if(strstr(strupr(buff), "DIRT"))
				strcpy(buff,"Dirt");
			else if(strstr(strupr(buff), "SAND"))
				strcpy(buff,"Sand");
			else if(strstr(strupr(buff), "SNOW"))
				strcpy(buff,"Snow");
			else if(strstr(strupr(buff), "GRASS"))
				strcpy(buff,"Grass");
			else if(strstr(strupr(buff), "FOREST"))
				strcpy(buff,"Forest");
			else if(strstr(strupr(buff), "WOOD"))
				strcpy(buff,"Wood");
			else if(strstr(strupr(buff), "METAL_RESOURCES"))
				strcpy(buff,"Metal_Resources");
			else if(strstr(strupr(buff), "WOOD_RESOURCES"))
				strcpy(buff,"Wood_Resources");
			else if(strstr(strupr(buff), "WATER"))
				strcpy(buff,"Water");
			else if(strstr(strupr(buff), "METAL"))
				strcpy(buff,"Metal");


			layer->MaterialTypeName = buff;

			/*char buff[ 512 ];

			buff[ sizeof buff - 1 ] = 0;

			script->GetLine( buff, sizeof buff - 1 );

			char name[ 128 ];

			name[ 0 ] = 0;

			sscanf( buff, "%31s", name );

			layer->MaterialTypeName = name;*/
		}
	}

	char name[ 256 ];

	sprintf( name, "Layer %d", *count );

	layer->Name = name;

	++*count;

	return hasTextures;
}