game/technic.git

RealBadAngel

2013-03-15 92c9f662ba23419711b79875f423db58441e0640

commit \| author \| age
773382	1	function swap_gate_node(pos,name,dir)
R	2	local node = minetest.env:get_node(pos)
	3	local meta = minetest.env:get_meta(pos)
	4	local meta0 = meta:to_table()
	5	node.name = name
	6	node.param1=0
	7	node.param2=dir
	8	minetest.env:set_node(pos,node)
	9	meta:from_table(meta0)
	10	end
	11
	12	function getDir (player)
	13	local dir=player:get_look_dir()
	14	if math.abs(dir.x)>math.abs(dir.z) then
	15	if dir.x>0 then return 0 end
	16	return 1
	17	end
	18	if dir.z>0 then return 2 end
	19	return 3
	20	end
	21
	22	function checkNode (pos)
	23	local node=minetest.env:get_node(pos)
	24	if node.name == "air" then return 0 end
	25	return 1
	26	end
	27
	28	function addGateNode (gateNodes,i,pos)
	29	gateNodes[i].pos.x=pos.x
	30	gateNodes[i].pos.y=pos.y
	31	gateNodes[i].pos.z=pos.z
	32	end
	33
	34	function placeGate (player,pos)
	35	local player_name=player:get_player_name()
	36	local dir=minetest.dir_to_facedir(player:get_look_dir())
	37	local pos1=pos
	38	local gateNodes={}
	39	for i=1,9,1 do
	40	gateNodes[i]={}
	41	gateNodes[i].pos={}
	42	end
	43	if dir==1 then
	44	addGateNode(gateNodes,1,pos1)
	45	pos1.z=pos1.z+1
	46	addGateNode(gateNodes,2,pos1)
	47	pos1.z=pos1.z-2
	48	addGateNode(gateNodes,3,pos1)
	49	pos1.z=pos1.z+1
	50	pos1.y=pos1.y+1
	51	addGateNode(gateNodes,4,pos1)
	52	pos1.z=pos1.z+1
	53	addGateNode(gateNodes,5,pos1)
	54	pos1.z=pos1.z-2
	55	addGateNode(gateNodes,6,pos1)
	56	pos1.z=pos1.z+1
	57	pos1.y=pos1.y+1
	58	addGateNode(gateNodes,7,pos1)
	59	pos1.z=pos1.z+1
	60	addGateNode(gateNodes,8,pos1)
	61	pos1.z=pos1.z-2
	62	addGateNode(gateNodes,9,pos1)
	63	end
	64	if dir==3 then
	65	addGateNode(gateNodes,1,pos1)
	66	pos1.z=pos1.z+1
	67	addGateNode(gateNodes,3,pos1)
	68	pos1.z=pos1.z-2
	69	addGateNode(gateNodes,2,pos1)
	70	pos1.z=pos1.z+1
	71	pos1.y=pos1.y+1
	72	addGateNode(gateNodes,4,pos1)
	73	pos1.z=pos1.z+1
	74	addGateNode(gateNodes,6,pos1)
	75	pos1.z=pos1.z-2
	76	addGateNode(gateNodes,5,pos1)
	77	pos1.z=pos1.z+1
	78	pos1.y=pos1.y+1
	79	addGateNode(gateNodes,7,pos1)
	80	pos1.z=pos1.z+1
	81	addGateNode(gateNodes,9,pos1)
	82	pos1.z=pos1.z-2
	83	addGateNode(gateNodes,8,pos1)
	84	end
	85	if dir==2 then
	86	addGateNode(gateNodes,1,pos1)
	87	pos1.x=pos1.x+1
	88	addGateNode(gateNodes,2,pos1)
	89	pos1.x=pos1.x-2
	90	addGateNode(gateNodes,3,pos1)
	91	pos1.x=pos1.x+1
	92	pos1.y=pos1.y+1
	93	addGateNode(gateNodes,4,pos1)
	94	pos1.x=pos1.x+1
	95	addGateNode(gateNodes,5,pos1)
	96	pos1.x=pos1.x-2
	97	addGateNode(gateNodes,6,pos1)
	98	pos1.x=pos1.x+1
	99	pos1.y=pos1.y+1
	100	addGateNode(gateNodes,7,pos1)
	101	pos1.x=pos1.x+1
	102	addGateNode(gateNodes,8,pos1)
	103	pos1.x=pos1.x-2
	104	addGateNode(gateNodes,9,pos1)
	105	end
	106	if dir==0 then
	107	addGateNode(gateNodes,1,pos1)
	108	pos1.x=pos1.x+1
	109	addGateNode(gateNodes,3,pos1)
	110	pos1.x=pos1.x-2
	111	addGateNode(gateNodes,2,pos1)
	112	pos1.x=pos1.x+1
	113	pos1.y=pos1.y+1
	114	addGateNode(gateNodes,4,pos1)
	115	pos1.x=pos1.x+1
	116	addGateNode(gateNodes,6,pos1)
	117	pos1.x=pos1.x-2
	118	addGateNode(gateNodes,5,pos1)
	119	pos1.x=pos1.x+1
	120	pos1.y=pos1.y+1
	121	addGateNode(gateNodes,7,pos1)
	122	pos1.x=pos1.x+1
	123	addGateNode(gateNodes,9,pos1)
	124	pos1.x=pos1.x-2
	125	addGateNode(gateNodes,8,pos1)
	126	end
	127	for i=1,9,1 do
	128	local node=minetest.env:get_node(gateNodes[i].pos)
	129	if node.name ~= "air" then return false end
	130	end
	131	minetest.env:set_node(gateNodes[1].pos,{name="stargate:gatenode8_off", param1=0, param2=dir})
	132	minetest.env:set_node(gateNodes[2].pos,{name="stargate:gatenode7_off", param1=0, param2=dir})
	133	minetest.env:set_node(gateNodes[3].pos,{name="stargate:gatenode9_off", param1=0, param2=dir})
	134	minetest.env:set_node(gateNodes[4].pos,{name="stargate:gatenode5_off", param1=0, param2=dir})
	135	minetest.env:set_node(gateNodes[5].pos,{name="stargate:gatenode4_off", param1=0, param2=dir})
	136	minetest.env:set_node(gateNodes[6].pos,{name="stargate:gatenode6_off", param1=0, param2=dir})
	137	minetest.env:set_node(gateNodes[7].pos,{name="stargate:gatenode2_off", param1=0, param2=dir})
	138	minetest.env:set_node(gateNodes[8].pos,{name="stargate:gatenode1_off", param1=0, param2=dir})
	139	minetest.env:set_node(gateNodes[9].pos,{name="stargate:gatenode3_off", param1=0, param2=dir})
	140	local meta = minetest.env:get_meta(gateNodes[1].pos)
	141	meta:set_string("infotext", "Stargate inactive\nOwned by: "..player_name)
	142	meta:set_string("gateNodes",minetest.serialize(gateNodes))
	143	meta:set_int("gateActive",0)
	144	meta:set_string("owner",player_name)
e7b7eb	145	meta:set_string("dont_destroy","false")
92c9f6	146	stargate.registerGate(player_name,gateNodes[1].pos,dir)
773382	147	return true
R	148	end
	149
	150	function removeGate (pos)
	151	local meta = minetest.env:get_meta(pos)
e7b7eb	152	if meta:get_string("dont_destroy") == "true" then return end
773382	153	local player_name=meta:get_string("owner")
R	154	local gateNodes=minetest.deserialize(meta:get_string("gateNodes"))
	155	for i=2,9,1 do
	156	minetest.env:remove_node(gateNodes[i].pos)
	157	end
	158	stargate.unregisterGate(player_name,gateNodes[1].pos)
	159	end
	160
	161	function activateGate (player,pos)
	162	local node = minetest.env:get_node(pos)
	163	local dir=node.param2
	164	local meta = minetest.env:get_meta(pos)
	165	local gateNodes=minetest.deserialize(meta:get_string("gateNodes"))
	166	meta:set_int("gateActive",1)
	167	meta:set_string("infotext", "Stargate active")
e7b7eb	168	meta:set_string("dont_destroy","true")
R	169	minetest.sound_play("gateOpen", {pos = pos, gain = 1.0,loop = false, max_hear_distance = 72,})
773382	170	swap_gate_node(gateNodes[1].pos,"stargate:gatenode8",dir)
R	171	swap_gate_node(gateNodes[2].pos,"stargate:gatenode7",dir)
	172	swap_gate_node(gateNodes[3].pos,"stargate:gatenode9",dir)
	173	swap_gate_node(gateNodes[4].pos,"stargate:gatenode5",dir)
	174	swap_gate_node(gateNodes[5].pos,"stargate:gatenode4",dir)
	175	swap_gate_node(gateNodes[6].pos,"stargate:gatenode6",dir)
	176	swap_gate_node(gateNodes[7].pos,"stargate:gatenode2",dir)
	177	swap_gate_node(gateNodes[8].pos,"stargate:gatenode1",dir)
	178	swap_gate_node(gateNodes[9].pos,"stargate:gatenode3",dir)
e7b7eb	179	meta:set_string("dont_destroy","false")
773382	180	end
R	181
	182	function deactivateGate (player,pos)
	183	local node = minetest.env:get_node(pos)
	184	local dir=node.param2
	185	local meta = minetest.env:get_meta(pos)
	186	local gateNodes=minetest.deserialize(meta:get_string("gateNodes"))
	187	meta:set_int("gateActive",0)
e7b7eb	188	meta:set_string("dont_destroy","true")
773382	189	meta:set_string("infotext", "Stargate inactive")
e7b7eb	190	minetest.sound_play("gateClose", {pos = pos, gain = 1.0,loop = false, max_hear_distance = 72,})
773382	191	swap_gate_node(gateNodes[1].pos,"stargate:gatenode8_off",dir)
R	192	swap_gate_node(gateNodes[2].pos,"stargate:gatenode7_off",dir)
	193	swap_gate_node(gateNodes[3].pos,"stargate:gatenode9_off",dir)
	194	swap_gate_node(gateNodes[4].pos,"stargate:gatenode5_off",dir)
	195	swap_gate_node(gateNodes[5].pos,"stargate:gatenode4_off",dir)
	196	swap_gate_node(gateNodes[6].pos,"stargate:gatenode6_off",dir)
	197	swap_gate_node(gateNodes[7].pos,"stargate:gatenode2_off",dir)
	198	swap_gate_node(gateNodes[8].pos,"stargate:gatenode1_off",dir)
	199	swap_gate_node(gateNodes[9].pos,"stargate:gatenode3_off",dir)
e7b7eb	200	meta:set_string("dont_destroy","false")
773382	201	end
R	202
	203	gateCanDig = function(pos,player)
	204	local player_name = player:get_player_name()
	205	local meta = minetest.env:get_meta(pos)
e7b7eb	206	if meta:get_string("dont_destroy") == "true" then return end
773382	207	local owner=meta:get_string("owner")
R	208	if player_name==owner then return true
	209	else return false end
	210	end
	211
	212	sg_selection_box = {
	213	type = "fixed",
	214	fixed={{-1.5,-0.5,-1/20,1.5,2.5,1/20},},
	215	}
	216	sg_selection_box_empty = {
	217	type = "fixed",
	218	fixed={},
	219	}
	220	sg_node_box = {
	221	type = "fixed",
	222	fixed={{-.5,-.5,0,.5,.5,0},},
	223	}
	224	sg_groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2,not_in_creative_inventory=1}
	225	sg_groups1 = {snappy=2,choppy=2,oddly_breakable_by_hand=2}
	226
	227	minetest.register_node("stargate:gatenode1",{
	228	description = "up1",
	229	tiles = {"default_cobble.png","default_cobble.png","default_cobble.png","default_cobble.png",
	230	{name="up3.png",animation={type="vertical_frames", aspect_w=16, aspect_h=16, length=1},},
	231	{name="up1.png",animation={type="vertical_frames", aspect_w=16, aspect_h=16, length=1},}},
	232	groups = sg_groups,
	233	paramtype2 = "facedir",
	234	paramtype = "light",
	235	light_source = 10,
	236	drawtype = "nodebox",
	237	selection_box = sg_selection_box_empty,
	238	node_box=sg_node_box,
	239	})
	240	minetest.register_node("stargate:gatenode2",{
	241	description = "up2",
	242	tiles = {"default_cobble.png","default_cobble.png","default_cobble.png","default_cobble.png",
	243	{name="up2.png",animation={type="vertical_frames", aspect_w=16, aspect_h=16, length=1},},
	244	{name="up2.png",animation={type="vertical_frames", aspect_w=16, aspect_h=16, length=1},}},
	245	groups = sg_groups,
	246	paramtype2 = "facedir",
	247	paramtype = "light",
	248	light_source = 10,
	249	drawtype = "nodebox",
	250	selection_box = sg_selection_box_empty,
	251	node_box=sg_node_box,
	252	})
	253
	254	minetest.register_node("stargate:gatenode3",{
	255	description = "up3",
	256	tiles = {"default_cobble.png","default_cobble.png","default_cobble.png","default_cobble.png",
	257	{name="up1.png",animation={type="vertical_frames", aspect_w=16, aspect_h=16, length=1},},
	258	{name="up3.png",animation={type="vertical_frames", aspect_w=16, aspect_h=16, length=1},}},
	259	groups = sg_groups,
	260	paramtype2 = "facedir",
	261	paramtype = "light",
	262	light_source = 10,
	263	drawtype = "nodebox",
	264	selection_box = sg_selection_box_empty,
	265	node_box=sg_node_box,
	266	})
	267
	268	minetest.register_node("stargate:gatenode4",{
	269	description = "mid1",
	270	tiles = {"default_cobble.png","default_cobble.png","default_cobble.png","default_cobble.png",
	271	{name="mid3.png",animation={type="vertical_frames", aspect_w=16, aspect_h=16, length=1},},
	272	{name="mid1.png",animation={type="vertical_frames", aspect_w=16, aspect_h=16, length=1},}},
	273	groups = sg_groups,
	274	paramtype2 = "facedir",
	275	paramtype = "light",
	276	light_source = 10,
	277	drawtype = "nodebox",
	278	selection_box = sg_selection_box_empty,
	279	node_box=sg_node_box,
	280	})
	281	minetest.register_node("stargate:gatenode5",{
	282	description = "mid2",
	283	tiles = {"default_cobble.png","default_cobble.png","default_cobble.png","default_cobble.png",
	284	{name="mid2.png",animation={type="vertical_frames", aspect_w=16, aspect_h=16, length=1},},
	285	{name="mid2.png",animation={type="vertical_frames", aspect_w=16, aspect_h=16, length=1},}},
	286	groups = sg_groups,
	287	paramtype2 = "facedir",
	288	paramtype = "light",
	289	light_source = 10,
	290	drawtype = "nodebox",
	291	selection_box = sg_selection_box_empty,
	292	node_box=sg_node_box,
	293	})
	294
	295	minetest.register_node("stargate:gatenode6",{
	296	description = "mid3",
	297	tiles = {"default_cobble.png","default_cobble.png","default_cobble.png","default_cobble.png",
	298	{name="mid1.png",animation={type="vertical_frames", aspect_w=16, aspect_h=16, length=1},},
	299	{name="mid3.png",animation={type="vertical_frames", aspect_w=16, aspect_h=16, length=1},}},
	300	groups = sg_groups,
	301	paramtype2 = "facedir",
	302	paramtype = "light",
	303	light_source = 10,
	304	drawtype = "nodebox",
	305	selection_box = sg_selection_box_empty,
	306	node_box=sg_node_box,
	307	})
	308
	309	minetest.register_node("stargate:gatenode7",{
	310	description = "down1",
	311	tiles = {"default_cobble.png","default_cobble.png","default_cobble.png","default_cobble.png",
	312	{name="down3.png",animation={type="vertical_frames", aspect_w=16, aspect_h=16, length=1},},
	313	{name="down1.png",animation={type="vertical_frames", aspect_w=16, aspect_h=16, length=1},}},
	314	groups = sg_groups,
	315	paramtype2 = "facedir",
	316	paramtype = "light",
	317	light_source = 10,
	318	drawtype = "nodebox",
	319	selection_box = sg_selection_box_empty,
	320	node_box=sg_node_box,
	321	})
	322
	323	minetest.register_node("stargate:gatenode8",{
	324	description = "down2",
	325	tiles = {"default_cobble.png","default_cobble.png","default_cobble.png","default_cobble.png",
	326	{name="down2.png",animation={type="vertical_frames", aspect_w=16, aspect_h=16, length=1},},
	327	{name="down2.png",animation={type="vertical_frames", aspect_w=16, aspect_h=16, length=1},}},
	328	groups = sg_groups,
	329	drop="stargate:gatenode8_off",
	330	paramtype2 = "facedir",
	331	paramtype = "light",
	332	light_source = 10,
	333	drawtype = "nodebox",
	334	selection_box = sg_selection_box,
	335	node_box=sg_node_box,
	336	can_dig = gateCanDig,
	337	on_destruct = function (pos)
	338	removeGate(pos)
	339	end,
e7b7eb	340	on_rightclick=stargate.gateFormspecHandler,
773382	341	})
R	342
	343	minetest.register_node("stargate:gatenode9",{
	344	description = "down3",
	345	tiles = {"default_cobble.png","default_cobble.png","default_cobble.png","default_cobble.png",
	346	{name="down1.png",animation={type="vertical_frames", aspect_w=16, aspect_h=16, length=1},},
	347	{name="down3.png",animation={type="vertical_frames", aspect_w=16, aspect_h=16, length=1},}},
	348	groups = sg_groups,
	349	paramtype2 = "facedir",
	350	paramtype = "light",
	351	light_source = 10,
	352	drawtype = "nodebox",
	353	selection_box = sg_selection_box_empty,
	354	node_box=sg_node_box,
	355	})
	356
	357	minetest.register_node("stargate:gatenode1_off",{
	358	description = "up1_off",
	359	tiles = {"default_cobble.png","default_cobble.png","default_cobble.png","default_cobble.png",
	360	"up3_off.png","up1_off.png"},
	361	groups = sg_groups,
	362	paramtype2 = "facedir",
	363	paramtype = "light",
	364	drawtype = "nodebox",
	365	selection_box = sg_selection_box_empty,
	366	node_box=sg_node_box,
	367	})
	368	minetest.register_node("stargate:gatenode2_off",{
	369	description = "up2_off",
	370	tiles = {"default_cobble.png","default_cobble.png","default_cobble.png","default_cobble.png",
	371	"up2_off.png","up2_off.png"},
	372	groups = sg_groups,
	373	paramtype2 = "facedir",
	374	paramtype = "light",
	375	drawtype = "nodebox",
	376	selection_box = sg_selection_box_empty,
	377	node_box=sg_node_box,
	378	})
	379
	380	minetest.register_node("stargate:gatenode3_off",{
	381	description = "up3_off",
	382	tiles = {"default_cobble.png","default_cobble.png","default_cobble.png","default_cobble.png",
	383	"up1_off.png","up3_off.png"},
	384	groups = sg_groups,
	385	paramtype2 = "facedir",
	386	paramtype = "light",
	387	drawtype = "nodebox",
	388	selection_box = sg_selection_box_empty,
	389	node_box=sg_node_box,
	390	})
	391
	392	minetest.register_node("stargate:gatenode4_off",{
	393	description = "mid1_off",
	394	tiles = {"default_cobble.png","default_cobble.png","default_cobble.png","default_cobble.png",
	395	"mid3_off.png","mid1_off.png"},
	396	groups = sg_groups,
	397	paramtype2 = "facedir",
	398	paramtype = "light",
	399	drawtype = "nodebox",
	400	selection_box = sg_selection_box_empty,
	401	node_box=sg_node_box,
	402	})
	403	minetest.register_node("stargate:gatenode5_off",{
	404	description = "mid2_off",
	405	tiles = {"default_cobble.png","default_cobble.png","default_cobble.png","default_cobble.png",
	406	"mid2_off.png","mid2_off.png"},
	407	groups = sg_groups,
	408	paramtype2 = "facedir",
	409	paramtype = "light",
	410	drawtype = "nodebox",
	411	selection_box = sg_selection_box_empty,
	412	node_box=sg_node_box,
	413	})
	414
	415	minetest.register_node("stargate:gatenode6_off",{
	416	description = "mid3_off",
	417	tiles = {"default_cobble.png","default_cobble.png","default_cobble.png","default_cobble.png",
	418	"mid1_off.png","mid3_off.png"},
	419	groups = sg_groups,
	420	paramtype2 = "facedir",
	421	paramtype = "light",
	422	drawtype = "nodebox",
	423	selection_box = sg_selection_box_empty,
	424	node_box=sg_node_box,
	425	})
	426
	427	minetest.register_node("stargate:gatenode7_off",{
	428	description = "down1_off",
	429	tiles = {"default_cobble.png","default_cobble.png","default_cobble.png","default_cobble.png",
	430	"down3_off.png","down1_off.png"},
	431	groups = sg_groups,
	432	paramtype2 = "facedir",
	433	paramtype = "light",
	434	drawtype = "nodebox",
	435	selection_box = sg_selection_box_empty,
	436	node_box=sg_node_box,
	437	})
	438
	439	--main gate node
	440	minetest.register_node("stargate:gatenode8_off",{
	441	description = "Stargate",
	442	inventory_image = "stargate.png",
	443	wield_image = "stargate.png",
	444	tiles = {"default_cobble.png","default_cobble.png","default_cobble.png","default_cobble.png",
	445	"down2_off.png","down2_off.png"},
	446	groups = sg_groups1,
	447	paramtype2 = "facedir",
	448	paramtype = "light",
	449	drawtype = "nodebox",
	450	selection_box = sg_selection_box,
	451	node_box=sg_node_box,
	452	can_dig = gateCanDig,
	453	on_destruct = function (pos)
	454	removeGate(pos)
	455	end,
	456	on_place = function(itemstack, placer, pointed_thing)
	457	local pos = pointed_thing.above
	458	if placeGate(placer,pos)==true then
	459	itemstack:take_item(1)
	460	return itemstack
	461	else
	462	return
	463	end
	464	end,
	465	on_rightclick=stargate.gateFormspecHandler,
	466	})
	467
	468	minetest.register_node("stargate:gatenode9_off",{
	469	description = "down3_off",
	470	tiles = {"default_cobble.png","default_cobble.png","default_cobble.png","default_cobble.png",
	471	"down1_off.png","down3_off.png"},
	472	groups = sg_groups,
	473	paramtype2 = "facedir",
	474	paramtype = "light",
	475	drawtype = "nodebox",
	476	selection_box = sg_selection_box_empty,
	477	node_box=sg_node_box,
	478	})
92c9f6	479
R	480	minetest.register_abm({
	481	nodenames = {"stargate:gatenode8"},
	482	interval = 1,
	483	chance = 1,
	484	action = function(pos, node, active_object_count, active_object_count_wider)
	485	local meta = minetest.env:get_meta(pos)
	486	for _,object in ipairs(minetest.env:get_objects_inside_radius(pos, 1)) do
	487	if object:is_player() then
	488	local player_name = object:get_player_name()
	489	local gate=stargate.getCurrentGate (player_name,pos)
	490	local pos1={}
	491	pos1.x=gate["destination"].x
	492	pos1.y=gate["destination"].y
	493	pos1.z=gate["destination"].z
	494	local dir1=gate["destination_dir"]
	495	local dir=minetest.dir_to_facedir(object:get_look_dir())
	496	if dir1 == 0 then
	497	pos1.z=pos1.z+2
	498	elseif dir1 == 1 then
	499	pos1.x=pos1.x+2
	500	elseif dir1 == 2 then
	501	pos1.z=pos1.z-2
	502	elseif dir1 == 3 then
	503	pos1.x=pos1.x-2
	504	end
	505	object:moveto(pos1,true)
	506	print(dump(gate["dest"]))
	507	minetest.sound_play("enterEventHorizon", {pos = pos, gain = 1.0,loop = false, max_hear_distance = 72,})
	508
	509	end
	510	end
	511	end
	512	})