Object Oriented Programming in Bascom - Versionsgeschichte

Mat: /* Index */

2023-11-05T16:51:26Z

‎Index

2023-11-05T16:43:48Z

‎Single linked list

2023-11-05T16:40:21Z

‎Download

2023-11-04T16:30:19Z

‎Examples

2020-12-21T08:59:35Z

‎Inheritance and Polymorphism

2020-12-16T01:57:12Z

2020-12-09T02:16:13Z

‎Defining an Object

2020-12-09T02:15:33Z

‎Defining an Object

2019-07-15T02:46:44Z

‎Examples

2019-07-14T04:14:35Z

← Nächstältere Version		Version vom 5. November 2023, 16:51 Uhr
Zeile 5:		Zeile 5:
	* [[Bascom Precompiler\|''[OOP 3/3] Bascom-Precompiler'']]		* [[Bascom Precompiler\|''[OOP 3/3] Bascom-Precompiler'']]

		+
		+	* [https://www.mcselec.com/index2.php?option=com_forum&Itemid=59&page=viewtopic&p=83584#83584 Forum thread]

	== Object as collection of data ==		== Object as collection of data ==

@@ Zeile 276: / Zeile 276: @@
-The same application implemented in Bascom:
+The same application implemented in Bascom (runs in the simulator):
 <pre>$regfile = "m32def.dat"
 $crystal = 16000000
@@ Zeile 517: / Zeile 517: @@
     Print "----------------------------------"
 Loop</pre>
 === Real world example: Semaphore implementation from Chronos ===

← Nächstältere Version		Version vom 5. November 2023, 16:40 Uhr
Zeile 728:		Zeile 728:
	== Download ==		== Download ==

−	[~~[Bascom OOP~~ & Precompiler ~~Download]~~]	+	* [http://www.braunecker.at/downloads/memory-allocators/memory-allocators-1-0.zip Memory Allocators & Precompiler Package 1.0]

@@ Zeile 189: / Zeile 189: @@
 == Examples ==
 === Single linked list ===
 In this example, the user enters an arbitrary amount of strings into the console which are stored in a linked list. When completed, every second entry is deleted and the list is printed out again.

@@ Zeile 180: / Zeile 180: @@
 Setword Emailobject, Person_birth_year, Tempword
 Tempstring = "joe@thedoes.com"
-Setword Streetobject, Email_address_email, Tempstring
+Setword Emailobject, Email_address_email, Tempstring
 ' ...

@@ Zeile 88: / Zeile 88: @@
-Translated to Bascom, the sub needs to know which object it manipulates, by passing the object reference:
+Translated to Bascom, the sub needs to know which object it manipulates, by passing it the object reference:
 <pre>Sub Print_info(byref Object As Word)
     Local Name As String * 30
@@ Zeile 104: / Zeile 104: @@
 The pseudocode-application is enhanced to manage two kinds of personal data connected to a person: one type consisting of address fields (street, city, state, ...), the other of email addresses.
 Since both of them still should have the same data as the person object from before, the field definitions could be copied to the second type.
-Instead, the person object could be extended by either the additional street address data or email address data (the abstracted objects inherits the base object):
+Instead, the person object could be extended by either the additional street address data or email address data (the abstracted objects inherit the base object):
 <pre>Object Person
     Name As String(30)

@@ Zeile 19: / Zeile 19: @@
 The member fields therefore have a fixed memory layout, the member's positions could be defined like this:
 <pre>Const Person_name = 0                 ' Name string is starting at position 0
-Const Person_birth_year = 30          ' year of birth is stored at position 30 (30 bytes string data + 0 terminator
+Const Person_birth_year = 31          ' year of birth is stored at position 31 (30 bytes string data + 0 terminator
-Const Person_height_cm = 32           ' adding 2 bytes of previous field (word)
+Const Person_height_cm = 33           ' adding 2 bytes of previous field (word)
-Const Person_object_size = 33         ' needing a total of 34 bytes</pre>
+Const Person_object_size = 34         ' needing a total of 34 bytes</pre>

@@ Zeile 365: / Zeile 365: @@
 ' reference to the first object in the list
 Dim List_head As Word
 Dim Text As String * 50
@@ Zeile 594: / Zeile 722: @@
 End Sub
 '******** **********************************************************************</pre>
 == Download ==
 [[Bascom OOP & Precompiler Download]]

@@ Zeile 1: / Zeile 1: @@
 == Object as collection of data ==
 === Defining an Object ===
@@ Zeile 587: / Zeile 594: @@
 End Sub
 '******** **********************************************************************</pre>