1-- Copyright (C) 2007, 2010 - Bit-Blot
2--
3-- This file is part of Aquaria.
4--
5-- Aquaria is free software; you can redistribute it and/or
6-- modify it under the terms of the GNU General Public License
7-- as published by the Free Software Foundation; either version 2
8-- of the License, or (at your option) any later version.
9--
10-- This program is distributed in the hope that it will be useful,
11-- but WITHOUT ANY WARRANTY; without even the implied warranty of
12-- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
13--
14-- See the GNU General Public License for more details.
15--
16-- You should have received a copy of the GNU General Public License
17-- along with this program; if not, write to the Free Software
18-- Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
19
20if not v then v = {} end
21if not AQUARIA_VERSION then dofile("scripts/entities/entityinclude.lua") end
22
23function init(me)
24	node_setCursorActivation(me, true)
25end
26
27function update(me, dt)
28end
29
30function activate(me)
31	local n = getNaija()
32
33	entity_idle(n)
34
35	entity_swimToNode(n, me)
36	entity_watchForPath(n)
37
38	entity_animate(n, "sitThrone")
39
40	overrideZoom(0.5, 2)
41
42	watch(2)
43
44	while (not isLeftMouse()) and (not isRightMouse()) do
45		watch(FRAME_TIME)
46	end
47
48	entity_idle(n)
49	entity_addVel(n, 0, -200)
50	overrideZoom(1, 1)
51	watch(1)
52	overrideZoom(0)
53end
54