mirror of
https://github.com/KevinMidboe/linguist.git
synced 2025-10-29 09:40:21 +00:00
22 lines
618 B
Plaintext
22 lines
618 B
Plaintext
# from
|
|
# http://wiki.erights.org/wiki/Walnut/Ordinary_Programming/Objects_and_Functions
|
|
def makeCar(var name) {
|
|
var x := 0
|
|
var y := 0
|
|
def car {
|
|
to moveTo(newX,newY) {
|
|
x := newX
|
|
y := newY
|
|
}
|
|
to getX() {return x}
|
|
to getY() {return y}
|
|
to setName(newName) {name := newName}
|
|
to getName() {return name}
|
|
}
|
|
return car
|
|
}
|
|
# Now use the makeCar function to make a car, which we will move and print
|
|
def sportsCar := makeCar("Ferrari")
|
|
sportsCar.moveTo(10,20)
|
|
println(`The car ${sportsCar.getName()} is at X location ${sportsCar.getX()}`)
|