VECTOR pos;
vec_set(&pos, vector(screen_size.x / 2, screen_size.y, 4)); // 4
vec_for_screen(&pos, camera);

{
	my = ent_create("v_supershotgun+12.tga", nullvector, NULL);
	set(my, PASSABLE | NOFILTER | ZNEAR);
	vec_fill(&my->scale_x, 0.0625); // 0.0625
	my->ambient = 100;
	
	while(my){
		
		camera->arc = 90;		
		camera->pan = cycle(camera->pan - mickey.x / 6.5 * 1, 0, 360);
		camera->tilt = clamp(camera->tilt - mickey.y / 6.5 * 1, -90, 90);		
		camera->roll = 0;		
		
		VECTOR pos;
		vec_set(&pos, vector(screen_size.x / 2, screen_size.y, 4));
		vec_for_screen(&pos, camera);
		
		draw_point3d(&pos, COLOR_RED, 100, 0.1);
		
		VECTOR off;
		vec_set(&off, vector(4, 0, 4.5));
		vec_rotate(&off, &camera->pan);
		vec_add(&off, &pos);
		
		vec_set(&my->x, &off);
		vec_set(&my->pan, &camera->pan);
		
		wait(1);
	}
	
}

VECTOR pos;
vec_set(&pos, vector(16, 0, 8));
vec_rotate(&pos, &camera->pan);
vec_add(&pos, &camera->x);

vec_set(&weapon->x, &pos);

_ent->skill20 = fcos(0.5 * camera->arc, _distance);
_ent->skill21 = 0;
_ent->skill22 = _sizeY - fsin(0.5 * camera->arc, _distance) * screen_size.y / screen_size.x;
...
vec_set(&_ent->x, &_ent->skill20);
vec_rotate(&_ent->x, &camera->pan);
vec_add(&_ent->x, &camera->x);
_ent->pan = ang(camera->pan - 180);
_ent->tilt = -camera->tilt;
_ent->roll = -camera->roll;

my = ent_create("v_supershotgun+12.tga", nullvector, NULL);
set(my, PASSABLE | NOFILTER | ZNEAR);
vec_fill(&my->scale_x, 0.0625); // cause original size was 256x256, I scale it down to 16x16
my->ambient = 100;

var weapon_bob_move = 0, weapon_bob = 0, weapon_bob_y = 0, weapon_bob_z = 0;

while(my){
	
	camera->arc = 90;		
	camera->pan = cycle(camera->pan - mickey.x / 6.5 * 1, 0, 360);
	camera->tilt = clamp(camera->tilt - mickey.y / 6.5 * 1, -90, 90);		
	camera->roll = 0;
	
	if(key_w){ weapon_bob_move = (weapon_bob_move + 30 * time_step) % 360; }
	weapon_bob = clamp(weapon_bob + 4 * time_step * 0.1 - weapon_bob / 3 * time_step, 0, 2);
	weapon_bob_y = sin(weapon_bob_move) * weapon_bob * 0.5;						
	weapon_bob_z = cos(weapon_bob_move * 2) * weapon_bob * 0.25;
	
	var x_distance = 16, z_distance = 17;		
	my->skill20 = fcos(0.5 * camera->arc, x_distance);
	my->skill21 = -weapon_bob_y;
	my->skill22 = 8 - fsin(0.5 * camera->arc, z_distance) * screen_size.y / screen_size.x + weapon_bob_z;
	
	vec_set(&my->x, &my->skill20);
	vec_rotate(&my->x, &camera->pan);
	vec_add(&my->x, &camera->x);
	
	ANGLE temp_angle;
	vec_set(&temp_angle, vector(180, 0, 0));
	ang_add(&temp_angle, &camera->pan);
	vec_set(&my->pan, &temp_angle);
	
	wait(1);
}

void main(){
	
	fps_max = 60;
	level_load("");
	wait(3);
	
	camera->arc = 90;
	
	my = ent_create("test.png", nullvector, NULL);
	set(my, PASSABLE | NOFILTER | ZNEAR);
	vec_fill(&my->scale_x, 1);
	my->ambient = 100;

	var distance = 16, size_z = 8;

	while(my){
		
		my->skill20 = fcos(0.5 * camera->arc, distance);
		my->skill21 = 0;
		my->skill22 = size_z - fsin(0.5 * camera->arc, distance) * screen_size.y / screen_size.x;
		
		vec_set(&my->x, &my->skill20);
		vec_rotate(&my->x, &camera->pan);
		vec_add(&my->x, &camera->x);
		
		my->pan = ang(camera->pan - 180);
		my->tilt = -camera->tilt;
		my->roll = -camera->roll;
		
		wait(1);
	}
	
}

#include <acknex.h>

var distance = 16;
var cameraProp = 1;
var screenProp = 1;

void safe_video_switch (var _mode) {
	video_mode = video_switch(_mode, 32, video_screen);
	if(!video_mode)
		video_mode = video_switch(7, 32, video_screen);
	if (video_screen == 1)
		cameraProp = distance * screenProp / camera->aspect;
	else
		cameraProp = distance * screen_size.y / (screen_size.x * camera->aspect);
}

void onQ () {
	safe_video_switch(video_mode + 1);
}

void onW () {
	video_screen = 1 + video_screen % 2;
	safe_video_switch(video_mode);
}

void weaponLocate (ENTITY *_ent) {
	var size_z = 8 * _ent->scale_z;
	_ent->x = distance;
	_ent->y = 0;
	_ent->z = size_z - tanv(0.5 * camera->arc) * cameraProp;
	vec_rotate(&_ent->x, &camera->pan);
	vec_add(&_ent->x, &camera->x);
	_ent->pan = ang(camera->pan - 180);
	_ent->tilt = -camera->tilt;
	_ent->roll = -camera->roll;
}

void main () {
	screenProp = sys_metrics(1) / sys_metrics(0);
	fps_max = 60;
	video_mode = 7;
	video_screen = 1;
	wait(1);
	
	on_q = onQ;
	on_w = onW;
	
	level_load("");
	camera->arc = 90;
	camera->aspect = 1;
	
	safe_video_switch(7);
	
	ENTITY *_ent = ent_create("sprite2.tga", nullvector, NULL);
	set(_ent, PASSABLE | NOFILTER | ZNEAR | DECAL);
	vec_fill(&_ent->scale_x, 1);
	_ent->ambient = 100;

	while (!key_esc) {
		camera->pan = ang(camera->pan - mickey.x * 0.2);
		camera->tilt = clamp(camera->tilt - mickey.y * 0.2, -90, 90);
		weaponLocate(_ent);
		wait(1);
	}
	
	sys_exit(NULL);
}