summaryrefslogtreecommitdiff
path: root/controller.lua
blob: f0fbceda2829e6d3380bf5e80862d8c2dd115f47 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
local digiline_rules = {
	{x =  1,y =  0,z =  0},
	{x = -1,y =  0,z =  0},
	{x =  0,y =  0,z =  1},
	{x =  0,y =  0,z = -1},
	{x =  0,y = -1,z =  0},
	{x =  1,y = -1,z =  0},
	{x = -1,y = -1,z =  0},
	{x =  0,y = -1,z =  1},
	{x =  0,y = -1,z = -1},
}

local players_on_controller = {}

local last_seen_inputs = {}

local function removeEntity(pos)
	local entitiesNearby = minetest.get_objects_inside_radius(pos,0.5)
	for _,i in pairs(entitiesNearby) do
		if i:get_luaentity() and i:get_luaentity().name == "digistuff:controller_entity" then
			i:remove()
		end
	end
end

local function process_inputs(pos)
	local meta = minetest.get_meta(pos)
	local hash = minetest.hash_node_position(pos)
	if minetest.get_node(pos).name ~= "digistuff:controller_programmed" then
	local player = minetest.get_player_by_name(players_on_controller[hash])
		if player then
			player:set_physics_override({speed = 1,jump = 1,})
			player:set_pos(vector.add(pos,vector.new(0.25,0,0.25)))
			minetest.chat_send_player(players_on_controller[hash],"You are now free to move.")
		end
		last_seen_inputs[players_on_controller[hash]] = nil
		players_on_controller[hash] = nil
		return
	end
	local name = players_on_controller[hash]
	local player = minetest.get_player_by_name(name)
	if not player then
		digiline:receptor_send(pos,digiline_rules,meta:get_string("channel"),"player_left")
		minetest.get_meta(pos):set_string("infotext","Digilines Game Controller Ready\n(right-click to use)")
		players_on_controller[hash] = nil
		return
	end
	local inputs = player:get_player_control()
	inputs.pitch = player:get_look_vertical()
	inputs.yaw = player:get_look_horizontal()
	local send_needed = false
	if not last_seen_inputs[name] then
		send_needed = true
	else
		for k,v in pairs(inputs) do
			if v ~= last_seen_inputs[name][k] then
				send_needed = true
				break
			end
		end
	end
	last_seen_inputs[name] = inputs
	if send_needed then
		local channel = meta:get_string("channel")
		local inputs = table.copy(inputs)
		inputs.look_vector = player:get_look_dir()
		inputs.name = name
		digiline:receptor_send(pos,digiline_rules,channel,inputs)
	end
end

local function release_player(pos)
	local hash = minetest.hash_node_position(pos)
	local player = minetest.get_player_by_name(players_on_controller[hash])
	if player and player:get_properties()._is_gamecontroller then
		local parent = player:get_attach()
		print(dump(parent:get_properties()))
		if parent then
			player:set_detach()
		end
		minetest.chat_send_player(players_on_controller[hash],"You are now free to move.")
	end
	removeEntity(pos)
	local meta = minetest.get_meta(pos)
	meta:set_string("infotext","Digilines Game Controller Ready\n(right-click to use)")
	last_seen_inputs[players_on_controller[hash]] = nil
	players_on_controller[hash] = nil
	digiline:receptor_send(pos,digiline_rules,meta:get_string("channel"),"player_left")
end

local function trap_player(pos,player)
	local hash = minetest.hash_node_position(pos)
	local oldname = players_on_controller[hash]
	local newname = player:get_player_name()
	if oldname and minetest.get_player_by_name(oldname) then
			minetest.chat_send_player(player:get_player_name(),"Controller is already occupied by "..oldname)
			return
	else
		players_on_controller[hash] = newname
		local entity = minetest.add_entity(pos,"digistuff:controller_entity")
		player:set_attach(entity,"",vector.new(0,0,0),vector.new(0,0,0))
		minetest.chat_send_player(newname,"You are now using a digilines game controller. Right-click the controller again to be released.")
		local meta = minetest.get_meta(pos)
		meta:set_string("infotext","Digilines Game Controller\nIn use by: "..newname)
		process_inputs(pos)
	end
end

local function toggle_trap_player(pos,player)
	if players_on_controller[minetest.hash_node_position(pos)] then
		release_player(pos)
	else
		trap_player(pos,player)
	end
end

minetest.register_node("digistuff:controller", {
	description = "Digilines Game Controller",
	tiles = {
		"digistuff_controller_top.png",
		"digistuff_controller_sides.png",
	},
	paramtype = "light",
	drawtype = "nodebox",
	node_box = {
		type = "fixed",
		fixed = {
				{-0.5,-0.5,-0.5,0.5,-0.45,0.5},
			}
	},
	_digistuff_channelcopier_fieldname = "channel",
	_digistuff_channelcopier_onset = function(pos)
		local meta = minetest.get_meta(pos)
		meta:set_string("formspec","")
		meta:set_string("infotext","Digilines Game Controller Ready\n(right-click to use)")
		minetest.swap_node(pos,{name = "digistuff:controller_programmed",})
	end,
	groups = {cracky = 1,},
	is_ground_content = false,
	on_construct = function(pos)
		local meta = minetest.get_meta(pos)
		meta:set_string("formspec","field[channel;Channel;${channel}")
	end,
	on_receive_fields = function(pos, formname, fields, sender)
		local name = sender:get_player_name()
		if minetest.is_protected(pos,name) and not minetest.check_player_privs(name,{protection_bypass=true}) then
			minetest.record_protection_violation(pos,name)
			return
		end
		local meta = minetest.get_meta(pos)
		if fields.channel then
			meta:set_string("channel",fields.channel)
			meta:set_string("formspec","")
			meta:set_string("infotext","Digilines Game Controller Ready\n(right-click to use)")
			minetest.swap_node(pos,{name = "digistuff:controller_programmed",})
		end
	end,
	digiline = {
		receptor = {},
		wire = {
			rules = digiline_rules,
		},
	},
})

minetest.register_node("digistuff:controller_programmed", {
	description = "Digilines Game Controller (programmed state - you hacker you!)",
	drop = "digistuff:controller",
	tiles = {
		"digistuff_controller_top.png",
		"digistuff_controller_sides.png",
	},
	paramtype = "light",
	drawtype = "nodebox",
	node_box = {
		type = "fixed",
		fixed = {
				{-0.5,-0.5,-0.5,0.5,-0.45,0.5},
			}
	},
	_digistuff_channelcopier_fieldname = "channel",
	groups = {cracky = 1,not_in_creative_inventory = 1,},
	is_ground_content = false,
	on_rightclick = function(pos,_,clicker)
		if clicker and clicker:get_player_name() then
			toggle_trap_player(pos,clicker)
		end
	end,
	_digistuff_channelcopier_fieldname = "channel",
	digiline = {
		receptor = {},
		wire = {
			rules = digiline_rules,
		},
		effector = {
			action = function(pos,node,channel,msg)
				local setchannel = minetest.get_meta(pos):get_string("channel")
				if channel ~= setchannel then return end
				if msg == "release" then
					local hash = minetest.hash_node_position(pos)
					if players_on_controller[hash] then
						release_player(pos)
					end
				end
			end,
		},
	},
})

minetest.register_entity("digistuff:controller_entity",{
	initial_properties = {
		visual = "sprite",
		physical = false,
		collisionbox = {0,0,0,0,0,0,},
		textures = {"digistuff_transparent.png",},
		_is_gamecontroller = true,
	},
})

local acc_dtime = 0

minetest.register_globalstep(function(dtime)
	acc_dtime = acc_dtime + dtime
	if acc_dtime < 0.2 then return end
	acc_dtime = 0
	for hash in pairs(players_on_controller) do
		local pos = minetest.get_position_from_hash(hash)
		process_inputs(pos)
	end
end)

minetest.register_lbm({
	name = "digistuff:reset_controllers",
	label = "Reset game controllers to idle",
	nodenames = {"digistuff:controller_programmed"},
	run_at_every_load = true,
	action = function(pos)
		if not players_on_controller[minetest.hash_node_position(pos)] then
			local meta = minetest.get_meta(pos)
			digiline:receptor_send(pos,digiline_rules,meta:get_string("channel"),"player_left")
			meta:set_string("infotext","Digilines Game Controller Ready\n(right-click to use)")
		end
	end,
})

minetest.register_craft({
	output = "digistuff:controller",
	recipe = {
		{"","digistuff:button","",},
		{"digistuff:button","group:wool","digistuff:button",},
		{"","digistuff:button","",},
	},
})