141 void Varlist_Init(Varlist *varlist, int size)  in Varlist_Init()  argument
144     varlist->magic = varlist_magic;  in Varlist_Init()
145     varlist->list = calloc(1, sizeof(*varlist->list));  in Varlist_Init()
146     List_Init(varlist->list);  in Varlist_Init()
147     varlist->vars = calloc(size + 1, sizeof(*varlist->vars));  in Varlist_Init()
150         ScriptVariant_Init(varlist->vars + i);  in Varlist_Init()
151         ScriptVariant_ChangeType(varlist->vars, VT_INTEGER);  in Varlist_Init()
152         varlist->vars->lVal = (LONG)size;  in Varlist_Init()
156 void Varlist_Clear(Varlist *varlist)  in Varlist_Clear()  argument
159     clear_named_var_list(varlist->list, 1);  in Varlist_Clear()
160     free(varlist->list);  in Varlist_Clear()
161     varlist->list = NULL;  in Varlist_Clear()
163     for(i = 1; i <= varlist->vars->lVal; i++)  in Varlist_Clear()
165         ScriptVariant_Clear(varlist->vars + i);  in Varlist_Clear()
167     free(varlist->vars);  in Varlist_Clear()
168     varlist->vars = NULL;  in Varlist_Clear()
169     varlist->magic = 0;  in Varlist_Clear()
172 void Varlist_Cleanup(Varlist *varlist)  in Varlist_Cleanup()  argument
175     clear_named_var_list(varlist->list, 0);  in Varlist_Cleanup()
176     for(i = 1; i <= varlist->vars->lVal; i++)  in Varlist_Cleanup()
178         ScriptVariant_Clear(varlist->vars + i);  in Varlist_Cleanup()
182 ScriptVariant *Varlist_GetByName(Varlist *varlist, char *theName)  in Varlist_GetByName()  argument
189     if(List_FindByName(varlist->list, theName))  in Varlist_GetByName()
191         return (ScriptVariant *)List_Retrieve(varlist->list);  in Varlist_GetByName()
197 int Varlist_SetByName(Varlist *varlist, char *theName, ScriptVariant *var)  in Varlist_SetByName()  argument
204     if(List_FindByName(varlist->list, theName))  in Varlist_SetByName()
206         ScriptVariant_Copy((ScriptVariant *)List_Retrieve(varlist->list), var);  in Varlist_SetByName()
212         List_InsertAfter(varlist->list, v, theName);  in Varlist_SetByName()
217 ScriptVariant *Varlist_GetByIndex(Varlist *varlist, int index)  in Varlist_GetByIndex()  argument
219     if(index < 0 || index >= varlist->vars->lVal)  in Varlist_GetByIndex()
223     return varlist->vars + index + 1;  in Varlist_GetByIndex()
226 int Varlist_SetByIndex(Varlist *varlist, int index, ScriptVariant *var)  in Varlist_SetByIndex()  argument
232     else if(index >= varlist->vars->lVal)  in Varlist_SetByIndex()
234         __reallocto(varlist->vars, varlist->vars->lVal + 1, index + 2);  in Varlist_SetByIndex()
235         varlist->vars->lVal = index + 1;  in Varlist_SetByIndex()
237     ScriptVariant_Copy(varlist->vars + index + 1, var);  in Varlist_SetByIndex()
427     pscript->varlist = calloc(1, sizeof(*pscript->varlist));  in alloc_script()
428     Varlist_Init(pscript->varlist, max_script_vars);  in alloc_script()
438         pscript->varlist = calloc(1, sizeof(*pscript->varlist));  in Script_Init()
439         Varlist_Init(pscript->varlist, max_script_vars);  in Script_Init()
533     if(localclear && pscript->varlist)  in Script_Clear()
537             Varlist_Clear(pscript->varlist);  in Script_Clear()
538             free(pscript->varlist);  in Script_Clear()
539             pscript->varlist = NULL;  in Script_Clear()
543             Varlist_Cleanup(pscript->varlist);  in Script_Clear()
563     pvars = pscript->varlist; // in game clear(localclear!=2) just keep this value  in Script_Clear()
565     pscript->varlist = pvars; // copy it back  in Script_Clear()
1862 HRESULT system_isempty(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in system_isempty()  argument
1871     (*pretvar)->lVal = (LONG)((varlist[0])->vt == VT_EMPTY );  in system_isempty()
1876 HRESULT system_NULL(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in system_NULL()  argument
1882 HRESULT system_exit(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in system_exit()  argument
1888 HRESULT system_rand(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in system_rand()  argument
1894 HRESULT system_srand(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in system_srand()  argument
1903     if(FAILED(ScriptVariant_IntegerValue(varlist[0], &ltemp)))  in system_srand()
1912 HRESULT system_getglobalvar(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in system_getglobalvar()  argument
1922     if(varlist[0]->vt == VT_STR)  in system_getglobalvar()
1924         ptmpvar = Varlist_GetByName(&global_var_list, StrCache_Get(varlist[0]->strVal));  in system_getglobalvar()
1926     else if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[0], &ltemp)))  in system_getglobalvar()
1950 HRESULT system_setglobalvar(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in system_setglobalvar()  argument
1960     if(varlist[0]->vt == VT_STR)  in system_setglobalvar()
1962 …r)->lVal = (LONG)Varlist_SetByName(&global_var_list, StrCache_Get(varlist[0]->strVal), varlist[1]);  in system_setglobalvar()
1964     else if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[0], &ltemp)))  in system_setglobalvar()
1966         (*pretvar)->lVal = (LONG)Varlist_SetByIndex(&global_var_list, (int)ltemp, varlist[1]);  in system_setglobalvar()
1979 HRESULT system_getlocalvar(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in system_getlocalvar()  argument
1989     if(varlist[0]->vt == VT_STR)  in system_getlocalvar()
1991         ptmpvar = Varlist_GetByName(pcurrentscript->varlist, StrCache_Get(varlist[0]->strVal));  in system_getlocalvar()
1993     else if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[0], &ltemp)))  in system_getlocalvar()
1995         ptmpvar = Varlist_GetByIndex(pcurrentscript->varlist, (int)ltemp);  in system_getlocalvar()
2017 HRESULT system_setlocalvar(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in system_setlocalvar()  argument
2027     if(varlist[0]->vt == VT_STR)  in system_setlocalvar()
2029 …r)->lVal = (LONG)Varlist_SetByName(pcurrentscript->varlist, StrCache_Get(varlist[0]->strVal), varl…  in system_setlocalvar()
2031     else if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[0], &ltemp)))  in system_setlocalvar()
2033 …      (*pretvar)->lVal = (LONG)Varlist_SetByIndex(pcurrentscript->varlist, (int)ltemp, varlist[1]);  in system_setlocalvar()
2046 HRESULT system_clearlocalvar(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in system_clearlocalvar()  argument
2049     Varlist_Cleanup(pcurrentscript->varlist);  in system_clearlocalvar()
2053 HRESULT system_clearglobalvar(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in system_clearglobalvar()  argument
2061 HRESULT system_free(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in system_free()  argument
2068     if(List_Includes(&scriptheap, varlist[0]->ptrVal))  in system_free()
2073         List_Includes(&scriptheap, varlist[0]->ptrVal);  in system_free()
2081 HRESULT system_typeof(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in system_typeof()  argument
2089     (*pretvar)->lVal = (LONG)varlist[0]->vt;  in system_typeof()
2093 HRESULT math_sin(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in math_sin()  argument
2096     if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[0], &ltemp)))  in math_sin()
2106 HRESULT math_cos(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in math_cos()  argument
2109     if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[0], &ltemp)))  in math_cos()
2119 HRESULT math_ssin(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in math_ssin()  argument
2123     if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[0], &dbltemp)))  in math_ssin()
2135 HRESULT math_scos(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in math_scos()  argument
2139     if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[0], &dbltemp)))  in math_scos()
2151 HRESULT math_sqrt(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in math_sqrt()  argument
2156     if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[0], &dbltemp)))  in math_sqrt()
2169 HRESULT math_pow(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in math_pow()  argument
2173 …if( SUCCEEDED(ScriptVariant_DecimalValue(varlist[0], &dbltempA)) && SUCCEEDED(ScriptVariant_Decima…  in math_pow()
2183 HRESULT math_asin(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in math_asin()  argument
2187     if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[0], &dbltemp)))  in math_asin()
2199 HRESULT math_acos(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in math_acos()  argument
2203     if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[0], &dbltemp)))  in math_acos()
2215 HRESULT math_atan(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in math_atan()  argument
2219     if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[0], &dbltemp)))  in math_atan()
2231 HRESULT math_trunc(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in math_trunc()  argument
2235     if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[0], &dbltemp)))  in math_trunc()
2245 HRESULT math_round(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in math_round()  argument
2249     if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[0], &dbltemp)))  in math_round()
2388 int mapstrings_systemvariant(ScriptVariant **varlist, int paramCount)  in mapstrings_systemvariant()  argument
2394     MAPSTRINGS(varlist[0], svlist, _sv_the_end,  in mapstrings_systemvariant()
2402 HRESULT openbor_systemvariant(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_systemvariant()  argument
2413     mapstrings_systemvariant(varlist, paramCount);  in openbor_systemvariant()
2416     if(varlist[0]->vt == VT_INTEGER)  in openbor_systemvariant()
2418         variantindex = varlist[0]->lVal;  in openbor_systemvariant()
2441 HRESULT openbor_changesystemvariant(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCou…  in openbor_changesystemvariant()  argument
2454     mapstrings_systemvariant(varlist, paramCount);  in openbor_changesystemvariant()
2456     arg = varlist[0];  in openbor_changesystemvariant()
2468     if(changesyspropertybyindex(variantindex, varlist[1]))  in openbor_changesystemvariant()
2481 HRESULT openbor_drawstring(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_drawstring()  argument
2495         if(FAILED(ScriptVariant_IntegerValue(varlist[i], value + i)))  in openbor_drawstring()
2502         if(FAILED(ScriptVariant_IntegerValue(varlist[4], value + 3)))  in openbor_drawstring()
2511     ScriptVariant_ToString(varlist[3], buf);  in openbor_drawstring()
2522 HRESULT openbor_drawstringtoscreen(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCoun…  in openbor_drawstringtoscreen()  argument
2535     if(varlist[0]->vt != VT_PTR)  in openbor_drawstringtoscreen()
2539     scr = (s_screen *)varlist[0]->ptrVal;  in openbor_drawstringtoscreen()
2547         if(FAILED(ScriptVariant_IntegerValue(varlist[i + 1], value + i)))  in openbor_drawstringtoscreen()
2553     ScriptVariant_ToString(varlist[4], buf);  in openbor_drawstringtoscreen()
2564 HRESULT openbor_log(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_log()  argument
2574     ScriptVariant_ToString(varlist[0], buf);  in openbor_log()
2584 HRESULT openbor_drawbox(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_drawbox()  argument
2598         if(FAILED(ScriptVariant_IntegerValue(varlist[i], value + i)))  in openbor_drawbox()
2606         if(FAILED(ScriptVariant_IntegerValue(varlist[6], &l)))  in openbor_drawbox()
2639 HRESULT openbor_drawboxtoscreen(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_drawboxtoscreen()  argument
2652     s = (s_screen *)varlist[0]->ptrVal;  in openbor_drawboxtoscreen()
2661         if(FAILED(ScriptVariant_IntegerValue(varlist[i], value + i - 1)))  in openbor_drawboxtoscreen()
2669         if(FAILED(ScriptVariant_IntegerValue(varlist[6], &l)))  in openbor_drawboxtoscreen()
2703 HRESULT openbor_drawline(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_drawline()  argument
2717         if(FAILED(ScriptVariant_IntegerValue(varlist[i], value + i)))  in openbor_drawline()
2725         if(FAILED(ScriptVariant_IntegerValue(varlist[6], &l)))  in openbor_drawline()
2758 HRESULT openbor_drawlinetoscreen(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_drawlinetoscreen()  argument
2771     s = (s_screen *)varlist[0]->ptrVal;  in openbor_drawlinetoscreen()
2780         if(FAILED(ScriptVariant_IntegerValue(varlist[i], value + i - 1)))  in openbor_drawlinetoscreen()
2788         if(FAILED(ScriptVariant_IntegerValue(varlist[6], &l)))  in openbor_drawlinetoscreen()
2820 HRESULT openbor_drawsprite(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_drawsprite()  argument
2831     if(varlist[0]->vt != VT_PTR)  in openbor_drawsprite()
2836     spr = varlist[0]->ptrVal;  in openbor_drawsprite()
2845         if(FAILED(ScriptVariant_IntegerValue(varlist[i], value + i - 1)))  in openbor_drawsprite()
2861 HRESULT openbor_drawspritetoscreen(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCoun…  in openbor_drawspritetoscreen()  argument
2873     if(varlist[0]->vt != VT_PTR)  in openbor_drawspritetoscreen()
2877     spr = varlist[0]->ptrVal;  in openbor_drawspritetoscreen()
2883     if(varlist[1]->vt != VT_PTR)  in openbor_drawspritetoscreen()
2887     scr = varlist[1]->ptrVal;  in openbor_drawspritetoscreen()
2895         if(FAILED(ScriptVariant_IntegerValue(varlist[i], value + i - 2)))  in openbor_drawspritetoscreen()
2911 HRESULT openbor_drawdot(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_drawdot()  argument
2925         if(FAILED(ScriptVariant_IntegerValue(varlist[i], value + i)))  in openbor_drawdot()
2933         if(FAILED(ScriptVariant_IntegerValue(varlist[4], &l)))  in openbor_drawdot()
2966 HRESULT openbor_drawdottoscreen(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_drawdottoscreen()  argument
2979     s = (s_screen *)varlist[0]->ptrVal;  in openbor_drawdottoscreen()
2988         if(FAILED(ScriptVariant_IntegerValue(varlist[i], value + i - 1)))  in openbor_drawdottoscreen()
2996         if(FAILED(ScriptVariant_IntegerValue(varlist[4], &l)))  in openbor_drawdottoscreen()
3031 HRESULT openbor_drawscreen(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_drawscreen()  argument
3044     s = (s_screen *)varlist[0]->ptrVal;  in openbor_drawscreen()
3053         if(FAILED(ScriptVariant_IntegerValue(varlist[i], value + i - 1)))  in openbor_drawscreen()
3061         if(FAILED(ScriptVariant_IntegerValue(varlist[4], &l)))  in openbor_drawscreen()
3096 HRESULT openbor_getindexedvar(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_getindexedvar()  argument
3098     return system_getglobalvar(varlist, pretvar, paramCount);  in openbor_getindexedvar()
3102 HRESULT openbor_setindexedvar(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_setindexedvar()  argument
3104     return system_setglobalvar(varlist, pretvar, paramCount);  in openbor_setindexedvar()
3108 HRESULT openbor_getscriptvar(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_getscriptvar()  argument
3110     return system_getlocalvar(varlist, pretvar, paramCount);  in openbor_getscriptvar()
3114 HRESULT openbor_setscriptvar(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_setscriptvar()  argument
3116     return system_setlocalvar(varlist, pretvar, paramCount);  in openbor_setscriptvar()
3120 HRESULT openbor_getentityvar(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_getentityvar()  argument
3126     if(paramCount < 2 || varlist[0]->vt != VT_PTR || !varlist[0]->ptrVal)  in openbor_getentityvar()
3131     ent = (entity *)varlist[0]->ptrVal;  in openbor_getentityvar()
3133     if(varlist[1]->vt == VT_STR)  in openbor_getentityvar()
3135         ptmpvar = Varlist_GetByName(ent->varlist, StrCache_Get(varlist[1]->strVal));  in openbor_getentityvar()
3137     else if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[1], &ltemp)))  in openbor_getentityvar()
3139         ptmpvar = Varlist_GetByIndex(ent->varlist, (int)ltemp);  in openbor_getentityvar()
3162 HRESULT openbor_setentityvar(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_setentityvar()  argument
3167     if(paramCount < 3 || varlist[0]->vt != VT_PTR || !varlist[0]->ptrVal)  in openbor_setentityvar()
3172     ent = (entity *)varlist[0]->ptrVal;  in openbor_setentityvar()
3176     if(varlist[1]->vt == VT_STR)  in openbor_setentityvar()
3178 …(*pretvar)->lVal = (LONG)Varlist_SetByName(ent->varlist, StrCache_Get(varlist[1]->strVal), varlist…  in openbor_setentityvar()
3180     else if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[1], &ltemp)))  in openbor_setentityvar()
3182         (*pretvar)->lVal = (LONG)Varlist_SetByIndex(ent->varlist, (int)ltemp, varlist[2]);  in openbor_setentityvar()
3196 HRESULT openbor_strinfirst(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_strinfirst()  argument
3205     if(varlist[0]->vt != VT_STR || varlist[1]->vt != VT_STR)  in openbor_strinfirst()
3211 …tempstr = strstr((char *)StrCache_Get(varlist[0]->strVal), (char *)StrCache_Get(varlist[1]->strVal…  in openbor_strinfirst()
3231 HRESULT openbor_strinlast(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_strinlast()  argument
3240     if(varlist[0]->vt != VT_STR || varlist[1]->vt != VT_STR)  in openbor_strinlast()
3246     tempstr = strrchr((char *)StrCache_Get(varlist[0]->strVal), varlist[1]->strVal);  in openbor_strinlast()
3265 HRESULT openbor_strleft(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_strleft()  argument
3272     if(varlist[0]->vt != VT_STR || varlist[1]->vt != VT_INTEGER)  in openbor_strleft()
3278     StrCache_NCopy((*pretvar)->strVal, (char *)StrCache_Get(varlist[0]->strVal), varlist[1]->lVal);  in openbor_strleft()
3287 HRESULT openbor_strlength(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_strlength()  argument
3289     if(paramCount < 1 || varlist[0]->vt != VT_STR)  in openbor_strlength()
3295     (*pretvar)->lVal = strlen((char *)StrCache_Get(varlist[0]->strVal));  in openbor_strlength()
3305 HRESULT openbor_strwidth(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_strwidth()  argument
3308     if(paramCount < 2 || varlist[0]->vt != VT_STR ||  in openbor_strwidth()
3309             FAILED(ScriptVariant_IntegerValue(varlist[1], &ltemp)))  in openbor_strwidth()
3315     (*pretvar)->lVal = font_string_width((int)ltemp, (char *)StrCache_Get(varlist[0]->strVal));  in openbor_strwidth()
3325 HRESULT openbor_strright(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_strright()  argument
3334     if(varlist[0]->vt != VT_STR || varlist[1]->vt != VT_INTEGER)  in openbor_strright()
3340     tempstr = (char *)StrCache_Get(varlist[0]->strVal);  in openbor_strright()
3345         StrCache_Copy((*pretvar)->strVal, &tempstr[varlist[1]->lVal]);  in openbor_strright()
3359 HRESULT openbor_getmodelproperty(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_getmodelproperty()  argument
3369     if((varlist[0]->vt != VT_INTEGER && varlist[0]->vt != VT_STR) || varlist[1]->vt != VT_INTEGER)  in openbor_getmodelproperty()
3374 …iArg = varlist[0]->vt == VT_INTEGER ? varlist[0]->lVal : get_cached_model_index(StrCache_Get(varli…  in openbor_getmodelproperty()
3381     switch (varlist[1]->lVal)  in openbor_getmodelproperty()
3417 HRESULT openbor_changemodelproperty(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCou…  in openbor_changemodelproperty()  argument
3428     if((varlist[0]->vt != VT_INTEGER && varlist[0]->vt != VT_STR) || varlist[1]->vt != VT_INTEGER)  in openbor_changemodelproperty()
3433 …iArg = varlist[0]->vt == VT_INTEGER ? varlist[0]->lVal : get_cached_model_index(StrCache_Get(varli…  in openbor_changemodelproperty()
3440     switch (varlist[1]->lVal)  in openbor_changemodelproperty()
3492         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changemodelproperty()
4353 int mapstrings_animationproperty(ScriptVariant **varlist, int paramCount)  in mapstrings_animationproperty()  argument
4377 int mapstrings_entityproperty(ScriptVariant **varlist, int paramCount)  in mapstrings_entityproperty()  argument
4562     MAPSTRINGS(varlist[1], eplist, _ep_the_end,  in mapstrings_entityproperty()
4565     if(paramCount < 3 || varlist[1]->vt != VT_INTEGER)  in mapstrings_entityproperty()
4570     ep = varlist[1]->lVal;  in mapstrings_entityproperty()
4584         MAPSTRINGS(varlist[2], eplist_aiflag, _ep_aiflag_the_end,  in mapstrings_entityproperty()
4594             MAPSTRINGS(varlist[3], proplist_defense, _ep_defense_the_end,  in mapstrings_entityproperty()
4602         MAPSTRINGS(varlist[2], proplist_dot, _ep_dot_the_end,  in mapstrings_entityproperty()
4609         MAPSTRINGS(varlist[2], proplist_edelay, _ep_edelay_the_end,  in mapstrings_entityproperty()
4616         MAPSTRINGS(varlist[2], proplist_energycost, _ep_energycost_the_end,  in mapstrings_entityproperty()
4623         MAPSTRINGS(varlist[2], proplist_flash, _ep_flash_the_end,  in mapstrings_entityproperty()
4630         MAPSTRINGS(varlist[2], proplist_icon, _ep_icon_the_end,  in mapstrings_entityproperty()
4638         MAPSTRINGS(varlist[2], proplist_knockdowncount, _ep_knockdowncount_the_end,  in mapstrings_entityproperty()
4645         MAPSTRINGS(varlist[2], proplist_landframe, _ep_landframe_the_end,  in mapstrings_entityproperty()
4652         MAPSTRINGS(varlist[2], proplist_maps, _ep_maps_the_end,  in mapstrings_entityproperty()
4659         MAPSTRINGS(varlist[2], proplist_range, _ep_range_the_end,  in mapstrings_entityproperty()
4666         MAPSTRINGS(varlist[2], proplist_running, _ep_running_the_end,  in mapstrings_entityproperty()
4674         MAPSTRINGS(varlist[2], proplist_spritea, _ep_spritea_the_end,  in mapstrings_entityproperty()
4681         MAPSTRINGS(varlist[2], proplist_staydown, _ep_running_the_end,  in mapstrings_entityproperty()
4692             t = varlist[i]->vt;  in mapstrings_entityproperty()
4693             MAPSTRINGS(varlist[i], proplist_hostile_candamage, _ep_hcd_the_end,  in mapstrings_entityproperty()
4696             if(varlist[i]->vt == VT_INTEGER && t == VT_STR)  in mapstrings_entityproperty()
4698                 varlist[i]->lVal |= 0x80000000;    //flag it  in mapstrings_entityproperty()
4706         MAPSTRINGS(varlist[2], proplist_takeaction, _ep_ta_the_end,  in mapstrings_entityproperty()
4713         MAPSTRINGS(varlist[2], proplist_think, _ep_th_the_end,  in mapstrings_entityproperty()
4729 HRESULT openbor_set_animation_property(ScriptVariant **varlist, ScriptVariant **pretvar, int paramC…  in openbor_set_animation_property()  argument
4750        || varlist[ARG_HANDLE]->vt != VT_PTR  in openbor_set_animation_property()
4751        || varlist[ARG_PROPERTY]->vt != VT_INTEGER)  in openbor_set_animation_property()
4758         handle      = (s_anim *)varlist[ARG_HANDLE]->ptrVal;  in openbor_set_animation_property()
4759         property    = (LONG)varlist[ARG_PROPERTY]->lVal;  in openbor_set_animation_property()
4767             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_animation_property()
4776             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_animation_property()
4785             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_animation_property()
4824 HRESULT openbor_get_animation_property(ScriptVariant **varlist, ScriptVariant **pretvar, int paramC…  in openbor_get_animation_property()  argument
4844        || varlist[ARG_HANDLE]->vt != VT_PTR  in openbor_get_animation_property()
4845        || varlist[ARG_PROPERTY]->vt != VT_INTEGER)  in openbor_get_animation_property()
4852         handle      = (s_anim *)varlist[ARG_HANDLE]->ptrVal;  in openbor_get_animation_property()
4853         property    = (LONG)varlist[ARG_PROPERTY]->lVal;  in openbor_get_animation_property()
4973 HRESULT openbor_get_attack_collection(ScriptVariant **varlist, ScriptVariant **pretvar, int paramCo…  in openbor_get_attack_collection()  argument
4993        || varlist[ARG_HANDLE]->vt != VT_PTR  in openbor_get_attack_collection()
4994        || varlist[ARG_FRAME]->vt != VT_INTEGER)  in openbor_get_attack_collection()
5001         handle  = (s_collision_attack **)varlist[ARG_HANDLE]->ptrVal;  in openbor_get_attack_collection()
5002         frame   = (LONG)varlist[ARG_FRAME]->lVal;  in openbor_get_attack_collection()
5034 HRESULT openbor_get_attack_instance(ScriptVariant **varlist, ScriptVariant **pretvar, int paramCoun…  in openbor_get_attack_instance()  argument
5053        || varlist[ARG_HANDLE]->vt != VT_PTR  in openbor_get_attack_instance()
5054        || varlist[ARG_INDEX]->vt != VT_INTEGER)  in openbor_get_attack_instance()
5061         handle  = (s_collision_attack *)varlist[ARG_HANDLE]->ptrVal;  in openbor_get_attack_instance()
5091 HRESULT openbor_get_attack_property(ScriptVariant **varlist, ScriptVariant **pretvar, int paramCoun…  in openbor_get_attack_property()  argument
5110        || varlist[ARG_HANDLE]->vt != VT_PTR  in openbor_get_attack_property()
5111        || varlist[ARG_PROPERTY]->vt != VT_INTEGER)  in openbor_get_attack_property()
5118         handle      = (s_collision_attack *)varlist[ARG_HANDLE]->ptrVal;  in openbor_get_attack_property()
5119         property    = (LONG)varlist[ARG_PROPERTY]->lVal;  in openbor_get_attack_property()
5419 HRESULT openbor_set_attack_property(ScriptVariant **varlist, ScriptVariant **pretvar, int paramCoun…  in openbor_set_attack_property()  argument
5440        || varlist[ARG_HANDLE]->vt != VT_PTR  in openbor_set_attack_property()
5441        || varlist[ARG_PROPERTY]->vt != VT_INTEGER)  in openbor_set_attack_property()
5448         handle      = (s_collision_attack *)varlist[ARG_HANDLE]->ptrVal;  in openbor_set_attack_property()
5449         property    = (LONG)varlist[ARG_PROPERTY]->lVal;  in openbor_set_attack_property()
5457             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5465             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5473             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5481             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5489             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5497             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5505             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5513             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5521             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5569             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5577             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5585             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5593             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5601             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5609             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5617             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5625             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5633             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5641             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5649             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5658             if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[ARG_VALUE], &temp_dbl)))  in openbor_set_attack_property()
5666             if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[ARG_VALUE], &temp_dbl)))  in openbor_set_attack_property()
5674             if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[ARG_VALUE], &temp_dbl)))  in openbor_set_attack_property()
5682             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5690             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5698             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5706             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5714             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5722             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5730             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5738             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5746             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5754             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5762             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5770             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5778             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5786             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5794             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5802             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5810             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_attack_property()
5849 HRESULT openbor_get_body_collision_collection(ScriptVariant **varlist, ScriptVariant **pretvar, int…  in openbor_get_body_collision_collection()  argument
5869        || varlist[ARG_HANDLE]->vt != VT_PTR  in openbor_get_body_collision_collection()
5870        || varlist[ARG_FRAME]->vt != VT_INTEGER)  in openbor_get_body_collision_collection()
5877         handle  = (s_collision_body **)varlist[ARG_HANDLE]->ptrVal;  in openbor_get_body_collision_collection()
5878         frame   = (LONG)varlist[ARG_FRAME]->lVal;  in openbor_get_body_collision_collection()
5905 HRESULT openbor_get_body_collision_instance(ScriptVariant **varlist, ScriptVariant **pretvar, int p…  in openbor_get_body_collision_instance()  argument
5924        || varlist[ARG_HANDLE]->vt != VT_PTR  in openbor_get_body_collision_instance()
5925        || varlist[ARG_INDEX]->vt != VT_INTEGER)  in openbor_get_body_collision_instance()
5932         handle  = (s_collision_body *)varlist[ARG_HANDLE]->ptrVal;  in openbor_get_body_collision_instance()
5962 HRESULT openbor_get_body_collision_property(ScriptVariant **varlist, ScriptVariant **pretvar, int p…  in openbor_get_body_collision_property()  argument
5981        || varlist[ARG_HANDLE]->vt != VT_PTR  in openbor_get_body_collision_property()
5982        || varlist[ARG_PROPERTY]->vt != VT_INTEGER)  in openbor_get_body_collision_property()
5989         handle      = (s_collision_body *)varlist[ARG_HANDLE]->ptrVal;  in openbor_get_body_collision_property()
5990         property    = (LONG)varlist[ARG_PROPERTY]->lVal;  in openbor_get_body_collision_property()
6075 HRESULT openbor_set_body_collision_property(ScriptVariant **varlist, ScriptVariant **pretvar, int p…  in openbor_set_body_collision_property()  argument
6097        || varlist[ARG_HANDLE]->vt != VT_PTR  in openbor_set_body_collision_property()
6098        || varlist[ARG_PROPERTY]->vt != VT_INTEGER)  in openbor_set_body_collision_property()
6105         handle      = (s_collision_body *)varlist[ARG_HANDLE]->ptrVal;  in openbor_set_body_collision_property()
6106         property    = (LONG)varlist[ARG_PROPERTY]->lVal;  in openbor_set_body_collision_property()
6120             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_body_collision_property()
6128             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_body_collision_property()
6136             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_body_collision_property()
6144             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_body_collision_property()
6152             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_body_collision_property()
6160             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_body_collision_property()
6168             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[ARG_VALUE], &temp_int)))  in openbor_set_body_collision_property()
6201 HRESULT openbor_getentityproperty(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_getentityproperty()  argument
6220     mapstrings_entityproperty(varlist, paramCount);  in openbor_getentityproperty()
6222     arg = varlist[0];  in openbor_getentityproperty()
6235     arg = varlist[1];  in openbor_getentityproperty()
6270         arg = varlist[2];  in openbor_getentityproperty()
6390             arg = varlist[ARG_ANIMATION_ID];  in openbor_getentityproperty()
6447             arg = varlist[2];  in openbor_getentityproperty()
6501                 || varlist[2]->vt != VT_INTEGER  in openbor_getentityproperty()
6502                 || varlist[3]->vt != VT_INTEGER)  in openbor_getentityproperty()
6510             i		= varlist[2]->lVal;												//Animation parameter.  in openbor_getentityproperty()
6511             tempint	= varlist[3]->lVal;												//Frame parameter.  in openbor_getentityproperty()
6552             if(FAILED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_getentityproperty()
6594             if(FAILED(ScriptVariant_IntegerValue(varlist[3], &ltemp2)))  in openbor_getentityproperty()
6641         (*pretvar)->ptrVal = (VOID *)model_get_colourmap(&(ent->modeldata), varlist[2]->lVal + 1);  in openbor_getentityproperty()
6668             if(FAILED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_getentityproperty()
6679             if(FAILED(ScriptVariant_IntegerValue(varlist[3], &ltemp2)))  in openbor_getentityproperty()
6761         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_getentityproperty()
6766         arg = varlist[3];  in openbor_getentityproperty()
6826             arg = varlist[2];  in openbor_getentityproperty()
6844         arg = varlist[2];  in openbor_getentityproperty()
6905         if(varlist[2]->vt != VT_INTEGER)  in openbor_getentityproperty()
6914         ltemp	= varlist[2]->lVal;												//Subproperty.  in openbor_getentityproperty()
6915         i		= varlist[3]->lVal;												//Animation.  in openbor_getentityproperty()
6984         arg = varlist[2];  in openbor_getentityproperty()
7128         arg = varlist[2];  in openbor_getentityproperty()
7276             arg = varlist[2];  in openbor_getentityproperty()
7330         if(varlist[2]->vt != VT_INTEGER  in openbor_getentityproperty()
7331                 || varlist[3]->vt != VT_INTEGER)  in openbor_getentityproperty()
7337         ltemp	= varlist[2]->lVal;												//Subproperty.  in openbor_getentityproperty()
7338         i		= varlist[3]->lVal;												//Animation.  in openbor_getentityproperty()
7416         arg = varlist[2];  in openbor_getentityproperty()
7454                 if(FAILED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_getentityproperty()
7671             arg = varlist[2];  in openbor_getentityproperty()
7764         if(varlist[2]->vt != VT_INTEGER  in openbor_getentityproperty()
7765                 || varlist[3]->vt != VT_INTEGER)  in openbor_getentityproperty()
7771         ltemp	= varlist[2]->lVal;												//Subproperty.  in openbor_getentityproperty()
7772         i		= varlist[3]->lVal;												//Animation.  in openbor_getentityproperty()
7825         arg = varlist[2];  in openbor_getentityproperty()
7952         ltemp   = varlist[2]->lVal;  in openbor_getentityproperty()
7953         arg     = varlist[3];  in openbor_getentityproperty()
7954         arg1    = varlist[4];  in openbor_getentityproperty()
8036         arg = varlist[2];  in openbor_getentityproperty()
8037         arg1 = varlist[3];  in openbor_getentityproperty()
8067         arg = varlist[2];  in openbor_getentityproperty()
8267             if(FAILED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_getentityproperty()
8317 HRESULT openbor_changeentityproperty(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCo…  in openbor_changeentityproperty()  argument
8382     mapstrings_entityproperty(varlist, paramCount);  in openbor_changeentityproperty()
8384     if(varlist[0]->vt != VT_PTR && varlist[0]->vt != VT_EMPTY)  in openbor_changeentityproperty()
8389     ent = (entity *)varlist[0]->ptrVal; //retrieve the entity  in openbor_changeentityproperty()
8395     if(varlist[1]->vt != VT_INTEGER)  in openbor_changeentityproperty()
8397         if(varlist[1]->vt != VT_STR)  in openbor_changeentityproperty()
8404     propind = varlist[1]->lVal;  in openbor_changeentityproperty()
8410         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
8418         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
8426         if(varlist[2]->vt != VT_INTEGER)  in openbor_changeentityproperty()
8428             if(varlist[2]->vt != VT_STR)  in openbor_changeentityproperty()
8439         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[3], &ltemp)))  in openbor_changeentityproperty()
8441             switch(varlist[2]->lVal)  in openbor_changeentityproperty()
8524         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
8532         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
8540         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
8543             if(paramCount < 4 || SUCCEEDED(ScriptVariant_IntegerValue(varlist[3], &ltemp2)))  in openbor_changeentityproperty()
8552         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
8560         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
8568         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
8576         if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[2], &dbltemp)))  in openbor_changeentityproperty()
8585         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
8593         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
8601         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
8609         if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[2], &dbltemp)))  in openbor_changeentityproperty()
8617         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
8625         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
8633         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
8641         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
8660 …if( FAILED(ScriptVariant_DecimalValue(varlist[2], &dbltemp)) || FAILED(ScriptVariant_DecimalValue(…  in openbor_changeentityproperty()
8676         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
8684         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
8696             if(varlist[i]->vt == VT_INTEGER) // known entity type  in openbor_changeentityproperty()
8698                 ltemp = varlist[i]->lVal;  in openbor_changeentityproperty()
8723                 SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)) &&  in openbor_changeentityproperty()
8724                 SUCCEEDED(ScriptVariant_IntegerValue(varlist[3], &ltemp2)))  in openbor_changeentityproperty()
8732         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
8740         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
8748         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
8756         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
8764         if(varlist[2]->vt != VT_STR)  in openbor_changeentityproperty()
8769         tempmodel = findmodel((char *)StrCache_Get(varlist[2]->strVal));  in openbor_changeentityproperty()
8782                      SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)) &&  in openbor_changeentityproperty()
8784                      SUCCEEDED(ScriptVariant_DecimalValue(varlist[3], &dbltemp)))  in openbor_changeentityproperty()
8790 …if(paramCount >= 5 && ltemp2 && (ltemp2 = SUCCEEDED(ScriptVariant_DecimalValue(varlist[4], &dbltem…  in openbor_changeentityproperty()
8794 …if(paramCount >= 6 && ltemp2 && (ltemp2 = SUCCEEDED(ScriptVariant_DecimalValue(varlist[5], &dbltem…  in openbor_changeentityproperty()
8798 …if(paramCount >= 7 && ltemp2 && (ltemp2 = SUCCEEDED(ScriptVariant_DecimalValue(varlist[6], &dbltem…  in openbor_changeentityproperty()
8802 …if(paramCount >= 8 && ltemp2 && (ltemp2 = SUCCEEDED(ScriptVariant_DecimalValue(varlist[7], &dbltem…  in openbor_changeentityproperty()
8806 …if(paramCount >= 9 && ltemp2 && (ltemp2 = SUCCEEDED(ScriptVariant_DecimalValue(varlist[8], &dbltem…  in openbor_changeentityproperty()
8810 …      if(paramCount >= 10 && ltemp2 && SUCCEEDED(ScriptVariant_DecimalValue(varlist[9], &dbltemp)))  in openbor_changeentityproperty()
8819         if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[2], &dbltemp)))  in openbor_changeentityproperty()
8827         if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[2], &dbltemp)))  in openbor_changeentityproperty()
8835         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
8843         if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[2], &dbltemp)))  in openbor_changeentityproperty()
8851         if((SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp))))  in openbor_changeentityproperty()
8854             if(paramCount >= 4 && SUCCEEDED(ScriptVariant_DecimalValue(varlist[3], &dbltemp)))  in openbor_changeentityproperty()
8858             if(paramCount >= 5 && SUCCEEDED(ScriptVariant_DecimalValue(varlist[4], &dbltemp)))  in openbor_changeentityproperty()
8862             if(paramCount >= 6 && SUCCEEDED(ScriptVariant_DecimalValue(varlist[5], &dbltemp)))  in openbor_changeentityproperty()
8866             if(paramCount >= 7 && SUCCEEDED(ScriptVariant_DecimalValue(varlist[6], &dbltemp)))  in openbor_changeentityproperty()
8870             if(paramCount >= 8 && SUCCEEDED(ScriptVariant_DecimalValue(varlist[7], &dbltemp)))  in openbor_changeentityproperty()
8876                 ent->dot_owner[i] = (entity *)varlist[8]->ptrVal;  in openbor_changeentityproperty()
8883         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
8887         if(paramCount >= 3 && SUCCEEDED(ScriptVariant_DecimalValue(varlist[3], &dbltemp)))  in openbor_changeentityproperty()
8891         if(paramCount >= 4 && SUCCEEDED(ScriptVariant_IntegerValue(varlist[4], &ltemp)))  in openbor_changeentityproperty()
8895         if(paramCount >= 5 && SUCCEEDED(ScriptVariant_IntegerValue(varlist[5], &ltemp)))  in openbor_changeentityproperty()
8899         if(paramCount >= 6 && SUCCEEDED(ScriptVariant_IntegerValue(varlist[6], &ltemp)))  in openbor_changeentityproperty()
8903         if(paramCount >= 7 && SUCCEEDED(ScriptVariant_IntegerValue(varlist[7], &ltemp)))  in openbor_changeentityproperty()
8918         if(FAILED(ScriptVariant_IntegerValue(varlist[3], &ltemp)))  in openbor_changeentityproperty()
8932         if(varlist[2]->vt != VT_INTEGER)  in openbor_changeentityproperty()
8938         switch(varlist[2]->lVal)  in openbor_changeentityproperty()
8942             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[4], &ltemp)))  in openbor_changeentityproperty()
8954             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[4], &ltemp)))  in openbor_changeentityproperty()
8965             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[4], &ltemp)))  in openbor_changeentityproperty()
8982         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
8990         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
8998         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9006         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9014         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9022         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9030         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9038         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9046         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9054         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9062         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9070         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9078         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9086         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9102         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9110         ent->hithead = (entity *)varlist[2]->ptrVal;  in openbor_changeentityproperty()
9115         ent->landed_on_platform = (entity *)varlist[2]->ptrVal;  in openbor_changeentityproperty()
9120         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9128         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9136         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9147             if(varlist[i]->vt == VT_INTEGER) // known entity type  in openbor_changeentityproperty()
9149                 ltemp = varlist[i]->lVal;  in openbor_changeentityproperty()
9170         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9174         if(paramCount > 3 && SUCCEEDED(ScriptVariant_IntegerValue(varlist[3], &ltemp)))  in openbor_changeentityproperty()
9182         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9190         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9198         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9206         if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[2], &dbltemp)))  in openbor_changeentityproperty()
9214         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9222         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9230         if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[2], &dbltemp)))  in openbor_changeentityproperty()
9238         if(varlist[2]->vt != VT_INTEGER)  in openbor_changeentityproperty()
9240             if(varlist[2]->vt != VT_STR)  in openbor_changeentityproperty()
9249         switch(varlist[2]->lVal)  in openbor_changeentityproperty()
9253             if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[3], &dbltemp)))  in openbor_changeentityproperty()
9261             if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[3], &dbltemp)))  in openbor_changeentityproperty()
9267                 if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9281         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9285         if(paramCount >= 4 && SUCCEEDED(ScriptVariant_IntegerValue(varlist[3], &ltemp)))  in openbor_changeentityproperty()
9293         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9297         if(paramCount > 3 && SUCCEEDED(ScriptVariant_IntegerValue(varlist[3], &ltemp)))  in openbor_changeentityproperty()
9305         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9313         if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[2], &dbltemp)))  in openbor_changeentityproperty()
9321         if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[2], &dbltemp)))  in openbor_changeentityproperty()
9329         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9337         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9345         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9353         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9365         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9373         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9385         if(varlist[2]->vt != VT_STR)  in openbor_changeentityproperty()
9390         tempstr = (char *)StrCache_Get(varlist[2]->strVal);  in openbor_changeentityproperty()
9391         if(paramCount > 3 && SUCCEEDED(ScriptVariant_IntegerValue(varlist[3], &ltemp)))  in openbor_changeentityproperty()
9403         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9419         if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[2], &dbltemp)))  in openbor_changeentityproperty()
9423         if(paramCount >= 4 && SUCCEEDED(ScriptVariant_DecimalValue(varlist[3], &dbltemp)))  in openbor_changeentityproperty()
9427         if(paramCount >= 5 && SUCCEEDED(ScriptVariant_DecimalValue(varlist[4], &dbltemp)))  in openbor_changeentityproperty()
9431         if(paramCount >= 6 && SUCCEEDED(ScriptVariant_DecimalValue(varlist[5], &dbltemp)))  in openbor_changeentityproperty()
9435         if(paramCount >= 7 && SUCCEEDED(ScriptVariant_DecimalValue(varlist[6], &dbltemp)))  in openbor_changeentityproperty()
9439         if(paramCount >= 8 && SUCCEEDED(ScriptVariant_DecimalValue(varlist[7], &dbltemp)))  in openbor_changeentityproperty()
9447         if(varlist[2]->vt != VT_STR)  in openbor_changeentityproperty()
9452         strcpy(ent->name, (char *)StrCache_Get(varlist[2]->strVal));  in openbor_changeentityproperty()
9457         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9461         if(paramCount > 3 && SUCCEEDED(ScriptVariant_IntegerValue(varlist[3], &ltemp)))  in openbor_changeentityproperty()
9469         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9477         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9485         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9493         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9501         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9509         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9517         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9525         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9533         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9541         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9549         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9558                 SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)) &&  in openbor_changeentityproperty()
9560                 SUCCEEDED(ScriptVariant_DecimalValue(varlist[3], &dbltemp)))  in openbor_changeentityproperty()
9568         if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[2], &dbltemp)))  in openbor_changeentityproperty()
9576         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9584         ent->opponent = (entity *)varlist[2]->ptrVal;  in openbor_changeentityproperty()
9589         ent->custom_target = (entity *)varlist[2]->ptrVal;  in openbor_changeentityproperty()
9594         ent->owner = (entity *)varlist[2]->ptrVal;  in openbor_changeentityproperty()
9599         ent->parent = (entity *)varlist[2]->ptrVal;  in openbor_changeentityproperty()
9604         if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[2], &dbltemp)))  in openbor_changeentityproperty()
9612         if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[2], &dbltemp)))  in openbor_changeentityproperty()
9616         if(paramCount >= 4 && SUCCEEDED(ScriptVariant_DecimalValue(varlist[3], &dbltemp)))  in openbor_changeentityproperty()
9620         if(paramCount >= 5 && SUCCEEDED(ScriptVariant_DecimalValue(varlist[4], &dbltemp)))  in openbor_changeentityproperty()
9628         if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[2], &dbltemp)))  in openbor_changeentityproperty()
9636         if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[2], &dbltemp)))  in openbor_changeentityproperty()
9645         if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[2], &dbltemp)))  in openbor_changeentityproperty()
9653         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9665             if(varlist[i]->vt == VT_INTEGER) // known entity type  in openbor_changeentityproperty()
9667                 ltemp = varlist[i]->lVal;  in openbor_changeentityproperty()
9688         if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[2], &dbltemp)))  in openbor_changeentityproperty()
9692         if(paramCount >= 4 && SUCCEEDED(ScriptVariant_DecimalValue(varlist[3], &dbltemp)))  in openbor_changeentityproperty()
9696         if(paramCount >= 5 && SUCCEEDED(ScriptVariant_DecimalValue(varlist[4], &dbltemp)))  in openbor_changeentityproperty()
9700         if(paramCount >= 6 && SUCCEEDED(ScriptVariant_DecimalValue(varlist[5], &dbltemp)))  in openbor_changeentityproperty()
9704         if(paramCount >= 7 && SUCCEEDED(ScriptVariant_DecimalValue(varlist[6], &dbltemp)))  in openbor_changeentityproperty()
9713         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9721         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9729         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9737         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9745         if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[2], &dbltemp)))  in openbor_changeentityproperty()
9753         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9761         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9769         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9777         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9785         if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[2], &dbltemp)))  in openbor_changeentityproperty()
9793         if(varlist[2]->vt != VT_INTEGER)  in openbor_changeentityproperty()
9795             if(varlist[2]->vt != VT_STR)  in openbor_changeentityproperty()
9806         ltemp   = varlist[2]->lVal;  in openbor_changeentityproperty()
9811 …if(!validanim(ent, varlist[3]->lVal) || !(ent->modeldata.animation[varlist[3]->lVal]->numframes >=…  in openbor_changeentityproperty()
9816 …    i = ent->modeldata.animation[varlist[3]->lVal]->sprite[varlist[4]->lVal];   //Get sprite index.  in openbor_changeentityproperty()
9822             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[5], &ltemp)))  in openbor_changeentityproperty()
9831             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[5], &ltemp)))  in openbor_changeentityproperty()
9839             if(varlist[5]->vt != VT_STR)  in openbor_changeentityproperty()
9844             strcpy(sprite_map[i].node->filename, (char *)StrCache_Get(varlist[5]->strVal));  in openbor_changeentityproperty()
9868             sprite_map[i].node->sprite = (VOID *)varlist[5]->ptrVal;  in openbor_changeentityproperty()
9880         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9888         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9901         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[3], &ltemp)))  in openbor_changeentityproperty()
9903             if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[4], &dbltemp)))  in openbor_changeentityproperty()
9905                 switch(varlist[2]->lVal)  in openbor_changeentityproperty()
9920         if(varlist[2]->vt != VT_INTEGER)  in openbor_changeentityproperty()
9922             if(varlist[2]->vt != VT_STR)  in openbor_changeentityproperty()
9935         switch(varlist[2]->lVal)  in openbor_changeentityproperty()
9939             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[3], &ltemp)))  in openbor_changeentityproperty()
9947             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[3], &ltemp)))  in openbor_changeentityproperty()
9955             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[3], &ltemp)))  in openbor_changeentityproperty()
9969         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9981         ent->subentity = (entity *)varlist[2]->ptrVal;  in openbor_changeentityproperty()
9990         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
9998         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
10006         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
10014         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
10022         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
10030         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
10038         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
10046         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
10054         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
10062         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
10071         if(varlist[2]->vt == VT_EMPTY)  in openbor_changeentityproperty()
10077         else if(varlist[2]->vt != VT_INTEGER)  in openbor_changeentityproperty()
10084         ltemp = varlist[2]->lVal;  in openbor_changeentityproperty()
10095         if(varlist[2]->vt == VT_EMPTY)  in openbor_changeentityproperty()
10100         else if(varlist[2]->vt != VT_INTEGER)  in openbor_changeentityproperty()
10107         ltemp = varlist[2]->lVal;  in openbor_changeentityproperty()
10117         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
10125         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
10133         if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[2], &dbltemp)))  in openbor_changeentityproperty()
10141         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
10149         if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[2], &dbltemp)))  in openbor_changeentityproperty()
10157         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
10165         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
10184         if(varlist[2]->vt != VT_INTEGER)  in openbor_changeentityproperty()
10190         ltemp = varlist[2]->lVal;  in openbor_changeentityproperty()
10197         if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[2], &dbltemp)))  in openbor_changeentityproperty()
10201         if(paramCount >= 4 && SUCCEEDED(ScriptVariant_DecimalValue(varlist[3], &dbltemp)))  in openbor_changeentityproperty()
10205         if(paramCount >= 5 && SUCCEEDED(ScriptVariant_DecimalValue(varlist[4], &dbltemp)))  in openbor_changeentityproperty()
10213         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
10221         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
10229         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
10237         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
10244             if(FAILED(ScriptVariant_IntegerValue(varlist[3], &ltemp2)))  in openbor_changeentityproperty()
10256         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changeentityproperty()
10259             if(paramCount < 4 ||  SUCCEEDED(ScriptVariant_IntegerValue(varlist[3], &ltemp2)))  in openbor_changeentityproperty()
10278 HRESULT openbor_tossentity(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_tossentity()  argument
10288     ent = (entity *)varlist[0]->ptrVal; //retrieve the entity  in openbor_tossentity()
10299         ScriptVariant_DecimalValue(varlist[1], &height);  in openbor_tossentity()
10303         ScriptVariant_DecimalValue(varlist[2], &speedx);  in openbor_tossentity()
10307         ScriptVariant_DecimalValue(varlist[3], &speedz);  in openbor_tossentity()
10352 int mapstrings_playerproperty(ScriptVariant **varlist, int paramCount)  in mapstrings_playerproperty()  argument
10392     MAPSTRINGS(varlist[1], proplist, _pp_the_end,  in mapstrings_playerproperty()
10399 HRESULT openbor_getplayerproperty(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_getplayerproperty()  argument
10413     mapstrings_playerproperty(varlist, paramCount);  in openbor_getplayerproperty()
10416     arg = varlist[0];  in openbor_getplayerproperty()
10429     arg = varlist[1];  in openbor_getplayerproperty()
10579         frm = varlist[2];  in openbor_getplayerproperty()
10599         frm = varlist[2];  in openbor_getplayerproperty()
10686 HRESULT openbor_changeplayerproperty(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCo…  in openbor_changeplayerproperty()  argument
10703     mapstrings_playerproperty(varlist, paramCount);  in openbor_changeplayerproperty()
10704     arg = varlist[0];  in openbor_changeplayerproperty()
10717     if(varlist[1]->vt != VT_INTEGER)  in openbor_changeplayerproperty()
10719         if(varlist[1]->vt != VT_STR)  in openbor_changeplayerproperty()
10725     prop = varlist[1]->lVal;  in openbor_changeplayerproperty()
10727     arg = varlist[2];  in openbor_changeplayerproperty()
10753                     if(FAILED(ScriptVariant_IntegerValue(varlist[3], &ltemp2)))  in openbor_changeplayerproperty()
10969             value = varlist[3];  in openbor_changeplayerproperty()
11001             value = varlist[3];  in openbor_changeplayerproperty()
11029 HRESULT openbor_checkhole(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_checkhole()  argument
11043     arg = varlist[0];  in openbor_checkhole()
11049     arg = varlist[1];  in openbor_checkhole()
11057         arg = varlist[2];  in openbor_checkhole()
11071 HRESULT openbor_checkholeindex(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_checkholeindex()  argument
11085     arg = varlist[0];  in openbor_checkholeindex()
11091     arg = varlist[1];  in openbor_checkholeindex()
11101             arg = varlist[2];  in openbor_checkholeindex()
11116 HRESULT openbor_checkwall(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_checkwall()  argument
11132     arg = varlist[0];  in openbor_checkwall()
11138     arg = varlist[1];  in openbor_checkwall()
11146         arg = varlist[2];  in openbor_checkwall()
11162 HRESULT openbor_checkwallindex(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_checkwallindex()  argument
11178     arg = varlist[0];  in openbor_checkwallindex()
11184     arg = varlist[1];  in openbor_checkwallindex()
11192         arg = varlist[2];  in openbor_checkwallindex()
11208 HRESULT openbor_checkplatformbelow(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCoun…  in openbor_checkplatformbelow()  argument
11224     arg = varlist[0];  in openbor_checkplatformbelow()
11230     arg = varlist[1];  in openbor_checkplatformbelow()
11236     arg = varlist[2];  in openbor_checkplatformbelow()
11248 HRESULT openbor_checkplatformabove(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCoun…  in openbor_checkplatformabove()  argument
11264     arg = varlist[0];  in openbor_checkplatformabove()
11270     arg = varlist[1];  in openbor_checkplatformabove()
11276     arg = varlist[2];  in openbor_checkplatformabove()
11288 HRESULT openbor_checkplatformbetween(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCo…  in openbor_checkplatformbetween()  argument
11304     arg = varlist[0];  in openbor_checkplatformbetween()
11310     arg = varlist[1];  in openbor_checkplatformbetween()
11316     arg = varlist[2];  in openbor_checkplatformbetween()
11322     arg = varlist[3];  in openbor_checkplatformbetween()
11334 HRESULT openbor_checkbasemap(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_checkbasemap()  argument
11348     arg = varlist[0];  in openbor_checkbasemap()
11354     arg = varlist[1];  in openbor_checkbasemap()
11366 HRESULT openbor_checkbasemapindex(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_checkbasemapindex()  argument
11380     arg = varlist[0];  in openbor_checkbasemapindex()
11386     arg = varlist[1];  in openbor_checkbasemapindex()
11398 HRESULT openbor_generatebasemap(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_generatebasemap()  argument
11410     if ( FAILED(ScriptVariant_IntegerValue(varlist[0], &index)) )  in openbor_generatebasemap()
11417         if ( FAILED(ScriptVariant_IntegerValue(varlist[7], &x_cont)) )  in openbor_generatebasemap()
11423 …if ( FAILED(ScriptVariant_DecimalValue(varlist[1], &rx)) || FAILED(ScriptVariant_DecimalValue(varl…  in openbor_generatebasemap()
11424 …FAILED(ScriptVariant_DecimalValue(varlist[3], &x_size)) || FAILED(ScriptVariant_DecimalValue(varli…  in openbor_generatebasemap()
11425 …FAILED(ScriptVariant_DecimalValue(varlist[5], &min_y)) || FAILED(ScriptVariant_DecimalValue(varlis…  in openbor_generatebasemap()
11437 HRESULT openbor_openfilestream(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_openfilestream()  argument
11459     arg = varlist[0];  in openbor_openfilestream()
11471         arg = varlist[1];  in openbor_openfilestream()
11549 HRESULT openbor_getfilestreamline(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_getfilestreamline()  argument
11562     arg = varlist[0];  in openbor_getfilestreamline()
11582 HRESULT openbor_getfilestreamargument(ScriptVariant **varlist , ScriptVariant **pretvar, int paramC…  in openbor_getfilestreamargument()  argument
11594     arg = varlist[0];  in openbor_getfilestreamargument()
11600     arg = varlist[1];  in openbor_getfilestreamargument()
11607     if(varlist[2]->vt != VT_STR)  in openbor_getfilestreamargument()
11612     argtype = (char *)StrCache_Get(varlist[2]->strVal);  in openbor_getfilestreamargument()
11643 HRESULT openbor_filestreamnextline(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCoun…  in openbor_filestreamnextline()  argument
11656     arg = varlist[0];  in openbor_filestreamnextline()
11676 HRESULT openbor_getfilestreamposition(ScriptVariant **varlist , ScriptVariant **pretvar, int paramC…  in openbor_getfilestreamposition()  argument
11687     arg = varlist[0];  in openbor_getfilestreamposition()
11698 HRESULT openbor_setfilestreamposition(ScriptVariant **varlist , ScriptVariant **pretvar, int paramC…  in openbor_setfilestreamposition()  argument
11710     arg = varlist[0];  in openbor_setfilestreamposition()
11716     arg = varlist[1];  in openbor_setfilestreamposition()
11726 HRESULT openbor_filestreamappend(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_filestreamappend()  argument
11741     arg = varlist[0];  in openbor_filestreamappend()
11749         arg = varlist[2];  in openbor_filestreamappend()
11756     arg = varlist[1];  in openbor_filestreamappend()
11765         if ( varlist[3]->vt != VT_STR ) goto append_error;  in openbor_filestreamappend()
11767         argtype = (char *)StrCache_Get(varlist[3]->strVal);  in openbor_filestreamappend()
11779             byte = (unsigned char)varlist[1]->lVal;  in openbor_filestreamappend()
11827 HRESULT openbor_createfilestream(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_createfilestream()  argument
11857 HRESULT openbor_savefilestream(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_savefilestream()  argument
11874     arg = varlist[0];  in openbor_savefilestream()
11881     arg = varlist[1];  in openbor_savefilestream()
11890         patharg = (char *)StrCache_Get(varlist[2]->strVal);  in openbor_savefilestream()
11891         if( varlist[2]->vt != VT_STR )  in openbor_savefilestream()
11900         bytearg = (char *)StrCache_Get(varlist[3]->strVal);  in openbor_savefilestream()
11955 HRESULT openbor_closefilestream(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_closefilestream()  argument
11967     arg = varlist[0];  in openbor_closefilestream()
11982 HRESULT openbor_damageentity(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_damageentity()  argument
11999     ent = (entity *)(varlist[0])->ptrVal; //retrieve the entity  in openbor_damageentity()
12008     if(paramCount >= 2 && varlist[1]->ptrVal)  in openbor_damageentity()
12010         other = (entity *)(varlist[1])->ptrVal;  in openbor_damageentity()
12019         if(FAILED(ScriptVariant_IntegerValue((varlist[2]), &force)))  in openbor_damageentity()
12027             if(FAILED(ScriptVariant_IntegerValue((varlist[3]), &drop)))  in openbor_damageentity()
12035             if(FAILED(ScriptVariant_IntegerValue((varlist[4]), &type)))  in openbor_damageentity()
12082 HRESULT openbor_killentity(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_killentity()  argument
12094     ent = (entity *)(varlist[0])->ptrVal; //retrieve the entity  in openbor_killentity()
12117 HRESULT openbor_dograb(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_dograb()  argument
12142         ScriptVariant_IntegerValue(varlist[ARG_ADJUST], &adjust);  in openbor_dograb()
12146     attacker = (entity *)(varlist[ARG_ATTACKER])->ptrVal;  in openbor_dograb()
12147     target = (entity *)(varlist[ARG_TARGET])->ptrVal;  in openbor_dograb()
12179 HRESULT openbor_findtarget(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_findtarget()  argument
12188         ScriptVariant_IntegerValue(varlist[2], &i);  in openbor_findtarget()
12199     ent = (entity *)(varlist[0])->ptrVal; //retrieve the entity  in openbor_findtarget()
12205     if(paramCount > 1 && FAILED(ScriptVariant_IntegerValue(varlist[1], &anim)))  in openbor_findtarget()
12225 HRESULT openbor_checkrange(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_checkrange()  argument
12238     if(varlist[0]->vt != VT_PTR || varlist[1]->vt != VT_PTR)  in openbor_checkrange()
12243     ent = (entity *)(varlist[0])->ptrVal; //retrieve the entity  in openbor_checkrange()
12244     target = (entity *)(varlist[1])->ptrVal; //retrieve the target  in openbor_checkrange()
12251     if(paramCount > 2 && FAILED(ScriptVariant_IntegerValue(varlist[2], &ani)))  in openbor_checkrange()
12277 HRESULT openbor_clearspawnentry(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_clearspawnentry()  argument
12318 int mapstrings_setspawnentry(ScriptVariant **varlist, int paramCount)  in mapstrings_setspawnentry()  argument
12353     MAPSTRINGS(varlist[0], proplist, _sse_the_end,  in mapstrings_setspawnentry()
12360 HRESULT openbor_setspawnentry(ScriptVariant **varlist, ScriptVariant **pretvar, int paramCount)  in openbor_setspawnentry()  argument
12377     mapstrings_setspawnentry(varlist, paramCount);  in openbor_setspawnentry()
12378     if(varlist[0]->vt != VT_INTEGER)  in openbor_setspawnentry()
12380         if(varlist[0]->vt != VT_STR)  in openbor_setspawnentry()
12388     prop = varlist[0]->lVal;  in openbor_setspawnentry()
12390     arg = varlist[1];  in openbor_setspawnentry()
12520             if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[2], &dbltemp)))  in openbor_setspawnentry()
12531             if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[3], &dbltemp)))  in openbor_setspawnentry()
12604             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_setspawnentry()
12615             if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[3], &ltemp)))  in openbor_setspawnentry()
12715 HRESULT openbor_spawn(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_spawn()  argument
12740 HRESULT openbor_projectile(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_projectile()  argument
12754     if(paramCount >= 1 && varlist[0]->vt == VT_INTEGER && varlist[0]->lVal)  in openbor_projectile()
12758         varlist++;  in openbor_projectile()
12765     if(paramCount >= 1 && varlist[0]->vt == VT_STR)  in openbor_projectile()
12767         name = StrCache_Get(varlist[0]->strVal);  in openbor_projectile()
12770     if(paramCount >= 2 && SUCCEEDED(ScriptVariant_DecimalValue(varlist[1], &temp)))  in openbor_projectile()
12782     if(paramCount >= 3 && SUCCEEDED(ScriptVariant_DecimalValue(varlist[2], &temp)))  in openbor_projectile()
12794     if(paramCount >= 4 && SUCCEEDED(ScriptVariant_DecimalValue(varlist[3], &temp)))  in openbor_projectile()
12806     if(paramCount >= 5 && SUCCEEDED(ScriptVariant_IntegerValue(varlist[4], &ltemp)))  in openbor_projectile()
12818     if(paramCount >= 6 && SUCCEEDED(ScriptVariant_IntegerValue(varlist[5], &ltemp)))  in openbor_projectile()
12822     if(paramCount >= 7 && SUCCEEDED(ScriptVariant_IntegerValue(varlist[6], &ltemp)))  in openbor_projectile()
12826     if(paramCount >= 8 && SUCCEEDED(ScriptVariant_IntegerValue(varlist[7], &ltemp)))  in openbor_projectile()
12894 int mapstrings_transconst(ScriptVariant **varlist, int paramCount)  in mapstrings_transconst()  argument
12905     if(varlist[0]->vt == VT_STR)  in mapstrings_transconst()
12909         constname = (char *)StrCache_Get(varlist[0]->strVal);  in mapstrings_transconst()
13415             ScriptVariant_Copy(varlist[0], &v);  in mapstrings_transconst()
13430 HRESULT openbor_transconst(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_transconst()  argument
13440     mapstrings_transconst(varlist, paramCount);  in openbor_transconst()
13442     if(varlist[0]->vt == VT_INTEGER) // return value already determined by mapstrings  in openbor_transconst()
13444         ScriptVariant_Copy((*pretvar), varlist[0]);  in openbor_transconst()
13449     ScriptVariant_ToString(varlist[0], buf);  in openbor_transconst()
13456 HRESULT openbor_rgbcolor(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_rgbcolor()  argument
13464     if(FAILED(ScriptVariant_IntegerValue(varlist[0], &r)))  in openbor_rgbcolor()
13468     if(FAILED(ScriptVariant_IntegerValue(varlist[1], &g)))  in openbor_rgbcolor()
13472     if(FAILED(ScriptVariant_IntegerValue(varlist[2], &b)))  in openbor_rgbcolor()
13506 int mapstrings_playerkeys(ScriptVariant **varlist, int paramCount)  in mapstrings_playerkeys()  argument
13531         MAPSTRINGS(varlist[i], proplist, _pk_the_end,  in mapstrings_playerkeys()
13539 HRESULT openbor_playerkeys(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_playerkeys()  argument
13556     mapstrings_playerkeys(varlist, paramCount);  in openbor_playerkeys()
13558     if(FAILED(ScriptVariant_IntegerValue((varlist[0]), &ltemp)))  in openbor_playerkeys()
13567     if(SUCCEEDED(ScriptVariant_IntegerValue((varlist[1]), &ltemp)))  in openbor_playerkeys()
13591         arg = varlist[i];  in openbor_playerkeys()
13656 HRESULT openbor_playmusic(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_playmusic()  argument
13668     if(varlist[0]->vt != VT_STR)  in openbor_playmusic()
13673     thename = StrCache_Get(varlist[0]->strVal);  in openbor_playmusic()
13677         loop = (int)ScriptVariant_IsTrue(varlist[1]);  in openbor_playmusic()
13682         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &offset)))  in openbor_playmusic()
13694 HRESULT openbor_fademusic(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_fademusic()  argument
13703     if(FAILED(ScriptVariant_DecimalValue(varlist[0], &value)))  in openbor_fademusic()
13712         strncpy(musicname, StrCache_Get(varlist[1]->strVal), 128);  in openbor_fademusic()
13713         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &values[0])))  in openbor_fademusic()
13717         if(FAILED(ScriptVariant_IntegerValue(varlist[3], &values[1])))  in openbor_fademusic()
13732 HRESULT openbor_setmusicvolume(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_setmusicvolume()  argument
13741     if(FAILED(ScriptVariant_IntegerValue(varlist[0], channels)))  in openbor_setmusicvolume()
13748         if(FAILED(ScriptVariant_IntegerValue(varlist[1], channels + 1)))  in openbor_setmusicvolume()
13767 HRESULT openbor_setmusictempo(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_setmusictempo()  argument
13776     if(FAILED(ScriptVariant_IntegerValue(varlist[0], &new_tempo)))  in openbor_setmusictempo()
13786 HRESULT openbor_pausemusic(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_pausemusic()  argument
13794     pause = (int)ScriptVariant_IsTrue(varlist[0]);  in openbor_pausemusic()
13801 HRESULT openbor_pausesamples(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_pausesamples()  argument
13809     pause = (int)ScriptVariant_IsTrue(varlist[0]);  in openbor_pausesamples()
13816 HRESULT openbor_pausesample(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_pausesample()  argument
13824     pause = (int)ScriptVariant_IsTrue(varlist[0]);  in openbor_pausesample()
13825     if(FAILED(ScriptVariant_IntegerValue(varlist[1], &channel)))  in openbor_pausesample()
13834 HRESULT openbor_querychannel(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_querychannel()  argument
13837     if(FAILED(ScriptVariant_IntegerValue(varlist[0], &ltemp)))  in openbor_querychannel()
13849 HRESULT openbor_stopchannel(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_stopchannel()  argument
13853     if(FAILED(ScriptVariant_IntegerValue(varlist[0], &ltemp)))  in openbor_stopchannel()
13864 HRESULT openbor_isactivesample(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_isactivesample()  argument
13867     if(FAILED(ScriptVariant_IntegerValue(varlist[0], &ltemp)))  in openbor_isactivesample()
13880 HRESULT openbor_sampleid(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_sampleid()  argument
13883     if(FAILED(ScriptVariant_IntegerValue(varlist[0], &ltemp)))  in openbor_sampleid()
13896 HRESULT openbor_playsample(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_playsample()  argument
13903         if(FAILED(ScriptVariant_IntegerValue(varlist[i], value + i)))  in openbor_playsample()
13927 HRESULT openbor_loadsample(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_loadsample()  argument
13935     if(varlist[0]->vt != VT_STR)  in openbor_loadsample()
13942         if(varlist[1]->vt == VT_INTEGER)  in openbor_loadsample()
13944             arg = varlist[1]->lVal;  in openbor_loadsample()
13953     (*pretvar)->lVal = (LONG)sound_load_sample(StrCache_Get(varlist[0]->strVal), packfile, arg);  in openbor_loadsample()
13963 HRESULT openbor_unloadsample(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_unloadsample()  argument
13972     if(FAILED(ScriptVariant_IntegerValue((varlist[0]), &id)))  in openbor_unloadsample()
13986 HRESULT openbor_fadeout(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_fadeout()  argument
13996     if(FAILED(ScriptVariant_IntegerValue((varlist[0]), &type)))  in openbor_fadeout()
14000     if(FAILED(ScriptVariant_IntegerValue((varlist[1]), &speed)))  in openbor_fadeout()
14013 HRESULT openbor_changepalette(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_changepalette()  argument
14024     if(FAILED(ScriptVariant_IntegerValue((varlist[0]), &index)))  in openbor_changepalette()
14039 HRESULT openbor_changelight(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_changelight()  argument
14051     arg = varlist[0];  in openbor_changelight()
14061     arg = varlist[1];  in openbor_changelight()
14080 HRESULT openbor_changeshadowcolor(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_changeshadowcolor()  argument
14092     if(FAILED(ScriptVariant_IntegerValue(varlist[0], &c)))  in openbor_changeshadowcolor()
14101         if(FAILED(ScriptVariant_IntegerValue(varlist[1], &a)))  in openbor_changeshadowcolor()
14127 int mapstrings_textobjproperty(ScriptVariant **varlist, int paramCount)  in mapstrings_textobjproperty()  argument
14148     MAPSTRINGS(varlist[1], proplist, _top_the_end,  in mapstrings_textobjproperty()
14154 HRESULT openbor_gettextobjproperty(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCoun…  in openbor_gettextobjproperty()  argument
14165     if(FAILED(ScriptVariant_IntegerValue(varlist[0], &ind)))  in openbor_gettextobjproperty()
14172     mapstrings_textobjproperty(varlist, paramCount);  in openbor_gettextobjproperty()
14180     if(varlist[1]->vt != VT_INTEGER)  in openbor_gettextobjproperty()
14182         if(varlist[1]->vt != VT_STR)  in openbor_gettextobjproperty()
14189     propind = varlist[1]->lVal;  in openbor_gettextobjproperty()
14243 HRESULT openbor_changetextobjproperty(ScriptVariant **varlist , ScriptVariant **pretvar, int paramC…  in openbor_changetextobjproperty()  argument
14259     if(FAILED(ScriptVariant_IntegerValue(varlist[0], &ind)))  in openbor_changetextobjproperty()
14265     mapstrings_textobjproperty(varlist, paramCount);  in openbor_changetextobjproperty()
14278     if(varlist[1]->vt != VT_INTEGER)  in openbor_changetextobjproperty()
14284     propind = varlist[1]->lVal;  in openbor_changetextobjproperty()
14290         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changetextobjproperty()
14302         ScriptVariant_ToString(varlist[2], buf);  in openbor_changetextobjproperty()
14309         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changetextobjproperty()
14321         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changetextobjproperty()
14334         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changetextobjproperty()
14346         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[2], &ltemp)))  in openbor_changetextobjproperty()
14365     ScriptVariant_ToString(varlist[2], buf);  in openbor_changetextobjproperty()
14371 HRESULT openbor_settextobj(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_settextobj()  argument
14387     if(FAILED(ScriptVariant_IntegerValue(varlist[0], &ind)))  in openbor_settextobj()
14404     if(FAILED(ScriptVariant_IntegerValue(varlist[1], &X)))  in openbor_settextobj()
14408     if(FAILED(ScriptVariant_IntegerValue(varlist[2], &Y)))  in openbor_settextobj()
14412     if(FAILED(ScriptVariant_IntegerValue(varlist[3], &F)))  in openbor_settextobj()
14416     if(FAILED(ScriptVariant_IntegerValue(varlist[4], &Z)))  in openbor_settextobj()
14420     ScriptVariant_ToString(varlist[5], buf);  in openbor_settextobj()
14421     if(paramCount >= 7 && FAILED(ScriptVariant_IntegerValue(varlist[6], &T)))  in openbor_settextobj()
14445 HRESULT openbor_cleartextobj(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_cleartextobj()  argument
14458     if(FAILED(ScriptVariant_IntegerValue(varlist[0], &ind)))  in openbor_cleartextobj()
14523 int mapstrings_layerproperty(ScriptVariant **varlist, int paramCount)  in mapstrings_layerproperty()  argument
14567     MAPSTRINGS(varlist[0], typelist, _glt_the_end,  in mapstrings_layerproperty()
14569     MAPSTRINGS(varlist[2], proplist, _glp_the_end,  in mapstrings_layerproperty()
14946 HRESULT openbor_getlayerproperty(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_getlayerproperty()  argument
14957     mapstrings_layerproperty(varlist, paramCount);  in openbor_getlayerproperty()
14959     type = varlist[0]->lVal;  in openbor_getlayerproperty()
14960     propind = varlist[2]->lVal;  in openbor_getlayerproperty()
14962     if(FAILED(ScriptVariant_IntegerValue(varlist[1], &ind)))  in openbor_getlayerproperty()
14996 HRESULT openbor_changelayerproperty(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCou…  in openbor_changelayerproperty()  argument
15008     mapstrings_layerproperty(varlist, paramCount);  in openbor_changelayerproperty()
15010     type = varlist[0]->lVal;  in openbor_changelayerproperty()
15011     propind = varlist[2]->lVal;  in openbor_changelayerproperty()
15013     if(FAILED(ScriptVariant_IntegerValue(varlist[1], &ind)))  in openbor_changelayerproperty()
15025     if(FAILED(_changelayerproperty(layer, propind, varlist[3])))  in openbor_changelayerproperty()
15088 int mapstrings_levelproperty(ScriptVariant **varlist, int paramCount)  in mapstrings_levelproperty()  argument
15141     MAPSTRINGS(varlist[0], proplist, _lp_the_end,  in mapstrings_levelproperty()
15144     if(paramCount >= 3 && varlist[0]->vt == VT_INTEGER && varlist[0]->lVal == _lp_basemap)  in mapstrings_levelproperty()
15146         MAPSTRINGS(varlist[2], basemaplist, _lp_bm_the_end,  in mapstrings_levelproperty()
15150 …if(paramCount >= 3 && varlist[0]->vt == VT_INTEGER && (varlist[0]->lVal == _lp_hole || varlist[0]-…  in mapstrings_levelproperty()
15152         MAPSTRINGS(varlist[2], terrainlist, _lp_terrain_the_end,  in mapstrings_levelproperty()
15159 HRESULT openbor_getlevelproperty(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_getlevelproperty()  argument
15163     mapstrings_levelproperty(varlist, paramCount);  in openbor_getlevelproperty()
15165     switch(varlist[0]->lVal)  in openbor_getlevelproperty()
15230         if(paramCount > 2 && SUCCEEDED(ScriptVariant_IntegerValue(varlist[1], &ltemp))  in openbor_getlevelproperty()
15234             if(varlist[2]->vt != VT_STR)  in openbor_getlevelproperty()
15240             switch(varlist[2]->lVal)  in openbor_getlevelproperty()
15305         if(paramCount > 2 && SUCCEEDED(ScriptVariant_IntegerValue(varlist[1], &ltemp))  in openbor_getlevelproperty()
15309             if(varlist[2]->vt != VT_STR)  in openbor_getlevelproperty()
15315             switch(varlist[2]->lVal)  in openbor_getlevelproperty()
15378 …if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[1], &ltemp)) && ltemp >= 0 && ltemp < level->numba…  in openbor_getlevelproperty()
15383                 if(varlist[2]->vt != VT_STR)  in openbor_getlevelproperty()
15389                 switch(varlist[2]->lVal)  in openbor_getlevelproperty()
15404 …              if(paramCount >= 5 && SUCCEEDED(ScriptVariant_DecimalValue(varlist[3], &dbltemp2)) &&  in openbor_getlevelproperty()
15405                             SUCCEEDED(ScriptVariant_DecimalValue(varlist[4], &dbltemp3)) &&  in openbor_getlevelproperty()
15435 …      printf("Property is not supported by function getlevelproperty yet. %d\n", varlist[0]->lVal);  in openbor_getlevelproperty()
15448 HRESULT openbor_changelevelproperty(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCou…  in openbor_changelevelproperty()  argument
15464     mapstrings_levelproperty(varlist, paramCount);  in openbor_changelevelproperty()
15466     arg = varlist[1];  in openbor_changelevelproperty()
15468     switch(varlist[0]->lVal)  in openbor_changelevelproperty()
15581         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[1], &ltemp)) && ltemp >= 0)  in openbor_changelevelproperty()
15590                 switch(varlist[2]->lVal)  in openbor_changelevelproperty()
15593                     if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[3], &dbltemp2)) )  in openbor_changelevelproperty()
15603                     if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[3], &dbltemp2)) )  in openbor_changelevelproperty()
15613                     if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[3], &dbltemp2)) )  in openbor_changelevelproperty()
15623                     if(SUCCEEDED(ScriptVariant_DecimalValue(varlist[3], &dbltemp2)) )  in openbor_changelevelproperty()
15633 …              if(paramCount >= 6 && SUCCEEDED(ScriptVariant_DecimalValue(varlist[3], &dbltemp2)) &&  in openbor_changelevelproperty()
15634                             SUCCEEDED(ScriptVariant_DecimalValue(varlist[4], &dbltemp3)) &&  in openbor_changelevelproperty()
15635                             SUCCEEDED(ScriptVariant_DecimalValue(varlist[5], &dbltemp)) &&  in openbor_changelevelproperty()
15666         if( SUCCEEDED(ScriptVariant_IntegerValue(varlist[1], &ltemp)) && ltemp >= 0  in openbor_changelevelproperty()
15667 …& ( SUCCEEDED(ScriptVariant_DecimalValue(varlist[3], &dbltemp)) || SUCCEEDED(ScriptVariant_Integer…  in openbor_changelevelproperty()
15669             if(varlist[2]->vt != VT_STR)  in openbor_changelevelproperty()
15679             switch(varlist[2]->lVal)  in openbor_changelevelproperty()
15742         if( SUCCEEDED(ScriptVariant_IntegerValue(varlist[1], &ltemp)) && ltemp >= 0  in openbor_changelevelproperty()
15743 …& ( SUCCEEDED(ScriptVariant_DecimalValue(varlist[3], &dbltemp)) || SUCCEEDED(ScriptVariant_Integer…  in openbor_changelevelproperty()
15745             if(varlist[2]->vt != VT_STR)  in openbor_changelevelproperty()
15755             switch(varlist[2]->lVal)  in openbor_changelevelproperty()
15827         ScriptVariant_ToString(varlist[i], buf);  in openbor_changelevelproperty()
15836 HRESULT openbor_shutdown(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_shutdown()  argument
15842     if(paramCount > 0 && FAILED(ScriptVariant_IntegerValue(varlist[0], &ltemp)))  in openbor_shutdown()
15846     if(paramCount > 1 && varlist[1]->vt != VT_STR)  in openbor_shutdown()
15851 …shutdown((int)ltemp,  paramCount > 1 ? StrCache_Get(varlist[1]->strVal) : (DEFAULT_SHUTDOWN_MESSAG…  in openbor_shutdown()
15860 HRESULT openbor_jumptobranch(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_jumptobranch()  argument
15869     if(varlist[0]->vt != VT_STR)  in openbor_jumptobranch()
15874 …strncpy(branch_name, StrCache_Get(varlist[0]->strVal), MIN(MAX_NAME_LEN, MAX_STR_VAR_LEN)); // cop…  in openbor_jumptobranch()
15878         if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[1], &ltemp)))  in openbor_jumptobranch()
15897 HRESULT openbor_bindentity(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_bindentity()  argument
15911     ent = (entity *)(varlist[0])->ptrVal; //retrieve the entity  in openbor_bindentity()
15917     other = (entity *)(varlist[1])->ptrVal;  in openbor_bindentity()
15935     arg = varlist[2];  in openbor_bindentity()
15951     arg = varlist[3];  in openbor_bindentity()
15966     arg = varlist[4];  in openbor_bindentity()
15981     arg = varlist[5];  in openbor_bindentity()
15995     arg = varlist[6];  in openbor_bindentity()
16009     arg = varlist[7];  in openbor_bindentity()
16026 HRESULT openbor_array(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_array()  argument
16031     if(paramCount < 1 || FAILED(ScriptVariant_IntegerValue(varlist[0], &size)) || size < 0)  in openbor_array()
16058 HRESULT openbor_size(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_size()  argument
16061 …if(paramCount < 1 || varlist[0]->vt != VT_PTR || !(array = (Varlist *)varlist[0]->ptrVal) || array…  in openbor_size()
16085 HRESULT openbor_get(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_get()  argument
16091 …if(paramCount < 2 || varlist[0]->vt != VT_PTR || !(array = (Varlist *)varlist[0]->ptrVal) || array…  in openbor_get()
16096     if(varlist[1]->vt == VT_STR)  in openbor_get()
16098         ptmpvar = Varlist_GetByName(array, StrCache_Get(varlist[1]->strVal));  in openbor_get()
16100     else if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[1], &ltemp)))  in openbor_get()
16126 HRESULT openbor_set(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_set()  argument
16132 …if(paramCount < 3 || varlist[0]->vt != VT_PTR || !(array = (Varlist *)varlist[0]->ptrVal) || array…  in openbor_set()
16137     if(varlist[1]->vt == VT_STR)  in openbor_set()
16139         Varlist_SetByName(array, StrCache_Get(varlist[1]->strVal), varlist[2]);  in openbor_set()
16141     else if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[1], &ltemp)))  in openbor_set()
16143         Varlist_SetByIndex(array, (int)ltemp, varlist[2]);  in openbor_set()
16158 HRESULT openbor_delete(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_delete()  argument
16164 …if(paramCount < 2 || varlist[0]->vt != VT_PTR || !(array = (Varlist *)varlist[0]->ptrVal) || array…  in openbor_delete()
16169     if(varlist[1]->vt == VT_STR)  in openbor_delete()
16171         if ( !Varlist_DeleteByName(array, StrCache_Get(varlist[1]->strVal)) ) goto set_error;  in openbor_delete()
16173     else if(SUCCEEDED(ScriptVariant_IntegerValue(varlist[1], &index)))  in openbor_delete()
16190 HRESULT openbor_add(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_add()  argument
16196 …if(paramCount < 2 || varlist[0]->vt != VT_PTR || !(array = (Varlist *)varlist[0]->ptrVal) || array…  in openbor_add()
16201     if(varlist[1]->vt == VT_STR)  in openbor_add()
16203         Varlist_SetByName(array, StrCache_Get(varlist[1]->strVal), varlist[2]);  in openbor_add()
16205     else if( SUCCEEDED(ScriptVariant_IntegerValue(varlist[1], &index)) )  in openbor_add()
16207         if ( !Varlist_AddByIndex(array, (int)index, varlist[2]) ) goto add_error;  in openbor_add()
16222 HRESULT openbor_reset(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_reset()  argument
16225 …if(paramCount < 1 || varlist[0]->vt != VT_PTR || !(array = (Varlist *)varlist[0]->ptrVal) || array…  in openbor_reset()
16242 HRESULT openbor_next(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_next()  argument
16245 …if(paramCount < 1 || varlist[0]->vt != VT_PTR || !(array = (Varlist *)varlist[0]->ptrVal) || array…  in openbor_next()
16261 HRESULT openbor_previous(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_previous()  argument
16264 …if(paramCount < 1 || varlist[0]->vt != VT_PTR || !(array = (Varlist *)varlist[0]->ptrVal) || array…  in openbor_previous()
16280 HRESULT openbor_islast(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_islast()  argument
16283 …if(paramCount < 1 || varlist[0]->vt != VT_PTR || !(array = (Varlist *)varlist[0]->ptrVal) || array…  in openbor_islast()
16299 HRESULT openbor_isfirst(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_isfirst()  argument
16302 …if(paramCount < 1 || varlist[0]->vt != VT_PTR || !(array = (Varlist *)varlist[0]->ptrVal) || array…  in openbor_isfirst()
16318 HRESULT openbor_key(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_key()  argument
16322 …if(paramCount < 1 || varlist[0]->vt != VT_PTR || !(array = (Varlist *)varlist[0]->ptrVal) || array…  in openbor_key()
16346 HRESULT openbor_value(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_value()  argument
16350 …if(paramCount < 1 || varlist[0]->vt != VT_PTR || !(array = (Varlist *)varlist[0]->ptrVal) || array…  in openbor_value()
16373 HRESULT openbor_allocscreen(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_allocscreen()  argument
16383     if(FAILED(ScriptVariant_IntegerValue(varlist[0], &w)))  in openbor_allocscreen()
16387     if(FAILED(ScriptVariant_IntegerValue(varlist[1], &h)))  in openbor_allocscreen()
16417 HRESULT openbor_clearscreen(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_clearscreen()  argument
16426     if(varlist[0]->vt != VT_PTR)  in openbor_clearscreen()
16431     screen = (s_screen *)varlist[0]->ptrVal;  in openbor_clearscreen()
16447 int mapstrings_drawmethodproperty(ScriptVariant **varlist, int paramCount)  in mapstrings_drawmethodproperty()  argument
16500     MAPSTRINGS(varlist[1], proplist, _dm_the_end,  in mapstrings_drawmethodproperty()
16507 HRESULT openbor_changedrawmethod(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_changedrawmethod()  argument
16520     mapstrings_drawmethodproperty(varlist, paramCount);  in openbor_changedrawmethod()
16522     if(varlist[0]->vt == VT_EMPTY)  in openbor_changedrawmethod()
16526     else if(varlist[0]->vt == VT_PTR)  in openbor_changedrawmethod()
16528         e = (entity *)varlist[0]->ptrVal;  in openbor_changedrawmethod()
16544     switch(varlist[1]->lVal)  in openbor_changedrawmethod()
16548         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &temp)))  in openbor_changedrawmethod()
16555         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &temp)))  in openbor_changedrawmethod()
16562         if(FAILED(ScriptVariant_DecimalValue(varlist[2], &ftemp)))  in openbor_changedrawmethod()
16569         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &temp)))  in openbor_changedrawmethod()
16576         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &temp)))  in openbor_changedrawmethod()
16583         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &temp)))  in openbor_changedrawmethod()
16590         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &temp)))  in openbor_changedrawmethod()
16597         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &temp)))  in openbor_changedrawmethod()
16608         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &temp)))  in openbor_changedrawmethod()
16613         if(FAILED(ScriptVariant_IntegerValue(varlist[3], &temp)))  in openbor_changedrawmethod()
16618         if(FAILED(ScriptVariant_IntegerValue(varlist[4], &temp)))  in openbor_changedrawmethod()
16623         if(FAILED(ScriptVariant_IntegerValue(varlist[5], &temp)))  in openbor_changedrawmethod()
16630         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &temp)))  in openbor_changedrawmethod()
16637         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &temp)))  in openbor_changedrawmethod()
16644         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &temp)))  in openbor_changedrawmethod()
16651         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &temp)))  in openbor_changedrawmethod()
16659         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &temp)))  in openbor_changedrawmethod()
16666         if(FAILED(ScriptVariant_DecimalValue(varlist[2], &ftemp)))  in openbor_changedrawmethod()
16673         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &temp)))  in openbor_changedrawmethod()
16680         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &temp)))  in openbor_changedrawmethod()
16687         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &temp)))  in openbor_changedrawmethod()
16694         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &temp)))  in openbor_changedrawmethod()
16701         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &temp)))  in openbor_changedrawmethod()
16708         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &temp)))  in openbor_changedrawmethod()
16715         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &temp)))  in openbor_changedrawmethod()
16725         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &temp)))  in openbor_changedrawmethod()
16732         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &temp)))  in openbor_changedrawmethod()
16739         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &temp)))  in openbor_changedrawmethod()
16746         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &temp)))  in openbor_changedrawmethod()
16753         if(varlist[2]->vt != VT_PTR && varlist[2]->vt != VT_EMPTY )  in openbor_changedrawmethod()
16757         pmethod->table = (void *)varlist[2]->ptrVal;  in openbor_changedrawmethod()
16760         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &temp)))  in openbor_changedrawmethod()
16767         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &temp)))  in openbor_changedrawmethod()
16774         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &temp)))  in openbor_changedrawmethod()
16781         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &temp)))  in openbor_changedrawmethod()
16788         if(FAILED(ScriptVariant_DecimalValue(varlist[2], &ftemp)))  in openbor_changedrawmethod()
16795         if(FAILED(ScriptVariant_DecimalValue(varlist[2], &ftemp)))  in openbor_changedrawmethod()
16802         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &temp)))  in openbor_changedrawmethod()
16809         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &temp)))  in openbor_changedrawmethod()
16816         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &temp)))  in openbor_changedrawmethod()
16823         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &temp)))  in openbor_changedrawmethod()
16830         if(FAILED(ScriptVariant_IntegerValue(varlist[2], &temp)))  in openbor_changedrawmethod()
16849 HRESULT openbor_getdrawmethod(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_getdrawmethod()  argument
16867     mapstrings_drawmethodproperty(varlist, paramCount);  in openbor_getdrawmethod()
16869     if(varlist[0]->vt == VT_EMPTY)  in openbor_getdrawmethod()
16873     else if(varlist[0]->vt == VT_PTR)  in openbor_getdrawmethod()
16875         e = (entity *)varlist[0]->ptrVal;  in openbor_getdrawmethod()
16891     switch(varlist[1]->lVal)  in openbor_getdrawmethod()
17014 HRESULT openbor_setdrawmethod(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_setdrawmethod()  argument
17027     if(varlist[0]->vt == VT_EMPTY)  in openbor_setdrawmethod()
17031     else if(varlist[0]->vt == VT_PTR)  in openbor_setdrawmethod()
17033         e = (entity *)varlist[0]->ptrVal;  in openbor_setdrawmethod()
17052         if(FAILED(ScriptVariant_IntegerValue(varlist[i], value + i - 1)))  in openbor_setdrawmethod()
17058     if(paramCount >= 14 && varlist[13]->vt != VT_PTR && varlist[13]->vt != VT_EMPTY)  in openbor_setdrawmethod()
17065         if(FAILED(ScriptVariant_IntegerValue(varlist[i], value + i - 2)))  in openbor_setdrawmethod()
17085         pmethod->table = (unsigned char *)varlist[13]->ptrVal;  in openbor_setdrawmethod()
17102 HRESULT openbor_updateframe(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_updateframe()  argument
17114     if(varlist[0]->vt == VT_EMPTY)  in openbor_updateframe()
17118     else if(varlist[0]->vt == VT_PTR)  in openbor_updateframe()
17120         e = (entity *)varlist[0]->ptrVal;  in openbor_updateframe()
17132     if(FAILED(ScriptVariant_IntegerValue(varlist[1], &f)))  in openbor_updateframe()
17147 HRESULT openbor_executeanimation(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_executeanimation()  argument
17158     if(varlist[0]->vt == VT_EMPTY)  in openbor_executeanimation()
17162     else if(varlist[0]->vt == VT_PTR)  in openbor_executeanimation()
17164         e = (entity *)varlist[0]->ptrVal;  in openbor_executeanimation()
17190     if(paramCount > 1 && FAILED(ScriptVariant_IntegerValue(varlist[1], &anim)))  in openbor_executeanimation()
17194     if(paramCount > 2 && FAILED(ScriptVariant_IntegerValue(varlist[2], &resetable)))  in openbor_executeanimation()
17208 HRESULT openbor_performattack(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_performattack()  argument
17219     if(varlist[0]->vt == VT_EMPTY)  in openbor_performattack()
17223     else if(varlist[0]->vt == VT_PTR)  in openbor_performattack()
17225         e = (entity *)varlist[0]->ptrVal;  in openbor_performattack()
17251     if(paramCount > 1 && FAILED(ScriptVariant_IntegerValue(varlist[1], &anim)))  in openbor_performattack()
17255     if(paramCount > 2 && FAILED(ScriptVariant_IntegerValue(varlist[2], &resetable)))  in openbor_performattack()
17269 HRESULT openbor_setidle(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_setidle()  argument
17281     if(varlist[0]->vt == VT_EMPTY)  in openbor_setidle()
17285     else if(varlist[0]->vt == VT_PTR)  in openbor_setidle()
17287         e = (entity *)varlist[0]->ptrVal;  in openbor_setidle()
17316     if(paramCount > 1 && FAILED(ScriptVariant_IntegerValue(varlist[1], &anim)))  in openbor_setidle()
17320     if(paramCount > 2 && FAILED(ScriptVariant_IntegerValue(varlist[2], &resetable)))  in openbor_setidle()
17324     if(paramCount > 3 && FAILED(ScriptVariant_IntegerValue(varlist[3], &stalladd)))  in openbor_setidle()
17343 HRESULT openbor_getentity(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_getentity()  argument
17354     if(FAILED(ScriptVariant_IntegerValue(varlist[0], &ind)))  in openbor_getentity()
17377 HRESULT openbor_loadmodel(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_loadmodel()  argument
17385     if(varlist[0]->vt != VT_STR)  in openbor_loadmodel()
17392         if(FAILED(ScriptVariant_IntegerValue(varlist[1], &unload)))  in openbor_loadmodel()
17397     model = load_cached_model(StrCache_Get(varlist[0]->strVal), "openbor_loadmodel", (char)unload);  in openbor_loadmodel()
17401         model_cache[model->index].selectable = (char)ScriptVariant_IsTrue(varlist[2]);  in openbor_loadmodel()
17418 HRESULT openbor_loadsprite(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_loadsprite()  argument
17427     if(varlist[0]->vt != VT_STR)  in openbor_loadsprite()
17433     if((spr = loadsprite2(StrCache_Get(varlist[0]->strVal), NULL, NULL)))  in openbor_loadsprite()
17436         if(paramCount > 1 && (mask = loadsprite2(StrCache_Get(varlist[1]->strVal), NULL, NULL)))  in openbor_loadsprite()
17453 HRESULT openbor_menu_options(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_menu_options()  argument
17463 HRESULT openbor_hallfame(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_hallfame()  argument
17472 HRESULT openbor_playwebm(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_playwebm()  argument
17482     if(varlist[0]->vt != VT_STR)  in openbor_playwebm()
17489         if(FAILED(ScriptVariant_IntegerValue(varlist[1], &temp)))  in openbor_playwebm()
17497         (*pretvar)->lVal = (LONG)playwebm(StrCache_Get(varlist[0]->strVal), (int)temp);  in openbor_playwebm()
17512 HRESULT openbor_playgif(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_playgif()  argument
17524     if(varlist[0]->vt != VT_STR)  in openbor_playgif()
17531         if(FAILED(ScriptVariant_IntegerValue(varlist[i + 1], temp + i)))  in openbor_playgif()
17538 …(*pretvar)->lVal = (LONG)playgif(StrCache_Get(varlist[0]->strVal), (int)(temp[0]), (int)(temp[1]),…  in openbor_playgif()
17550 HRESULT openbor_openanigif(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_openanigif()  argument
17554     if(varlist[0]->vt != VT_STR)  in openbor_openanigif()
17560     if(anigif_open(StrCache_Get(varlist[0]->strVal), packfile, info))  in openbor_openanigif()
17579 HRESULT openbor_decodeanigif(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_decodeanigif()  argument
17583     if(varlist[0]->vt != VT_PTR || !varlist[0]->ptrVal)  in openbor_decodeanigif()
17587     info = (anigif_info *) varlist[0]->ptrVal;  in openbor_decodeanigif()
17599 HRESULT openbor_getanigifinfo(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_getanigifinfo()  argument
17604     if(varlist[0]->vt != VT_PTR || !varlist[0]->ptrVal)  in openbor_getanigifinfo()
17608     info = (anigif_info *) varlist[0]->ptrVal;  in openbor_getanigifinfo()
17610     if(varlist[1]->vt != VT_STR)  in openbor_getanigifinfo()
17614     name = StrCache_Get(varlist[1]->strVal);  in openbor_getanigifinfo()
17669 HRESULT openbor_adjustwalkanimation(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCou…  in openbor_adjustwalkanimation()  argument
17680     else if(varlist[0]->vt == VT_PTR)  in openbor_adjustwalkanimation()
17682         e = (entity *)varlist[0]->ptrVal;  in openbor_adjustwalkanimation()
17693     else if(varlist[1]->vt == VT_PTR)  in openbor_adjustwalkanimation()
17695         t = (entity *)varlist[1]->ptrVal;  in openbor_adjustwalkanimation()
17697     else if(varlist[1]->vt == VT_EMPTY)  in openbor_adjustwalkanimation()
17719 HRESULT openbor_finditem(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_finditem()  argument
17728     else if(varlist[0]->vt == VT_PTR)  in openbor_finditem()
17730         e = (entity *)varlist[0]->ptrVal;  in openbor_finditem()
17755 HRESULT openbor_pickup(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_pickup()  argument
17767     if(varlist[0]->vt == VT_PTR)  in openbor_pickup()
17769         e = (entity *)varlist[0]->ptrVal;  in openbor_pickup()
17776     if(varlist[1]->vt == VT_PTR)  in openbor_pickup()
17778         t = (entity *)varlist[1]->ptrVal;  in openbor_pickup()
17804 HRESULT openbor_waypoints(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_waypoints()  argument
17818     if(varlist[0]->vt == VT_PTR)  in openbor_waypoints()
17820         e = (entity *)varlist[0]->ptrVal;  in openbor_waypoints()
17835             if(FAILED(ScriptVariant_DecimalValue(varlist[1], &x)))  in openbor_waypoints()
17840             if(FAILED(ScriptVariant_DecimalValue(varlist[2], &z)))  in openbor_waypoints()
17885 HRESULT openbor_testmove(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_testmove()  argument
17898     if(varlist[0]->vt == VT_PTR)  in openbor_testmove()
17900         e = (entity *)varlist[0]->ptrVal;  in openbor_testmove()
17907     if(FAILED(ScriptVariant_DecimalValue(varlist[1], &x)))  in openbor_testmove()
17912     if(FAILED(ScriptVariant_DecimalValue(varlist[2], &z)))  in openbor_testmove()
17932 HRESULT openbor_drawspriteq(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_drawspriteq()  argument
17947     if(varlist[0]->vt != VT_PTR && varlist[0]->vt != VT_EMPTY)  in openbor_drawspriteq()
17952     if(varlist[0]->ptrVal)  in openbor_drawspriteq()
17954         screen = (s_screen *)varlist[0]->ptrVal;  in openbor_drawspriteq()
17963         if(FAILED(ScriptVariant_IntegerValue(varlist[i], value + i - 1)))  in openbor_drawspriteq()
17979 HRESULT openbor_clearspriteq(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_clearspriteq()  argument
18002 int mapstrings_gfxproperty(ScriptVariant **varlist, int paramCount)  in mapstrings_gfxproperty()  argument
18025     MAPSTRINGS(varlist[1], proplist, _gfx_the_end,  in mapstrings_gfxproperty()
18032 HRESULT openbor_getgfxproperty(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_getgfxproperty()  argument
18046     mapstrings_gfxproperty(varlist, paramCount);  in openbor_getgfxproperty()
18048     if(varlist[0]->vt != VT_PTR)  in openbor_getgfxproperty()
18053     handle = varlist[0]->ptrVal;  in openbor_getgfxproperty()
18067     switch(varlist[1]->lVal)  in openbor_getgfxproperty()
18201             if(FAILED(ScriptVariant_IntegerValue(varlist[i], value + i - 2)))  in openbor_getgfxproperty()
18276 HRESULT openbor_allocscript(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_allocscript()  argument
18288     if(paramCount >= 1 && varlist[0]->vt == VT_STR)  in openbor_allocscript()
18290         name = (char *)StrCache_Get(varlist[0]->strVal);  in openbor_allocscript()
18292     if(paramCount >= 2 && varlist[1]->vt == VT_STR)  in openbor_allocscript()
18294         comment = (char *)StrCache_Get(varlist[1]->strVal);  in openbor_allocscript()
18312 HRESULT openbor_loadscript(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_loadscript()  argument
18320     if(paramCount >= 1 && varlist[0]->vt == VT_PTR)  in openbor_loadscript()
18322         ns = (Script *)varlist[0]->ptrVal;  in openbor_loadscript()
18328     if(paramCount >= 2 && varlist[1]->vt == VT_STR)  in openbor_loadscript()
18330         path = (char *)StrCache_Get(varlist[1]->strVal);  in openbor_loadscript()
18349 HRESULT openbor_compilescript(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_compilescript()  argument
18355     if(paramCount >= 1 && varlist[0]->vt == VT_PTR)  in openbor_compilescript()
18357         ns = (Script *)varlist[0]->ptrVal;  in openbor_compilescript()
18374 HRESULT openbor_executescript(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_executescript()  argument
18380     if(paramCount >= 1 && varlist[0]->vt == VT_PTR)  in openbor_executescript()
18382         ns = (Script *)varlist[0]->ptrVal;  in openbor_executescript()
18400 HRESULT openbor_loadgamefile(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_loadgamefile()  argument
18408 HRESULT openbor_finishlevel(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_finishlevel()  argument
18416 HRESULT openbor_gotomainmenu(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_gotomainmenu()  argument
18422     if(paramCount >= 1 && FAILED(ScriptVariant_IntegerValue(varlist[0], &ltemp)) )  in openbor_gotomainmenu()
18433 HRESULT openbor_playgame(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_playgame()  argument
18438     if(paramCount >= 1 && FAILED(ScriptVariant_IntegerValue(varlist[0], &lset)) )  in openbor_playgame()
18442     if(paramCount >= 2 && FAILED(ScriptVariant_IntegerValue(varlist[1], &lsave)) )  in openbor_playgame()
18460 HRESULT openbor_getrecordingstatus(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCoun…  in openbor_getrecordingstatus()  argument
18468 HRESULT openbor_recordinputs(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_recordinputs()  argument
18473     if( paramCount < 1 && varlist[0]->vt != VT_INTEGER )  in openbor_recordinputs()
18478     ltemp = (int)varlist[0]->lVal;  in openbor_recordinputs()
18485             if( paramCount < 3 || varlist[1]->vt != VT_STR || varlist[2]->vt != VT_STR )  in openbor_recordinputs()
18490             strcpy(playrecstatus->path,(char*)StrCache_Get(varlist[1]->strVal));  in openbor_recordinputs()
18491             strcpy(playrecstatus->filename,(char*)StrCache_Get(varlist[2]->strVal));  in openbor_recordinputs()
18498             if( paramCount < 3 || varlist[1]->vt != VT_STR || varlist[2]->vt != VT_STR )  in openbor_recordinputs()
18503             strcpy(playrecstatus->path,(char*)StrCache_Get(varlist[1]->strVal));  in openbor_recordinputs()
18504             strcpy(playrecstatus->filename,(char*)StrCache_Get(varlist[2]->strVal));  in openbor_recordinputs()
18518 HRESULT openbor_getsaveinfo(ScriptVariant **varlist , ScriptVariant **pretvar, int paramCount)  in openbor_getsaveinfo()  argument
18528     if(FAILED(ScriptVariant_IntegerValue(varlist[0], &ltemp)) || varlist[1]->vt != VT_STR)  in openbor_getsaveinfo()
18540     prop = (char *)StrCache_Get(varlist[1]->strVal);  in openbor_getsaveinfo()
18565         if(paramCount < 3 || FAILED(ScriptVariant_IntegerValue(varlist[2], &ltemp)) )  in openbor_getsaveinfo()
18573         if(paramCount < 3 || FAILED(ScriptVariant_IntegerValue(varlist[2], &ltemp)) )  in openbor_getsaveinfo()
18581         if(paramCount < 3 || FAILED(ScriptVariant_IntegerValue(varlist[2], &ltemp)) )  in openbor_getsaveinfo()
18594         if(paramCount < 3 || FAILED(ScriptVariant_IntegerValue(varlist[2], &ltemp)) )  in openbor_getsaveinfo()
18603         if(paramCount < 3 || FAILED(ScriptVariant_IntegerValue(varlist[2], &ltemp)) )  in openbor_getsaveinfo()
18611         if(paramCount < 3 || FAILED(ScriptVariant_IntegerValue(varlist[2], &ltemp)) )  in openbor_getsaveinfo()