From 745149237a9b25ae5db3e6618b99fd32544b6f7d Mon Sep 17 00:00:00 2001
From: Alexandre <cpge.aboujaib@gmail.com>
Date: Mon, 1 Jul 2024 14:45:16 +0200
Subject: [PATCH] Rescaled maze

---
 a.out       | Bin 898442 -> 898442 bytes
 display.cmi | Bin 11144 -> 11144 bytes
 display.cmo | Bin 43603 -> 43635 bytes
 display.ml  |  19 ++++++++++++-------
 4 files changed, 12 insertions(+), 7 deletions(-)

diff --git a/a.out b/a.out
index 5345b061bf825435aec8ed312b0f8c84cab0b160..df33e2158513d37adccc66d3452ae25596e77e00 100755
GIT binary patch
delta 79
zcmV-V0I>gx>o$t(Hh_cygaU*Egam{Iga(8Mgb0KQgbIWUv<&p+0cN-L<qY3x0cy9^
lPYnuJ0VKEJrVXPF5Ri%0YU%+;qzaRuz>!<$n3t2Z4fpa+A_V{d

delta 82
zcmeBrZPxYLtf7Umg{g(Pg{6hHg{_6Xg`<VDg{y^o3(uFQjH%ndKIOTe$(XtQsy{DR
m`1D`Pc%`=kiB4XDudW6mJhxkP_?|lj&o7u{JALvN-tPciJtAZP

diff --git a/display.cmi b/display.cmi
index 8b15af70d6d0ba34def1b2ed4032c64e102d0850..7480b421fc952ff76d80a435a47351deba6f8afb 100644
GIT binary patch
delta 733
zcmXxcUr3Wt7{_sbXRbd>DaR33n_F&Xij|ZR%CaCKFANeY&6Drs6&5sFw3aKuA(ob2
zlx|N#3WgVYVK7jZSdg)x8}B5jAo4cR$ZqP+qUY^2I5(f~@8Jx!4Ykc3aTl+meLZKl
z?}dn<o$;McyUVP)$<?2)KPl$+TlE*$>U`azX?^>f>+%0p+32G?z_+S^YeT*klEd?_
z7I8hBuO)QK<1XNTSIO|4aH@S!UfwT3T!)1K&3KMERTb1>&L%_@7HVnTbJVHop&B?x
zA#T9J89G!NbSeYN<lF-hgN2*aQ_6qeh3e%z2yqJ*9?)AWk3bRU6vS;<n53QFdZ(I!
zn&tcqq8k<#=%Uw@z351xV~mGI2#s-C_BP3W7)3COd02+fa8bGMyu1&i4#r6yzCdU+
z(nDX19ER~2Mw*8o5E>Ko&9@*&5ZZxIVa~p-1VY12FZM6WG(zVPYT+RWp<z;A*`ORl
zh~GF5tq>Z|$>mSWNpxn=InP4^LSu>E_y=SLrWdB4hfxTP+H7mU1-XQ-S#)K1S%J`a
zmAzN)fc%7T9N{}T`}W-s8htc%U_kysB#g*49%>*oVpLZ#Cnchdh&J<Z88(dzv{jLm
zHHd#je1nH>*fcij(ZLDXjKq5+KJ)MdHjOn3R`$!QNWMh!H4pQ!X}qJA%IZC%!yh6W
TXqtA=R4#R8?P+#bRZ{!~^(@^O

delta 733
zcmXxhT}YEr9LI5fXHLyr);NK(7j;gvw$e&^!B!B=Am{}&?L3bYXBX0F(PS2~%!)};
zES&#>=%T!+5DYR_vnyQ$ffs>9MUj`iP+bH;7eN>OpANhHe1Crq4?Gh+6FqZVT<aWA
zH3hr91|kN<@X$V2y;Z$jeZ}ghgv)2uMy`Qk4bnY*yP0cSv2Le#t_JJ2jcce__fUoV
ze+_Z%DAq9Tb-POV)<F^X4yQT@b(r^K5T{_FlkU5>IhBHnaE?O6Vc`UQb8mI3lTdNa
zafs8fFhoI5yHjPLvYbaC60k5$BOZQx2I?W_afl&U$kTHxFG9WGoP|ij!Yf+k-R)Fw
zp+0cF12GH>pQ+0mmFHlTz$oWo9zvs%mb?e#c^DUAq<L6^(6~na+9UD;j9D0ucvykZ
z$kUbDqcRN>Fzr12gwSx%kJ_j5D$Eqjv4XvHJ%q+}dQvwpGcXrn^2e68LukCAvHEd2
ziQaPbR`Spdq2Zxw-;}(CNF5@69?n8&w9<kvEoab|Mc+*xCLuH)<hmQGA)le&js7}b
zmLW8Pxy$|v$k!P7f`RV^ds!8P#xI&~Ov^tQe2>8u9$FwYKGCkGIa!5R9<c=;j>D$$
zlKwW0%1uZpB>0z>4a24prObxgvIEI5l81P>0h@+F?ah~D6sZ7GEj&DiO=Bl5HwV`K
Z4!3qyeoP0~eBIx9_smo%w|e8K_y@Vg%f0{r

diff --git a/display.cmo b/display.cmo
index d7474ff2c5bf6efc0130e12c8e722f3c13ac8cd6..9496912e38c354fe0def880b45530823eebd72fc 100644
GIT binary patch
delta 323
zcmcb7h3WGZrVRx=jA@$-dG2R2W^E2E`^3ViyxFCCGn;S`W8GfHx*G>rm>8KM?7Ne>
znmmO|8S5Dt>xB=nh%hok*s`0`n#38U8<-dv8rnd_tOG2SjLZoBuE`UcuS++Aq}~FF
zM#cjyR~VTQeEG>$Ez@M0KvD)E!sh@hqa-6ULcn*jN^81ICrIuVkZ58CD$r$QMhI9=
zp5NLgV$E3cm$8%=D4D>>4B?1Rwro2m;=)+Qz*r^(l-SP54B_Yj-IO>vcB$~>{&q_d
zSH`kL#<J=ItW4aD%n(k^<~!|4+{}gsdYc_5uMrcN(0MiM6{GtSuE`4yOpJa$WAfjX
FVE{T<V;BGc

delta 317
zcmex-h3WDYrVRx=jH#OodG2R2W^N8F`^3V?yxFCCGn;TOV~qi0jrRc-CPromJ76+b
zlc#V2V@(NTP1^w$5k_VRd&1_lCUHiQYR1~1jCH&RSSlHrA#7d8$s4=nC&w?9n=HSS
zeR4y)43K7>{I9uCxQ4MVfw8XS0Lv9dW(a%I<gS)!BDIWliy7<oA7EvaWMqbL4otRb
zO&4iltoLQCF9S;GGBQIrYbNh+Z4)tLEGl3uY5+<kFfv0pU6Ui*&WYMH78f%Xw*n=$
zGcrRs3(*~vA>zPTe1)<2-2ql6ZboJZ=l$kC?Md9s=6a@^6DO|`6Zq<C5W;i2MThUX
PQ}FzPNw$+^SA_upmHuu-

diff --git a/display.ml b/display.ml
index 16acfbb..eb7c79e 100644
--- a/display.ml
+++ b/display.ml
@@ -393,7 +393,7 @@ let draw_cube_p_rev (cube : pt_3d array) screen_wd screen_ht fov r g b =
     set_line_width 5;
     for i = 0 to 5 do
       if draw_faces.(i) then begin
-        let light = max (0.) (1. -. (distances.(i)) /. 7.5) in
+        let light = max (0.) (1. -. (distances.(i)) /. 10.) in
         let face_R = int_of_float ((float_of_int r) *. light)
         and face_G = int_of_float ((float_of_int g) *. light)
         and face_B = int_of_float ((float_of_int b) *. light) in
@@ -610,10 +610,10 @@ let get1char () =
     Unix.tcsetattr Unix.stdin Unix.TCSADRAIN termio;
     res ;;
 
-(* ---------------------------------------------------- *)
-(* ---------------------------------------------------- *)
-(* ---------------------------------------------------- *)
-(* ---------------------------------------------------- *)
+(* -------------------------------------------------------------------------------------------------------- *)
+(* -------------------------------------------------------------------------------------------------------- *)
+(* -------------------------------------------------------------------------------------------------------- *)
+(* -------------------------------------------------------------------------------------------------------- *)
 
 type tile = Free | Wall | Crate | Exit | Craxit | Camera ;;
 
@@ -623,11 +623,16 @@ and depth = 45 ;;
 (* dimensions *)
 
 let render_distance = 7 ;;
-let chunk_dist = 1 ;;
+let chunk_dist = 2 ;;
 
 let chunk_size = 4 ;;
 let chunk_size_f = float_of_int chunk_size ;;
 
+(* -------------------------------------------------------------------------------------------------------- *)
+(* -------------------------------------------------------------------------------------------------------- *)
+(* -------------------------------------------------------------------------------------------------------- *)
+(* -------------------------------------------------------------------------------------------------------- *)
+
 let laby = Array.make width [|[||]|] ;;
 for i = 0 to width -1 do
   laby.(i) <- Array.make_matrix height depth Wall
@@ -865,7 +870,7 @@ let rec move_cam_hash (cubes : coloredCube dynamic) b c =(* Printf.printf "[%b]"
 let play_dos laby =
   try
     cheesify laby;
-    let hash = chunkify laby 2 in
+    let hash = chunkify laby 3 in
 
     camera_xyz.z <- -. (1.5) ;
     camera_xyz.x <- -. (float_of_int width) /. 2. ;