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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
|
//
//
#include "waypoint.h"
#include "object.h"
namespace scripting {
namespace api {
//**********HANDLE: Waypoint
ADE_OBJ_DERIV(l_Waypoint, object_h, "waypoint", "waypoint handle", l_Object);
ADE_FUNC(getList, l_Waypoint, NULL, "Returns the waypoint list", "waypointlist", "waypointlist handle or invalid handle if waypoint was invalid")
{
object_h *oh = NULL;
waypointlist_h wpl;
waypoint_list *wp_list = NULL;
if(!ade_get_args(L, "o", l_Waypoint.GetPtr(&oh)))
return ade_set_error(L, "o", l_WaypointList.Set(waypointlist_h()));
if(oh->isValid() && oh->objp()->type == OBJ_WAYPOINT) {
wp_list = find_waypoint_list_with_instance(oh->objp()->instance);
if(wp_list != NULL)
wpl = waypointlist_h(wp_list);
}
if (wpl.isValid()) {
return ade_set_args(L, "o", l_WaypointList.Set(wpl));
}
return ade_set_error(L, "o", l_WaypointList.Set(waypointlist_h()));
}
waypointlist_h::waypointlist_h() {wlp=NULL;name[0]='\0';}
waypointlist_h::waypointlist_h(waypoint_list* n_wlp) {
wlp = n_wlp;
if(n_wlp != NULL) {
strcpy_s(name, wlp->get_name());
} else {
memset(name, 0, sizeof(name));
}
}
waypointlist_h::waypointlist_h(const char* wlname)
{
wlp = NULL;
if ( wlname != NULL ) {
strcpy_s(name, wlname);
wlp = find_matching_waypoint_list(wlname);
}
}
bool waypointlist_h::isValid() const {
return (wlp != NULL && !strcmp(wlp->get_name(), name));
}
//**********HANDLE: WaypointList
ADE_OBJ(l_WaypointList, waypointlist_h, "waypointlist", "waypointlist handle");
ADE_INDEXER(l_WaypointList, "number Index", "Array of waypoints that are part of the waypoint list", "waypoint", "Waypoint, or invalid handle if the index or waypointlist handle is invalid")
{
int idx = -1;
waypointlist_h* wlh = NULL;
char wpname[128];
if( !ade_get_args(L, "oi", l_WaypointList.GetPtr( &wlh ), &idx))
return ade_set_error( L, "o", l_Waypoint.Set( object_h() ) );
if(!wlh->isValid())
return ade_set_error( L, "o", l_Waypoint.Set( object_h() ) );
//Lua-->FS2
idx--;
//Get waypoint name
sprintf(wpname, "%s:%d", wlh->wlp->get_name(), calc_waypoint_index(idx) + 1);
waypoint *wpt = find_matching_waypoint( wpname );
if( (idx >= 0) && ((uint) idx < wlh->wlp->get_waypoints().size()) && (wpt != NULL) && (wpt->get_objnum() >= 0) ) {
return ade_set_args(L, "o", l_Waypoint.Set(object_h(&Objects[wpt->get_objnum()])));
}
return ade_set_error(L, "o", l_Waypoint.Set( object_h() ) );
}
ADE_FUNC(__len, l_WaypointList,
NULL,
"Number of waypoints in the list. "
"Note that the value returned cannot be relied on for more than one frame.",
"number",
"Number of waypoints in the list, or 0 if handle is invalid")
{
waypointlist_h* wlh = NULL;
if ( !ade_get_args(L, "o", l_WaypointList.GetPtr(&wlh)) ) {
return ade_set_error( L, "o", l_Waypoint.Set( object_h() ) );
}
return ade_set_args(L, "i", wlh->wlp->get_waypoints().size());
}
ADE_VIRTVAR(Name, l_WaypointList, "string", "Name of WaypointList", "string", "Waypointlist name, or empty string if handle is invalid")
{
waypointlist_h* wlh = NULL;
const char* s = nullptr;
if ( !ade_get_args(L, "o|s", l_WaypointList.GetPtr(&wlh), &s) ) {
return ade_set_error(L, "s", "");
}
if(ADE_SETTING_VAR && s != NULL) {
wlh->wlp->set_name(s);
strcpy_s(wlh->name,s);
}
return ade_set_args( L, "s", wlh->name);
}
ADE_FUNC(isValid, l_WaypointList, NULL, "Return if this waypointlist handle is valid", "boolean", "true if valid false otherwise")
{
waypointlist_h* wlh = NULL;
if ( !ade_get_args(L, "o", l_WaypointList.GetPtr(&wlh)) ) {
return ADE_RETURN_FALSE;
}
return ade_set_args(L, "b", wlh != NULL && wlh->isValid());
}
}
}
|
