#!/usr/bin/awk -f

BEGIN {

    radius_x = 4.5; radius_y = 2.0; radius_z = -2.5;
    cx = 4.0; cy = -1.0; cz = -3.0;
    t = 0.0;

    while (1) {
        t += 0.02;

        px = cx + radius_x * sin(t);
        py = cy + radius_y * cos(t * 0.5);
        pz = cz + radius_z * sin(t * 2.0);
        dx = radius_x * cos(t);
        dy = -radius_y * 0.5 * sin(t * 0.5);
        yaw = int((atan2(dy, dx) * 180.0 / 3.1415926535) + 180.0);
        pitch = int(25.0 * cos(t * 1.5));
        zoom = int(105.0 + 15.0 * sin(t * 0.3));

        zoom = 80;
        printf "P %.4f %.4f %.4f %d %d %d\n", px, py, pz, yaw, pitch, zoom;
        fflush();
    }
}