3005 SendIPCAndWaitReply('V?' + lua_tostring(L, 1) + #0); |
3005 SendIPCAndWaitReply('V?' + lua_tostring(L, 1) + #0); |
3006 lua_pushstring(L, str2pchar(CampaignVariable)); |
3006 lua_pushstring(L, str2pchar(CampaignVariable)); |
3007 lc_getcampaignvar := 1; |
3007 lc_getcampaignvar := 1; |
3008 end; |
3008 end; |
3009 |
3009 |
|
3010 function lc_savemissionvar(L : Plua_State): LongInt; Cdecl; |
|
3011 begin |
|
3012 if CheckLuaParamCount(L, 2, 'SaveMissionVar', 'varname, value') then |
|
3013 SendIPC('v!' + lua_tostring(L, 1) + ' ' + lua_tostring(L, 2) + #0); |
|
3014 lc_savemissionvar := 0; |
|
3015 end; |
|
3016 |
|
3017 function lc_getmissionvar(L : Plua_State): LongInt; Cdecl; |
|
3018 begin |
|
3019 if CheckLuaParamCount(L, 1, 'GetMissionVar', 'varname') then |
|
3020 SendIPCAndWaitReply('v?' + lua_tostring(L, 1) + #0); |
|
3021 lua_pushstring(L, str2pchar(MissionVariable)); |
|
3022 lc_getmissionvar := 1; |
|
3023 end; |
|
3024 |
3010 function lc_hidehog(L: Plua_State): LongInt; Cdecl; |
3025 function lc_hidehog(L: Plua_State): LongInt; Cdecl; |
3011 var gear: PGear; |
3026 var gear: PGear; |
3012 begin |
3027 begin |
3013 if CheckLuaParamCount(L, 1, 'HideHog', 'gearUid') then |
3028 if CheckLuaParamCount(L, 1, 'HideHog', 'gearUid') then |
3014 begin |
3029 begin |
4206 lua_register(luaState, _P'HideHog', @lc_hidehog); |
4221 lua_register(luaState, _P'HideHog', @lc_hidehog); |
4207 lua_register(luaState, _P'RestoreHog', @lc_restorehog); |
4222 lua_register(luaState, _P'RestoreHog', @lc_restorehog); |
4208 lua_register(luaState, _P'IsHogHidden', @lc_ishoghidden); |
4223 lua_register(luaState, _P'IsHogHidden', @lc_ishoghidden); |
4209 lua_register(luaState, _P'SaveCampaignVar', @lc_savecampaignvar); |
4224 lua_register(luaState, _P'SaveCampaignVar', @lc_savecampaignvar); |
4210 lua_register(luaState, _P'GetCampaignVar', @lc_getcampaignvar); |
4225 lua_register(luaState, _P'GetCampaignVar', @lc_getcampaignvar); |
|
4226 lua_register(luaState, _P'SaveMissionVar', @lc_savemissionvar); |
|
4227 lua_register(luaState, _P'GetMissionVar', @lc_getmissionvar); |
4211 lua_register(luaState, _P'band', @lc_band); |
4228 lua_register(luaState, _P'band', @lc_band); |
4212 lua_register(luaState, _P'bor', @lc_bor); |
4229 lua_register(luaState, _P'bor', @lc_bor); |
4213 lua_register(luaState, _P'bnot', @lc_bnot); |
4230 lua_register(luaState, _P'bnot', @lc_bnot); |
4214 lua_register(luaState, _P'div', @lc_div); |
4231 lua_register(luaState, _P'div', @lc_div); |
4215 lua_register(luaState, _P'GetInputMask', @lc_getinputmask); |
4232 lua_register(luaState, _P'GetInputMask', @lc_getinputmask); |