Object-Orientedness

My Mitsubishi car (ABC123) has four wheels: 0=>'fr',1=>'fl',2=>'rr',3=>'rl'
Variables in class "myCar" are [function,make,wheel,rego]
showMake: I said, myCar is a Mitsubishi.

dumpCar
This is my car
this=[myCar]
varlist=[0=>'function',1=>'make',2=>'wheel',3=>'rego']
0:this%function is [new=>'car',show=>'showMake',display=>'dumpCar']
1:this%make is [=>'Mitsubishi']
2:this%wheel is [0=>'fr',1=>'fl',2=>'rr',3=>'rl']
3:this%rego is [=>'ABC123']

dumpCar
After setRego
this=[myCar]
varlist=[0=>'function',1=>'make',2=>'wheel',3=>'rego']
0:this%function is [new=>'car',show=>'showMake',display=>'dumpCar']
1:this%make is [=>'Mitsubishi']
2:this%wheel is [0=>'fr',1=>'fl',2=>'rr',3=>'rl']
3:this%rego is [=>'XYZ987']

My Boeing plane has two wings: 0=>'left',1=>'right'
Variables in class "myPlane" are [function,make,wing]
showMake: I would say, myPlane is a Boeing.

dumpPlane
This is my plane
this=[myPlane]
varlist=[0=>'function',1=>'make',2=>'wing']
0:this%function is [new=>'plane',show=>'showMake',display=>'dumpPlane']
1:this%make is [=>'Boeing']
2:this%wing is [0=>'left',1=>'right']

// The parent class
function vehicle
{
//display "vehicle: arg%function=[{arg%function|list}] \n";
//display "vehicle: class%list:this=[{class%list:this}] \n";
	var this%make = "(var)arg%m";
	var this%function:show = "showMake";
}

function showMake
{
	display "showMake: {arg%lead}{arg%this} is a {this%make}. \n";
}

// The first child class
function car
{
//display "car: arg%function=[{arg%function|list}] \n";
//display "car: class%list:this=[{class%list:this}] \n";
	this%vehicle m="{arg%m}";
	var this%wheel = "(var)arg%w";
	var this%rego = "(var)arg%r";
	var this%function:display = "dumpCar";
}

function dumpCar
{
	display "<hr>\n";
	display "dumpCar \n";
	display "{arg%title} \n";
	display "this=[{arg%this}] \n";
	var varlist = "(array){class%list:this}";
	display "varlist=[{varlist|list}] \n";
	foreach (varlist)
	{
		display "{foreach:key}:this%{foreach} is [{this%{foreach}|list}] \n";
	}
	display "<hr>\n";
}

function setRego
{
	var this%rego = {arg%r};
}

var myCar% = new car m="Mitsubishi" w="(array)fr, fl, rr, rl" r="ABC123";

display "My {myCar%make} car ({myCar%rego}) has four wheels: {myCar%wheel|list} \n";
display 'Variables in class "myCar" are [{class%list:myCar}] \n';

myCar%show lead="I said, ";

myCar%display title="This is my car";
myCar%setRego r="XYZ987";
myCar%display title="After setRego";

// The second child class
function plane
{
//display "plane: arg%function=[{arg%function|list}] \n";
//display "plane: class%list:this=[{class%list:this}] \n";
	this%vehicle m="{arg%m}";
	var this%wing = "(var)arg%w";
	var this%function:display = "dumpPlane";
}

function dumpPlane
{
	display "<hr>\n";
	display "dumpPlane \n";
	display "{arg%title} \n";
	display "this=[{arg%this}] \n";
	var varlist = "(array){class%list:this}";
	display "varlist=[{varlist|list}] \n";
	foreach (varlist)
	{
		display "{foreach:key}:this%{foreach} is [{this%{foreach}|list}] \n";
	}
	display "<hr>\n";
}

var myPlane% = new plane m="Boeing" w="(array)left, right";

display "My {myPlane%make} plane has two wings: {myPlane%wing|list} \n";
display 'Variables in class "myPlane" are [{class%list:myPlane}] \n';

myPlane%show lead="I would say, ";

myPlane%display title="This is my plane";
</script>

Back home