-
Notifications
You must be signed in to change notification settings - Fork 0
/
scr_xplane
25 lines (23 loc) · 955 Bytes
/
scr_xplane
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
///scr_xplane(sprite_index, image_index, xo, yo, zo, lr)
var ldirx = lengthdir_x(argument4, zmd);
var ldiry = lengthdir_y(argument4, zmd);
var sgw = sprite_get_width(argument0);
var sgh = sprite_get_height(argument0);
var ldirxsprheight = lengthdir_x(sgh, zmd);
var ldirysprheight = lengthdir_y(sgh, zmd);
var xa = x + argument2;
var ya = y + argument3;
var x1 = xa + ldirx;
var y1 = ya + ldiry;
var x2 = xa + ldirx;
var y2 = ya + ldiry + sgw;
var x3 = xa + ldirx - ldirxsprheight;
var y3 = ya + ldiry - ldirysprheight + sgw;
var x4 = xa + ldirx - ldirxsprheight;
var y4 = ya + ldiry - ldirysprheight;
if argument5 == "r" and (va >= 0 and va < 180)
then draw_sprite_pos(argument0, argument1, x1, y1, x2, y2, x3, y3, x4, y4, 1);
else if argument5 == "l" and (va = 180)
then draw_sprite_pos(argument0, argument1, x2, y2, x1, y1, x4, y4, x3, y3, 1);
else if argument5 == "b"
then draw_sprite_pos(argument0, argument1, x1, y1, x2, y2, x3, y3, x4, y4, 1);