| changeset 4093 | 70945af0d7e1 |
| parent 4077 | e7d838d063a4 |
| child 4094 | 8bb301767c9f |
| 4092:bf13068194b3 | 4093:70945af0d7e1 |
|---|---|
95 lx:= lx + dx; |
95 lx:= lx + dx; |
96 ly:= ly + dy |
96 ly:= ly + dy |
97 end; |
97 end; |
98 |
98 |
99 // add hog's position |
99 // add hog's position |
100 lx:= lx + ox; |
100 lx:= lx + ox - WorldDx; |
101 ly:= ly + oy; |
101 ly:= ly + ox - WorldDy; |
102 |
102 |
103 // decrease number of iterations required |
103 // decrease number of iterations required |
104 ax:= dx * 4; |
104 ax:= dx * 4; |
105 ay:= dy * 4; |
105 ay:= dy * 4; |
106 |
106 |