Mushroom Object clone Mushroom isPoison false Mushroom whenEaten metho

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
Mushroom := Object clone
Mushroom isPoison := false
Mushroom whenEaten := method(person,
self isPoison ifTrue(
person kill
)
)
Man := Object clone
Man state := "Living"
Man eat := method(food,
food whenEaten(self)
)
Man kill := method(
self state := "Dead"
)
Lenin := Mushroom clone
Lenin isPoison := false
Lenin speak := method(
"Патриотизм - одно из наиболее глубоких чувств,
закрепленных веками и тысячелетиями обособленных отечеств." println
)
Man eat(Lenin)