30 lines
908 B
Text
30 lines
908 B
Text
bike: object [
|
|
frame-material: "aluminium"
|
|
wheel-size: 29
|
|
color: "black"
|
|
set-color: func [value][color: value]
|
|
]
|
|
|
|
e-bike: make bike [
|
|
motor-type: "brushless"
|
|
]
|
|
print ["e-bike/frame-material : " e-bike/frame-material]
|
|
print ["e-bike/motor-type : " e-bike/motor-type]
|
|
|
|
|
|
mountain-bike: make bike [
|
|
fork-stroke: 150
|
|
]
|
|
|
|
green-mountain-bike: copy mountain-bike
|
|
green-mountain-bike/set-color "green"
|
|
|
|
print ["green-mountain-bike/wheel-size : " green-mountain-bike/wheel-size]
|
|
print ["green-mountain-bike/fork-stroke : " green-mountain-bike/fork-stroke]
|
|
print ["green-mountain-bike/color : " green-mountain-bike/color]
|
|
|
|
default-mountain-bike: copy mountain-bike
|
|
|
|
print ["default-mountain-bike/wheel-size : " default-mountain-bike/wheel-size]
|
|
print ["default-mountain-bike/fork-stroke : " default-mountain-bike/fork-stroke]
|
|
print ["default-mountain-bike/color : " default-mountain-bike/color]
|