fisheye.vex.c

#pragma opname          fisheyelens
#pragma oplabel         "Fisheye Lens"

#pragma hint    x       hidden
#pragma hint    y       hidden
#pragma hint    Time    hidden
#pragma hint    dofx    hidden
#pragma hint    dofy    hidden
#pragma hint    aspect  hidden
#pragma hint    P       hidden
#pragma hint    I       hidden

#pragma range   fov             0 360

#include "math.h"

cvex
fisheyelens(
        // Inputs
        float x = 0;
        float y = 0;
        float Time = 0;
        float dofx = 0;
        float dofy = 0;
        float aspect = 1;

        // Outputs
        export vector P = 0;
        export vector I = 0;

        // Shader arguments
        float fov = 180;
        )
{
    float r = sqrt(x*x + y*y);
    float phi = atan2(y, x);
    float rfov = radians(fov);
    float theta = r * (rfov / 2.0);
    
    P = {0,0,0};
    I = set( sin(theta)*cos(phi),
            sin(theta)*sin(phi),
            cos(theta) );
}