From 37d87919a54110cf7964bd1843fc69bda12d32d7 Mon Sep 17 00:00:00 2001
From: hgn <hgodden00@gmail.com>
Date: Mon, 31 Oct 2022 19:04:17 +0000
Subject: [PATCH] 1.0

---
 main.c                   |   4 +-
 models_src/ch_outlaw.mdl | Bin 607424 -> 607424 bytes
 shaders.sh               |   1 +
 shaders/water_fast.fs    |  60 +++++++++
 shaders/water_fast.h     | 257 +++++++++++++++++++++++++++++++++++++++
 world_water.h            | 108 ++++++++++------
 6 files changed, 394 insertions(+), 36 deletions(-)
 create mode 100644 shaders/water_fast.fs
 create mode 100644 shaders/water_fast.h

diff --git a/main.c b/main.c
index 22052fa..e105621 100644
--- a/main.c
+++ b/main.c
@@ -19,8 +19,8 @@
  */
 
 #define VG_3D
-//#define VG_STATIC static
-#define VG_STATIC 
+#define VG_STATIC static
+//#define VG_STATIC 
 
 //#define VG_MINIMAL_TEST
 #ifndef VG_MINIMAL_TEST
diff --git a/models_src/ch_outlaw.mdl b/models_src/ch_outlaw.mdl
index 6ff28b6a3ce579422419db1b76e9dabe7ea8de84..f3d78588041729450696b67dc85d709e414b5ffe 100644
GIT binary patch
delta 2566
zcma)+4^UNg7RUR67tZV95FrAVsR54!`S%`(2=`u0;Ax;}iTo4UCnAD?qKJwCnjtEI
znBr+gKy(;d(=|%ws&MZ$?FE&t%8KT?t3wKGsU@;3YijO6ory-B>CXJ#y>s68cYf!5
z@BN(Po869YcKg&-%PhBdzUaOoN?Q`8Wwb14S<)Iti=$;FMQN>P^=kbu{KzlR>jkYT
zUuw8-ZRWHEhhG%d{yjiUy6B6mEFebP>KZ6EoZcX;nXbc&7T~5m6?amY`*uEmeRQT|
zZ3zJu+K0!pM5hi}sCCt&k%Qu*?u=wH&tDa)S)Jg~xm74%6DB@<biMHCvZh~F_&xu6
z`UBCZ=lP_m<HYmP!D4<)v9M=ih2T*!^(lRM+%bNO+dVPs!YRJc#EGB%gNd~*K4L}i
zR^iRI-{~>Z3hZp0H*6BBoAX3EYaK4Of;rj|WAcT2>$1eC)fL!k1#6tj_Vw^$;{&mD
zXVzHfcz1E>u_>Z2gc+nbYdCMMy+obHQ>UGyGcnMXT2Cdr7Cx~n%@)Y617ue|*_B9k
z1v)^?<TkRa{;^%E@bXsSLi5wD4{1eSPpvdkD>W_BR}OH21^1A5+2maft5g1fck(>)
zuH&(Hc+nBMwD4P(QmYe;w_$qhb%kUm<7_wZWCyXp4Swc4uiC0pFh>WTny-`JR36^{
zkI;+tI*4U1_&^8SnHO$zhZJ^9>UW0*#;UM-JOr|zuwy(WnTX5-Jh`C$FBJ{?4L)AK
z-=XY4lLz=PJKRP$uCQg4U_i46++YLP=t+NE!%j~~=Ju`I#lL~!6DUs&=1hP@mVl=x
z(2n&s{%Qd-FG_bw)~NyL=S90_p~(vpHSbj>tBvnEE2Gft1tlyMXLv&zn~P1}q%mWc
zH%Kf3t9>ZA2{~Wb%1&aXFQszU@04$&*_UK*VZSf9vtk_W2Yp;_(D!mTI_OC{1MBtF
z`c!<NrvmScTA^M?lYvV5_m3U&My#Yqwh+w*NaXUYUKJLjn?ICrSM43tx!C9r24=!8
zf6Dwi4iA7<HUT>Vz@5{{ykLcFA~o74c}=9MnFgBz={|t`Br5c4te*s>%ohEE=qzW~
zZoU&!gQ%Vs><^;S-79P5qv$pnnmN0yo5B0BYcjZN?){Lb-d($$_eY0ddapWM84M+w
z`nkF4%{nXPB61-l3Qd@*mj5qL(P2Oc6`zl(gHgN`ryeucD!Eu0LRB5bFG9dznK~v<
z8VCVr#(dFEAhnEB1n{&e^q8eKFb8$Pj6;67T7WmW&(F<LW@Ehov0Ug+2K6t<L@4Dv
zPUNZ$xJ`r`+_H$HJmC6JD&BPVxEvrghC-qxw<LYJT8egI^tIXhW~+zx{VH=(co;Y`
zF7^1&E&h@z9A06X3sXy#q)XYN7K<aGM7u2AR-G1UBW@fv1|5wAVCShcCBByzKPwxD
zMk7t9{W&KTm!ywdY))ok11XBG{OYV0ANf#L4@Qcwjb9*~w~u>jl=NNOBHL8n6?aVk
zl8;!{s#Ik(3I}o%o~wT=gp+sOzbl^pw1e+`)u_DGW)>E;FM5_<ikt=-YgQq}L_-><
zsd;C*64jY6-jK|5pwz;+$vHeIx?(`w^3QJG&+~oxJMXi+!KLt7nO+zilDqeN2M5Lf
zB9>KM;oC>QBzx`nRwy`<ff!3>yquRVW3#t>IKBv5V<AQ}GRR3iRbUW%(Jc->8F?pV
zxIA*vfN1~TzxWYnqm=UKcHUt*cE^D(*r{fs8nSw?d?!@@+`}uURmgK92E@*lZG8IS
zd&)Oi0w243J{sfc@LRD{)XdE)A8W6}RfB>5MnuRnYXtG5Y!7URhbE2l^&@ih=?w8A
zrY3--b%=8nDo0=D-}YOJ?uoQv$)4px;Q4dH=S3!rrGTbq)IDL<H~WNkEKZ~in^tZV
zuG#vChr_(lI1iGT0qf^M59`FTBsj_1aQ1wf3JoJxhyw>c;UlqWKKNLQeTY5t;i$#K
z1Zi(F%w)_4d;bI~+kuTH=p)kV7eKP*$tewJodU(&pJ(O?AL6zYVxbx36fkgGgfiu-
z)Sp71BO8l$sWhDiq^wl1wP1gf3ev!Z(Ris_3|qOsCR?iQQb0OHGu9&&XTX4kO`e#c
z-aYZH(sgB{jMI$Zs;R8aRCCs<il@|+1=beqJ4s#&MND(<i{awUg^Ci0;W>~ztYU1N
zpY(AKI5F<4Iaic8G%u%`e6V*pG_xP@;0hW`w`jzcNOrk!c^He7Zmp(+HM`Q!DAMg<
zHB1W6heM3DV*gs2DB05bccIpTeISi1f+|iEvw4#0@3%w9lg#f!Bx5rryN&RQwKkgw
zn@)rk6Jdd61k^7?SR4`7NQ7Y-y`}~tjDJE{D=8ik_5l&59E?=|0AX@G5%v)gwm&!F
zx%wf5$+w9xTOus2ebKY@SXB-V?1t1>4oine3;{~k6Hu24C_k6NXKj20)DR}*K_<!`
zGqGql=(H}xQ`KXhB-{-_%y9?-@)9E8%o757s>zrk2%%#Q1!|2E@(dziClO#A4E&Cf
z8o1;*1ZR2nYmad*B%IS~N$pF3>?A;D6ChYiufjxtOd>#<2#|qVDAr~Y5#2<DL`0PA
afi4=~S#>n6?WF2Dc!#lvQtw_kQ}=)AcJ+P$

delta 2566
zcma)+3s4p3703C&<(}(B5fwqAX{<ctC2s{`ca4HqQ3OT^C<sMFKqU^SC<<blAW-C0
z#WNKVG@xnK7#x|6;_edk22E=uzKxAhMr3?T6v1~7VyAS}ne5DWcjw&ycfND}yT8*^
zXxCI|_l>QNX*OLO=<xY0UH&W`qh(CXgw_CB94%96mQEAasT*o*EL3jx6T)|8NxPqG
z44lrb)?dh+>@6;?al=){5UINw>?n4PX%w349q@uN*y&mqGz&{tH}Db45=mnMKE}G7
zV~L{X$W3AFV`tQJkeB<-un2KjMyD{eajW2TtyCz<3KU<xzKmX98v3m})Wo-Lcp;uR
zAn<DJ2vO(=6ulp;7iuPy2~K5G-_lnNsN%!LXJSguNq({KQz3TbK(V&KO)T>-6{Z~j
zKRwPg1q-u|akavS*%@M4p-Vlcm_mdur?65e7?mnkWS3%#DP&oD{A%Fu{`f+SI*|6!
zy=SAvC(CAt&OLS>QnUunYIK+1bQ-2C!HMS7x+~eWjqC~~yOPa;>`EoOR+3#QWY<JX
zh@8}G*Kd7xslw1w;e6xUt@mq1&ZJi6Q7bhC()X5dp7|dj@65=%;f-6B-{GCCkav^G
zy9p20;{_{d*JV<dg?(L0E!N;@#yqgo7UJ0v47USkwik2k;6CT{tGPM_)9t}odpv%M
zV)WvX@Br)VA&UJGU)aMY=7Qx8kjM^6T@J9DvF%vp2ou=@Jm*MBe33bUGw0iNOab)h
zee8ICPWdY)IDs28$8x%H>yOw7o@j7_+w3vcJJTO+c+DB&x!Uzxc}EO#p*-6#-34OU
zTs-MQJN|6ut!5*0rF1{b_Nq5}xYDjrOmKx5?H3jCYJK)dWh5G0A)hV8knxbrqOoB-
zX}-ty@gOlhR=H8I5IJ`!WzAUOPN{4>x5)R=;7+m`*yRom>~kFL0S~zhzc%?gT6&Un
zHr9Dk>w);flL~xfvs`V*1TQM-=B;yb0anl>TZ9HLh~ZY5juKMQ&KvT%E5j_+NUZk;
zFSY>Ny(#k;9OMHn%n8r=fCJ|s^MVH11Zwn=<T`<>W`GS7>E469FBRH?b-qx<2BU``
zon>QtgTIPNepHWwU4B%$eMPnWE!s_jMs8@@9sfPpJ_#JOPj6<bkJoPEz0lI1-m4w1
z^oM-y?oU>z_jZ^n7m*7fkvMOvy0Iryu|=N%Dn1L7dZSw|MXQGm)yhh&2%xGO@w))<
zGPyV0R_YFbk&L;ag+S^f_^|-aX4y_*>Q~HCO$gavkE;b3$JPH7ri5Xg08yNH&rAIW
zG7*Y6m*y4f-?3bT+g$pzL%aq*n@q(oXl;@wNcEE;#)L~v%~1b>7J>A&S-5|y?)&nk
zJU|Kx1S`g+G~GYqBP9gE2TXfmYLPPk(x;*s=1qfqU4h>SH5rDA8%GaAD?I@?`D(JV
zzbaV#cccaC^)#JMM;%v+!gJ-9x+S=q6uHwwMycl9ec7d8y7-~v0^#hi=(k46o#p~L
z_TUrIRQ!=2nAN7RkrxEzV(@$QWgCs;%I8nST|sU9vV>5@%g`azgv7l|FU_0|S`90e
zB10jW)7H$Hq0G9rM!X{#BB01vpR)DqNnvH(Vq*G3zPo2^<Hu_}c(FP6U73t}hotYW
zEdNP!pNfmzZ}WqHFb{ZDctbc;z7R2r%t#t6%0+>D<#Da+uq6s2wN`%C>c4Wl#NW^^
z8upCvJqWVZqHgidh+F*TS92AkGoSFW2D}js_WnV-09Cu`yu7Ez`MrmiIF!h>N!{X{
zC8zlzRRh)Sk6Q!sKZ-*ATsquvB3PXfa*RJV+Xh$l2ByvlmecZQiVa6?aQ9qj&{|*r
zRt`P6SiFQu^FY!qkBAUV<G<$TXJ?^93~g}YD}<VhCxtNYIE<oz_Lj{vVf7DR3TH4c
zhBnlkDiOw-dx)(YolqYO^O+~s#X<+WipBHcC_91SaWoa`hA$T%@7=@C!iG3-GkKJ@
z6FcJIkg-vWv@;%NGp57NKY_{+>l5H18-jHUAl{_5?I~&!A&;w^ohfX>@<d|cFv^MG
z#T5y~$}dt^B7KhR4``7@)2T;FO9FFac1p@ghOvys%Z?N%<@Uv!s6R<QsSwK84JmIi
zbQ_zk5*MpI&Hq%cU)dnzbUoN=v3jYxe66auN)2hCF=jtY@-oO}+B4q`67Mcl6kiNV
zhxh?Yt+yPIzDfsc#vP5gqC}w~gK8R&of*)`I&j}|8cX+S#1=~yE8y|~79!nUO$TfL
zmU>E&9{8(4QqUUM&)9M7T1yjUne<sUR2#D*X-qCua@vSOU)9TFv#?S!d;v2V3zaN3
zzy})LIwEW-5mrWoO)Ms$^lu2eOoU-Ey{1+oY&#KVWVQrbNRc~(2piEynEE>ilb@|_
zQ#3?a)5YNT>iZEU_ap3GdaNt~OLkYPFM(x)ru73#?gc8a52$x->;vk5Ovt@VJURWE
ziACGMUbm8XDkh#BTGvUq4g8o@KLX@l0;=8+&{0Lk^g{@(wo~AjHv}9c0`$Fs|1x6e
zWn?>Cvg(Jk?0dWq=fi|^ay6-o2@pnr#1SA^O|QcC4ItqJNOv{l={67%c0|NkA|k&A
a+L?rDJ7`)Dk*apU9L8Qsojc*wj{g8h`1l0?

diff --git a/shaders.sh b/shaders.sh
index f2ca0d4..79604a6 100755
--- a/shaders.sh
+++ b/shaders.sh
@@ -21,6 +21,7 @@ shader fscolour blit.vs colour.fs
 shader alphatest standard.vs std_alphatest.fs
 shader scoretext scoretext.vs vblend.fs
 shader water standard.vs water.fs
+shader water_fast standard.vs water_fast.fs
 shader gate gate.vs gate.fs
 shader gatelq gate.vs gate_lq.fs
 shader route standard.vs route.fs
diff --git a/shaders/water_fast.fs b/shaders/water_fast.fs
new file mode 100644
index 0000000..2919e09
--- /dev/null
+++ b/shaders/water_fast.fs
@@ -0,0 +1,60 @@
+out vec4 FragColor;
+
+uniform sampler2D uTexDudv;
+
+uniform float uTime;
+uniform vec3 uCamera;
+uniform float uSurfaceY;
+
+uniform vec3 uShoreColour;
+uniform vec3 uOceanColour;
+
+in vec4 aColour;
+in vec2 aUv;
+in vec3 aNorm;
+in vec3 aCo;
+in vec3 aWorldCo;
+
+#include "common_world.glsl"
+
+vec4 water_surf( vec3 halfview, vec3 vnorm, float depthvalue )
+{
+   vec3 surface_tint = mix(uShoreColour, uOceanColour, depthvalue);
+
+   float ffresnel = pow(1.0-dot( vnorm, halfview ),5.0);
+
+   vec3 lightdir = vec3(0.95,0.0,-0.3);
+   vec3 specdir = reflect( -lightdir, vnorm );
+   float spec = pow(max(dot(halfview,specdir),0.0),20.0)*0.3;
+   
+   return vec4( surface_tint + spec, max(min(depthvalue*4.0, 1.0),0.0) );
+}
+
+void main()
+{
+   // Surface colour composite
+   float depthvalue = clamp( -world_depth_sample( aCo )*(1.0/25.0), 0.0, 1.0 );
+
+   vec2 world_coord = aCo.xz * 0.008;
+   vec4 time_offsets = vec4( uTime ) * vec4( 0.008, 0.006, 0.003, 0.03 );
+   vec4 dudva = texture( uTexDudv, world_coord + time_offsets.xy )-0.5;
+   vec4 dudvb = texture( uTexDudv, world_coord *7.0 - time_offsets.zw )-0.5;
+
+   vec3 surfnorm = dudva.rgb + dudvb.rgb;
+   surfnorm = normalize(vec3(0.0,1.0,0.0) + dudva.xyz*0.4 + dudvb.xyz*0.1);
+   
+   // Foam
+   float fband = fract( aCo.z*0.02+uTime*0.1+depthvalue*10.0 );
+   fband = step( fband+dudva.a*0.8, 0.3 ) * max((1.0-depthvalue*4.0),0.0);
+
+   // Lighting
+   vec3 halfview = -normalize( aCo-uCamera );
+
+   // Fog
+   float fdist = pow(length( aCo.xz-uCamera.xz ) * 0.00047, 2.6);
+
+   // Composite
+   vec4 vsurface = water_surf( halfview, surfnorm, depthvalue );
+   vsurface.a -= fdist;
+   FragColor = mix( vsurface, vec4(1.0,1.0,1.0,0.5), fband );
+}
diff --git a/shaders/water_fast.h b/shaders/water_fast.h
new file mode 100644
index 0000000..7b92ea8
--- /dev/null
+++ b/shaders/water_fast.h
@@ -0,0 +1,257 @@
+#ifndef SHADER_water_fast_H
+#define SHADER_water_fast_H
+static void shader_water_fast_link(void);
+static void shader_water_fast_register(void);
+static struct vg_shader _shader_water_fast = {
+   .name = "water_fast",
+   .link = shader_water_fast_link,
+   .vs = 
+{
+.orig_file = "../../shaders/standard.vs",
+.static_src = 
+"layout (location=0) in vec3 a_co;\n"
+"layout (location=1) in vec3 a_norm;\n"
+"layout (location=2) in vec2 a_uv;\n"
+"layout (location=3) in vec4 a_colour;\n"
+"layout (location=4) in vec4 a_weights;\n"
+"layout (location=5) in ivec4 a_groups;\n"
+"\n"
+"#line      2        0 \n"
+"\n"
+"uniform mat4x3 uMdl;\n"
+"uniform mat4 uPv;\n"
+"\n"
+"out vec4 aColour;\n"
+"out vec2 aUv;\n"
+"out vec3 aNorm;\n"
+"out vec3 aCo;\n"
+"out vec3 aWorldCo;\n"
+"\n"
+"void main()\n"
+"{\n"
+"   vec3 world_pos = uMdl * vec4(a_co,1.0);\n"
+"   gl_Position = uPv * vec4( world_pos, 1.0 );\n"
+"   aColour = a_colour;\n"
+"   aUv = a_uv;\n"
+"   aNorm = mat3(uMdl) * a_norm;\n"
+"   aCo = a_co;\n"
+"   aWorldCo = world_pos;\n"
+"}\n"
+""},
+   .fs = 
+{
+.orig_file = "../../shaders/water_fast.fs",
+.static_src = 
+"out vec4 FragColor;\n"
+"\n"
+"uniform sampler2D uTexDudv;\n"
+"\n"
+"uniform float uTime;\n"
+"uniform vec3 uCamera;\n"
+"uniform float uSurfaceY;\n"
+"\n"
+"uniform vec3 uShoreColour;\n"
+"uniform vec3 uOceanColour;\n"
+"\n"
+"in vec4 aColour;\n"
+"in vec2 aUv;\n"
+"in vec3 aNorm;\n"
+"in vec3 aCo;\n"
+"in vec3 aWorldCo;\n"
+"\n"
+"#line       1        1 \n"
+"layout (std140) uniform ub_world_lighting\n"
+"{\n"
+"   vec4 g_light_colours[3];\n"
+"   vec4 g_light_directions[3];\n"
+"   vec4 g_ambient_colour;\n"
+"\n"
+"   vec4 g_water_plane;\n"
+"   vec4 g_depth_bounds;\n"
+"   float g_water_fog;\n"
+"   int g_light_count;\n"
+"   int g_light_preview;\n"
+"};\n"
+"\n"
+"uniform sampler2D g_world_depth;\n"
+"\n"
+"// Standard diffuse + spec models\n"
+"// ==============================\n"
+"\n"
+"vec3 do_light_diffuse( vec3 vfrag, vec3 wnormal )\n"
+"{\n"
+"   vec3 vtotal = g_ambient_colour.rgb;\n"
+"\n"
+"   for( int i=0; i<g_light_count; i++ )\n"
+"   {\n"
+"      vec3 vcolour = g_light_colours[i].rgb;\n"
+"      vec3 vdir = g_light_directions[i].xyz;\n"
+"\n"
+"      float flight = max(dot( vdir, wnormal )*0.75+0.25,0.0);\n"
+"      vtotal += vcolour*flight;\n"
+"   }\n"
+"\n"
+"   return vfrag * vtotal;\n"
+"}\n"
+"\n"
+"vec3 do_light_spec( vec3 vfrag, vec3 wnormal, vec3 halfview, float fintensity )\n"
+"{\n"
+"   vec3 vcolour = g_light_colours[0].rgb;\n"
+"   vec3 vdir = g_light_directions[0].xyz;\n"
+"\n"
+"   vec3 specdir = reflect( -vdir, wnormal );\n"
+"   float spec = pow(max(dot( halfview, specdir ), 0.0), 10.0);\n"
+"   return vfrag + vcolour*spec*fintensity;\n"
+"}\n"
+"\n"
+"float world_depth_sample( vec3 pos )\n"
+"{\n"
+"   vec2 depth_coord = (pos.xz - g_depth_bounds.xy) * g_depth_bounds.zw; \n"
+"   return texture( g_world_depth, depth_coord ).r;\n"
+"}\n"
+"\n"
+"float shadow_sample( vec3 vdir )\n"
+"{\n"
+"   vec3 sample_pos = aWorldCo + vdir;\n"
+"   float height_sample = world_depth_sample( sample_pos );\n"
+"\n"
+"   float fdelta = height_sample - sample_pos.y;\n"
+"   return clamp( fdelta, 0.1, 0.2 )-0.1;\n"
+"}\n"
+"\n"
+"vec3 do_light_shadowing_old( vec3 vfrag )\n"
+"{\n"
+"   float faccum = 0.0;\n"
+"   faccum += shadow_sample( vec3( 0.0, 0.5, 0.0 ));\n"
+"   faccum += shadow_sample( vec3( 2.0, 0.3, 0.0 ));\n"
+"   faccum += shadow_sample( vec3( 3.0, 1.0, 0.0 ));\n"
+"   faccum += shadow_sample( vec3( 5.0, 1.0, 0.0 ));\n"
+"   faccum += shadow_sample( vec3( 0.0, 0.5, 0.0 )*1.5);\n"
+"   faccum += shadow_sample( vec3( 2.0, 0.3, 0.0 )*1.5);\n"
+"   faccum += shadow_sample( vec3( 3.0, 1.0, 0.0 )*1.5);\n"
+"   faccum += shadow_sample( vec3( 5.0, 1.0, 0.0 )*1.5);\n"
+"   return mix( vfrag, g_ambient_colour.rgb, faccum );\n"
+"}\n"
+"\n"
+"vec3 do_light_shadowing( vec3 vfrag )\n"
+"{\n"
+"   float fspread = g_light_colours[0].w;\n"
+"   vec3  vdir = g_light_directions[0].xyz;\n"
+"   float flength = g_light_directions[0].w;\n"
+"\n"
+"   float famt = 0.0;\n"
+"   famt+=shadow_sample((vdir+vec3(-0.563, 0.550, 0.307)*fspread)*flength*0.1);\n"
+"   famt+=shadow_sample((vdir+vec3( 0.808, 0.686, 0.346)*fspread)*flength*0.2);\n"
+"   famt+=shadow_sample((vdir+vec3( 0.787, 0.074,-0.065)*fspread)*flength*0.3);\n"
+"   famt+=shadow_sample((vdir+vec3(-0.593, 0.071,-0.425)*fspread)*flength*0.4);\n"
+"   famt+=shadow_sample((vdir+vec3(-0.790,-0.933,-0.875)*fspread)*flength*0.5);\n"
+"   famt+=shadow_sample((vdir+vec3( 0.807,-0.690, 0.472)*fspread)*flength*0.6);\n"
+"   famt+=shadow_sample((vdir+vec3( 0.522,-0.379, 0.350)*fspread)*flength*0.7);\n"
+"   famt+=shadow_sample((vdir+vec3( 0.483, 0.201, 0.306)*fspread)*flength*0.8);\n"
+"   return mix( vfrag, g_ambient_colour.rgb, famt );\n"
+"}\n"
+"\n"
+"vec3 apply_fog( vec3 vfrag, float fdist )\n"
+"{\n"
+"   float dist = pow(fdist*0.0008,1.2);\n"
+"   return mix( vfrag, vec3(0.55,0.76,1.0), min( 1.0, dist ) );\n"
+"}\n"
+"\n"
+"#line     19        0 \n"
+"\n"
+"vec4 water_surf( vec3 halfview, vec3 vnorm, float depthvalue )\n"
+"{\n"
+"   vec3 surface_tint = mix(uShoreColour, uOceanColour, depthvalue);\n"
+"\n"
+"   float ffresnel = pow(1.0-dot( vnorm, halfview ),5.0);\n"
+"\n"
+"   vec3 lightdir = vec3(0.95,0.0,-0.3);\n"
+"   vec3 specdir = reflect( -lightdir, vnorm );\n"
+"   float spec = pow(max(dot(halfview,specdir),0.0),20.0)*0.3;\n"
+"   \n"
+"   return vec4( surface_tint + spec, max(min(depthvalue*4.0, 1.0),0.0) );\n"
+"}\n"
+"\n"
+"void main()\n"
+"{\n"
+"   // Surface colour composite\n"
+"   float depthvalue = clamp( -world_depth_sample( aCo )*(1.0/25.0), 0.0, 1.0 );\n"
+"\n"
+"   vec2 world_coord = aCo.xz * 0.008;\n"
+"   vec4 time_offsets = vec4( uTime ) * vec4( 0.008, 0.006, 0.003, 0.03 );\n"
+"   vec4 dudva = texture( uTexDudv, world_coord + time_offsets.xy )-0.5;\n"
+"   vec4 dudvb = texture( uTexDudv, world_coord *7.0 - time_offsets.zw )-0.5;\n"
+"\n"
+"   vec3 surfnorm = dudva.rgb + dudvb.rgb;\n"
+"   surfnorm = normalize(vec3(0.0,1.0,0.0) + dudva.xyz*0.4 + dudvb.xyz*0.1);\n"
+"   \n"
+"   // Foam\n"
+"   float fband = fract( aCo.z*0.02+uTime*0.1+depthvalue*10.0 );\n"
+"   fband = step( fband+dudva.a*0.8, 0.3 ) * max((1.0-depthvalue*4.0),0.0);\n"
+"\n"
+"   // Lighting\n"
+"   vec3 halfview = -normalize( aCo-uCamera );\n"
+"\n"
+"   // Fog\n"
+"   float fdist = pow(length( aCo.xz-uCamera.xz ) * 0.00047, 2.6);\n"
+"\n"
+"   // Composite\n"
+"   vec4 vsurface = water_surf( halfview, surfnorm, depthvalue );\n"
+"   vsurface.a -= fdist;\n"
+"   FragColor = mix( vsurface, vec4(1.0,1.0,1.0,0.5), fband );\n"
+"}\n"
+""},
+};
+
+static GLuint _uniform_water_fast_uMdl;
+static GLuint _uniform_water_fast_uPv;
+static GLuint _uniform_water_fast_uTexDudv;
+static GLuint _uniform_water_fast_uTime;
+static GLuint _uniform_water_fast_uCamera;
+static GLuint _uniform_water_fast_uSurfaceY;
+static GLuint _uniform_water_fast_uShoreColour;
+static GLuint _uniform_water_fast_uOceanColour;
+static GLuint _uniform_water_fast_g_world_depth;
+static void shader_water_fast_uMdl(m4x3f m){
+   glUniformMatrix4x3fv( _uniform_water_fast_uMdl, 1, GL_FALSE, (float *)m );
+}
+static void shader_water_fast_uPv(m4x4f m){
+   glUniformMatrix4fv( _uniform_water_fast_uPv, 1, GL_FALSE, (float *)m );
+}
+static void shader_water_fast_uTexDudv(int i){
+   glUniform1i( _uniform_water_fast_uTexDudv, i );
+}
+static void shader_water_fast_uTime(float f){
+   glUniform1f( _uniform_water_fast_uTime, f );
+}
+static void shader_water_fast_uCamera(v3f v){
+   glUniform3fv( _uniform_water_fast_uCamera, 1, v );
+}
+static void shader_water_fast_uSurfaceY(float f){
+   glUniform1f( _uniform_water_fast_uSurfaceY, f );
+}
+static void shader_water_fast_uShoreColour(v3f v){
+   glUniform3fv( _uniform_water_fast_uShoreColour, 1, v );
+}
+static void shader_water_fast_uOceanColour(v3f v){
+   glUniform3fv( _uniform_water_fast_uOceanColour, 1, v );
+}
+static void shader_water_fast_g_world_depth(int i){
+   glUniform1i( _uniform_water_fast_g_world_depth, i );
+}
+static void shader_water_fast_register(void){
+   vg_shader_register( &_shader_water_fast );
+}
+static void shader_water_fast_use(void){ glUseProgram(_shader_water_fast.id); }
+static void shader_water_fast_link(void){
+   _uniform_water_fast_uMdl = glGetUniformLocation( _shader_water_fast.id, "uMdl" );
+   _uniform_water_fast_uPv = glGetUniformLocation( _shader_water_fast.id, "uPv" );
+   _uniform_water_fast_uTexDudv = glGetUniformLocation( _shader_water_fast.id, "uTexDudv" );
+   _uniform_water_fast_uTime = glGetUniformLocation( _shader_water_fast.id, "uTime" );
+   _uniform_water_fast_uCamera = glGetUniformLocation( _shader_water_fast.id, "uCamera" );
+   _uniform_water_fast_uSurfaceY = glGetUniformLocation( _shader_water_fast.id, "uSurfaceY" );
+   _uniform_water_fast_uShoreColour = glGetUniformLocation( _shader_water_fast.id, "uShoreColour" );
+   _uniform_water_fast_uOceanColour = glGetUniformLocation( _shader_water_fast.id, "uOceanColour" );
+   _uniform_water_fast_g_world_depth = glGetUniformLocation( _shader_water_fast.id, "g_world_depth" );
+}
+#endif /* SHADER_water_fast_H */
diff --git a/world_water.h b/world_water.h
index e31994a..4281981 100644
--- a/world_water.h
+++ b/world_water.h
@@ -8,6 +8,7 @@
 #include "world.h"
 #include "render.h"
 #include "shaders/water.h"
+#include "shaders/water_fast.h"
 #include "scene.h"
 
 vg_tex2d tex_water_surf = { .path = "textures/water_surf.qoi" };
@@ -16,6 +17,7 @@ VG_STATIC void world_water_init(void)
 {
    vg_info( "world_water_init\n" );
    shader_water_register();
+   shader_water_fast_register();
 
    vg_acquire_thread_sync();
    {
@@ -51,7 +53,7 @@ VG_STATIC void water_set_surface( float height )
 
 VG_STATIC void render_water_texture( m4x3f camera )
 {
-   if( !world.water.enabled )
+   if( !world.water.enabled || (vg.quality_profile == k_quality_profile_low) )
       return;
 
    /* Draw reflection buffa */
@@ -125,54 +127,92 @@ VG_STATIC void render_water_surface( m4x4f pv, m4x3f camera )
    if( !world.water.enabled )
       return;
 
-   /* Draw surface */
-   shader_water_use();
-   
-   fb_bindtex( &world.water.fbreflect, 0 );
-   shader_water_uTexMain( 0 );
+   if( vg.quality_profile == k_quality_profile_high )
+   {
+      /* Draw surface */
+      shader_water_use();
+      
+      fb_bindtex( &world.water.fbreflect, 0 );
+      shader_water_uTexMain( 0 );
+
+      vg_tex2d_bind( &tex_water_surf, 1 );
+      shader_water_uTexDudv( 1 );
+      shader_water_uInvRes( (v2f){
+            1.0f / (float)vg.window_x,
+            1.0f / (float)vg.window_y });
 
-   vg_tex2d_bind( &tex_water_surf, 1 );
-   shader_water_uTexDudv( 1 );
-   shader_water_uInvRes( (v2f){
-         1.0f / (float)vg.window_x,
-         1.0f / (float)vg.window_y });
+      shader_link_standard_ub( _shader_water.id, 2 );
 
-   shader_link_standard_ub( _shader_water.id, 2 );
+      fb_bindtex( &world.water.fbdepth, 3 );
+      shader_water_uTexBack( 3 );
+      shader_water_uTime( world.time );
+      shader_water_uCamera( camera[3] );
+      shader_water_uSurfaceY( world.water.height );
 
-   fb_bindtex( &world.water.fbdepth, 3 );
-   shader_water_uTexBack( 3 );
-   shader_water_uTime( world.time );
-   shader_water_uCamera( camera[3] );
-   shader_water_uSurfaceY( world.water.height );
+      shader_water_uPv( pv );
 
-   shader_water_uPv( pv );
+      m4x3f full;
+      m4x3_identity( full );
+      shader_water_uMdl( full );
 
-   m4x3f full;
-   m4x3_identity( full );
-   full[3][1] = world.water.height;
+      glEnable(GL_BLEND);
+      glBlendFunc(GL_SRC_ALPHA,GL_ONE_MINUS_SRC_ALPHA);
+      glBlendEquation(GL_FUNC_ADD);
 
-   shader_water_uMdl( full );
+      mesh_bind( &world.mesh_no_collide );
 
-   glEnable(GL_BLEND);
-   glBlendFunc(GL_SRC_ALPHA,GL_ONE_MINUS_SRC_ALPHA);
-   glBlendEquation(GL_FUNC_ADD);
+      for( int i=0; i<world.material_count; i++ )
+      {
+         struct world_material *mat = &world.materials[i];
+
+         if( mat->info.shader == k_shader_water )
+         {
+            shader_water_uShoreColour( mat->info.colour );
+            shader_water_uOceanColour( mat->info.colour1 );
 
-   mesh_bind( &world.mesh_no_collide );
+            mdl_draw_submesh( &mat->sm_no_collide );
+         }
+      }
 
-   for( int i=0; i<world.material_count; i++ )
+      glDisable(GL_BLEND);
+   }
+   else if( vg.quality_profile == k_quality_profile_low )
    {
-      struct world_material *mat = &world.materials[i];
+      shader_water_fast_use();
 
-      if( mat->info.shader == k_shader_water )
+      vg_tex2d_bind( &tex_water_surf, 1 );
+      shader_water_fast_uTexDudv( 1 );
+      shader_water_fast_uTime( world.time );
+      shader_water_fast_uCamera( camera[3] );
+      shader_water_fast_uSurfaceY( world.water.height );
+      shader_link_standard_ub( _shader_water_fast.id, 2 );
+
+      m4x3f full;
+      m4x3_identity( full );
+      shader_water_fast_uMdl( full );
+      shader_water_fast_uPv( pv );
+
+      glEnable(GL_BLEND);
+      glBlendFunc(GL_SRC_ALPHA,GL_ONE_MINUS_SRC_ALPHA);
+      glBlendEquation(GL_FUNC_ADD);
+
+      mesh_bind( &world.mesh_no_collide );
+
+      for( int i=0; i<world.material_count; i++ )
       {
-         shader_water_uShoreColour( mat->info.colour );
-         shader_water_uOceanColour( mat->info.colour1 );
+         struct world_material *mat = &world.materials[i];
 
-         mdl_draw_submesh( &mat->sm_no_collide );
+         if( mat->info.shader == k_shader_water )
+         {
+            shader_water_fast_uShoreColour( mat->info.colour );
+            shader_water_fast_uOceanColour( mat->info.colour1 );
+
+            mdl_draw_submesh( &mat->sm_no_collide );
+         }
       }
-   }
 
-   glDisable(GL_BLEND);
+      glDisable(GL_BLEND);
+   }
 }
 
 #endif /* WATER_H */
-- 
2.25.1