anpc-dev/sample.lua at main · hkzorman/anpc-dev · GitHub

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


-- Sample programs for anpc

-- Stupid program that walks on a square
npc.proc.register_program("sample:silly_square", {
	{name = "npc:for", args = {
		initial_value = 0,
		step_increase = 2,
		expr = {left="@local.for_index", op="<=", right=6},
		loop_instructions = {
			{name = "npc:move:walk", args = {dir = "@local.for_index"}}
		}
	}}
})

npc.proc.register_program("sample:silly_initialization", {
	{key = "nodes", name = "npc:env:node:find", args = {
		radius = "@args.radius",
		nodenames = "@args.nodes"
	}},
	{name = "npc:if", args = {
		expr = function(self, args)
			return #self.data.proc[self.process.current.id].nodes > 0
		end,
		true_instructions = {
			{name = "npc:for", args = {
				initial_value = 1,
				step_increase = 1,
				expr = {
					left = "@local.for_index",
					op   = "<",
					right = function(self, args)
						return #self.data.proc[self.process.current.id].nodes
					end
				},
				loop_instructions = {
					{key = "is_owned", name = "npc:env:node:is_owner", args = {
						pos = function(self, args)
							return self.data.proc[self.process.current.id].nodes[self.data.proc[self.process.current.id].for_index]
						end
					}},
					{name = "npc:if", args = {
						expr = {
							left = "@local.is_owned",
							op   = "==",
							right = nil
						},
						true_instructions = {
							{name = "npc:env:node:set_owned", args = {
								pos = function(self, args)
									return self.data.proc[self.process.current.id].nodes[self.data.proc[self.process.current.id].for_index]
								end,
								value=true
							}},
							{name = "npc:break"}
						},
					}}
				}
			}}
		}
	}}
})

-- Some sample objects
minetest.register_craftitem("anpc:npc_walker", {
	description = "Walker",
	inventory_image = "default_apple.png",
	on_use = function(itemstack, user, pointed_thing)
		if pointed_thing.type == "object" then
			local target_pos = minetest.find_node_near(user:get_pos(), 25, {"default:chest"})
			npc.proc.execute_program(pointed_thing.ref:get_luaentity(), "builtin:walk_to_pos", {end_pos = target_pos})
		end
	end
})

minetest.register_craftitem("anpc:npc_querier", {
	description = "Querier",
	inventory_image = "default_apple.png",
	on_use = function(itemstack, user, pointed_thing)
		if pointed_thing.type == "object" then
			--local target_pos = minetest.find_node_near(user:get_pos(), 25, {"default:chest"})
			npc.proc.set_state_process(pointed_thing.ref:get_luaentity(), "builtin:node_query", {
				radius = 5,
				nodes = {
					"default:chest"
				}
			})
			minetest.log(dump(pointed_thing.ref:get_luaentity()))
		end
	end
})