a guest Jan 25th, 2012 125 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
- newCellAt: i at: j
- "Create one cell for position i@j, initialize it and display it on screen on right position. Answers cell itself."
- | c origin |
- c := LOCell new.
- origin := self innerBounds origin.
- self addMorph: c.
- c position: ((i - 1)*c width)@((j - 1)*c height) + origin.
- c mouseAction: [self toggleNeighboursOfCellAt: i at: j].
RAW Paste Data