/ld28

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

« back to all changes in this revision

Viewing changes to clone.lua

  • Committer: Josh C
  • Date: 2013-12-15 02:53:51 UTC
  • Revision ID: josh@9ix.org-20131215025351-g6jn442ybabnegsf
clones turning into fake goals

Show diffs side-by-side

added added

removed removed

Lines of Context:
clone.lua
1
 
NotPlayer = Fill:extend {
2
 
   fill = {255,0,0},
3
 
   width = 16, height = 16,
4
 
   queue = deque.new(),
 
1
Clone = Tile:extend {
 
2
   image = 'data/player.png',
 
3
   onNew = function(self)
 
4
              self.direction = dirs[math.random(1,4)]
 
5
           end,
5
6
   doMove = function(self)
6
 
               local dir = math.random(1,5)
 
7
               if math.random(1,4) == 1 then -- change direction ~25%
 
8
                  self.direction = dirs[math.random(1,4)]
 
9
               end
7
10
 
8
 
               if dir == 1 then
 
11
               if self.direction == 'left' then
9
12
                  self.x = self.x - self.width
10
 
               elseif dir == 2 then
 
13
               elseif self.direction == 'right' then
11
14
                  self.x = self.x + self.width
12
 
               elseif dir == 3 then
 
15
               elseif self.direction == 'up' then
13
16
                  self.y = self.y - self.height
14
 
               elseif dir == 4 then
 
17
               elseif self.direction == 'down' then
15
18
                  self.y = self.y + self.height
16
19
               end
17
 
            end
 
20
            end,
 
21
   onCollide = function(self, other)
 
22
                  if other ~= the.view.map then
 
23
                     --print('collision')
 
24
 
 
25
                     other:displaceDir(self,
 
26
                                       util.dirToXY(self.direction),
 
27
                                       - util.dirToPosNeg(self.direction))
 
28
                  end
 
29
 
 
30
                  if other == the.player then
 
31
                     self.image = 'data/player.png'
 
32
                  end
 
33
               end
18
34
}
 
 
b'\\ No newline at end of file'