Adding sprites and minor code changes...

sprite/meme.mtl

@@ -0,0 +1,11 @@
+newmtl material
+Ns 90.0
+Ka 1.0 1.0 1.0
+Kd 0.5 0.5 0.5
+Ks 0.5 0.5 0.5
+Ke 0.0 0.0 0.0
+Ni 1.0
+d 1.0
+illum 2
+map_Kd meme.png
+

sprite/meme.obj

@@ -0,0 +1,15 @@
+mtllib meme.mtl
+o square
+v -1.0 0.0  1.0
+v  1.0 0.0  1.0
+v -1.0 0.0 -1.0
+v  1.0 0.0 -1.0
+vt 1.0 1.0
+vt 0.0 1.0
+vt 0.0 0.0
+vt 1.0 0.0
+vn 0.0 1.0 0.0
+usemtl material
+s off
+f 1/1/1 2/2/1 4/3/1 3/4/1
+

sprite/wall.mtl

@@ -0,0 +1,11 @@
+newmtl material
+Ns 90.0
+Ka 1.0 1.0 1.0
+Kd 0.5 0.5 0.5
+Ks 0.5 0.5 0.5
+Ke 0.0 0.0 0.0
+Ni 1.0
+d 1.0
+illum 2
+map_Kd wall.png
+

sprite/wall.obj

@@ -0,0 +1,15 @@
+mtllib wall.mtl
+o square
+v -1.0 0.0 0.0
+v  1.0 0.0 0.0
+v -1.0 2.0 0.0
+v  1.0 2.0 0.0
+vt 0.0 0.0
+vt 1.0 0.0
+vt 1.0 1.0
+vt 0.0 1.0
+vn 0.0 1.0 0.0
+usemtl material
+s off
+f 1/1/1 2/2/1 4/3/1 3/4/1
+

xhampion.adb

@@ -55,7 +55,6 @@ begin
 	gameplay: loop
 		exit when window_should_close;
 
-		--~update_camera (view'access, camera_first_person);
 		   if is_key_pressed (key_w) then movement.x := movement.x + 1.0;
 		elsif is_key_pressed (key_s) then movement.x := movement.x - 1.0;
 		elsif is_key_pressed (key_a) then movement.y := movement.y - 1.0;
@@ -67,8 +66,6 @@ begin
 		rotation.x := dd.x;
 
 		update_camera_pro (view'access, movement, rotation, 1.0);
-		--~update_camera_pro (view'access, (0.0, 0.0, 0.0), rotation, 1.0);
-		--~update_camera_pro (view'access, movement, (0.0, 0.0, 0.0), 1.0);
 
 		begin_drawing;
 
@@ -80,8 +77,8 @@ begin
 		loop
 			for j in 0 .. 40
 			loop
-				draw_model (model_array (0), (float (i) * (-4.0), -10.0, float (j) * (-4.0)), 2.0, white);
-				draw_model (model_array (1), (float (i) * (-4.0), -10.0, float (j) * (-4.0)), 2.0, white);
+				draw_model (model_array (0), (float (i) * (-4.0), -1.0, float (j) * (-4.0)), 2.0, white);
+				draw_model (model_array (1), (float (i) * (-4.0), -1.0, float (j) * (-4.0)), 2.0, white);
 			end loop;
 		end loop;