/ld28

To get this branch, use:
bzr branch http://9ix.org/bzr/ld28

« back to all changes in this revision

Viewing changes to goal_person.lua

  • Committer: Josh C
  • Date: 2013-12-15 02:20:51 UTC
  • Revision ID: josh@9ix.org-20131215022051-kyqldojzgu2xxcg8
moving goal, clones turning green...

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
 
GoalPerson = Tile:extend {
2
 
   image = 'data/goal.png',
3
 
   onNew = function(self)
4
 
              self.direction = dirs[math.random(1,4)]
5
 
           end,
6
 
   doMove = function(self)
7
 
               if math.random(1,4) ~= 1 then -- take a step ~2/3
8
 
                  if math.random(1,4) == 1 then -- change direction ~25%
9
 
                     self.direction = dirs[math.random(1,4)]
10
 
                  end
11
 
 
12
 
                  if self.direction == 'left' then
13
 
                     self.x = self.x - self.width
14
 
                  elseif self.direction == 'right' then
15
 
                     self.x = self.x + self.width
16
 
                  elseif self.direction == 'up' then
17
 
                     self.y = self.y - self.height
18
 
                  elseif self.direction == 'down' then
19
 
                     self.y = self.y + self.height
20
 
                  end
21
 
               end
22
 
            end,
23
 
   onCollide = function(self, other)
24
 
                  if other ~= the.view.map then
25
 
                     --print('collision')
26
 
 
27
 
                     other:displaceDir(self,
28
 
                                       util.dirToXY(self.direction),
29
 
                                       - util.dirToPosNeg(self.direction))
30
 
                  end
31
 
 
32
 
                  if other == the.player then
33
 
                     if the.view.level == 1 or the.view.level ==2 then
34
 
                        the.player.active = false
35
 
                        the.view:fade({0,0,0}):andThen(function()
36
 
                          the.app.view = SlowView:new {
37
 
                             level = the.view.level + 1
38
 
                          }
39
 
                       end)
40
 
                     elseif the.view.level == 3 then
41
 
                        the.app.view = WinView:new()
42
 
                     else
43
 
                        error('where did you find another level?')
44
 
                     end
45
 
                  end
46
 
               end
47
 
}
 
 
b'\\ No newline at end of file'