CHAP13 TXT+

FILE INFORMATION

FILENAME(S): CHAP13 TXT+

FILE TYPE(S): DEL

FILE SIZE: 1.2K

FIRST SEEN: 2025-10-20 14:32:03

APPEARS ON: 1 disk(s)

FILE HASH

42fb386a560abb16c44edf386b62d9ba4d933c1297cf274e7131096d359c408c

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
P K 1	CHAP13 TXT+	DEL	Treasure Chest - Klaus Der Suhler	16	11	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 63 61 6E 20 62 65 20 6F  66 20 61 6E 79 20 70 72  |can be of any pr|
00000010: 65 64 65 66 69 6E 65 64  20 64 61 74 61 20 20 74  |edefined data  t|
00000020: 79 70 65 2C 20 0D 0D 20  20 20 20 20 20 20 20 69  |ype, ..        i|
00000030: 6E 63 6C 75 64 69 6E 67  20 20 6F 74 68 65 72 20  |ncluding  other |
00000040: 72 65 63 6F 72 64 73 2E  20 20 20 52 61 74 68 65  |records.   Rathe|
00000050: 72 20 74 68 61 6E 20 73  70 65 6E 64 20 74 69 6D  |r than spend tim|
00000060: 65 20 74 72 79 69 6E 67  20 74 6F 20 0D 0D 20 20  |e trying to ..  |
00000070: 20 20 20 20 20 20 64 65  66 69 6E 65 20 20 61 20  |      define  a |
00000080: 20 72 65 63 6F 72 64 20  20 69 6E 20 64 65 74 61  | record  in deta|
00000090: 69 6C 2C 20 20 6C 65 74  73 20 67 6F 20 72 69 67  |il,  lets go rig|
000000A0: 68 74 20 20 74 6F 20 20  74 68 65 20 20 66 69 72  |ht  to  the  fir|
000000B0: 73 74 20 0D 0D 20 20 20  20 20 20 20 20 65 78 61  |st ..        exa|
000000C0: 6D 70 6C 65 20 70 72 6F  67 72 61 6D 2C 20 53 4D  |mple program, SM|
000000D0: 41 4C 4C 52 45 43 2E 20  20 54 68 69 73 20 69 73  |ALLREC.  This is|
000000E0: 20 61 20 70 72 6F 67 72  61 6D 20 75 73 69 6E 67  | a program using|
000000F0: 20 6E 6F 6E 73 65 6E 73  65 20 0D 0D 20 20 20 20  | nonsense ..    |
00000100: 20 20 20 20 64 61 74 61  20 74 68 61 74 20 77 69  |    data that wi|
00000110: 6C 6C 20 69 6C 6C 75 73  74 72 61 74 65 20 74 68  |ll illustrate th|
00000120: 65 20 75 73 65 20 6F 66  20 61 20 72 65 63 6F 72  |e use of a recor|
00000130: 64 2E 0D 0D 20 20 20 20  20 20 20 20 20 20 20 20  |d...            |
00000140: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 41  |               A|
00000150: 20 56 45 52 59 20 53 49  4D 50 4C 45 20 52 45 43  | VERY SIMPLE REC|
00000160: 4F 52 44 0D 0D 20 20 20  20 20 20 20 20 20 20 20  |ORD..           |
00000170: 20 54 68 65 72 65 20 69  73 20 6F 6E 6C 79 20 6F  | There is only o|
00000180: 6E 65 20 65 6E 74 72 79  20 69 6E 20 74 68 65 20  |ne entry in the |
00000190: 54 59 50 45 20 64 65 63  6C 61 72 61 74 69 6F 6E  |TYPE declaration|
000001A0: 20 70 61 72 74 20 20 6F  66 20 0D 0D 20 20 20 20  | part  of ..    |
000001B0: 20 20 20 20 74 68 65 20  70 72 6F 67 72 61 6D 2C  |    the program,|
000001C0: 20 20 6E 61 6D 65 6C 79  20 74 68 65 20 72 65 63  |  namely the rec|
000001D0: 6F 72 64 20 69 64 65 6E  74 69 66 69 65 64 20 62  |ord identified b|
000001E0: 79 20 22 64 65 73 63 72  69 70 74 69 6F 6E 22 2E  |y "description".|
000001F0: 20 20 0D 0D 20 20 20 20  20 20 20 20 54 68 65 20  |  ..        The |
00000200: 72 65 63 6F 72 64 20 69  73 20 63 6F 6D 70 6F 73  |record is compos|
00000210: 65 64 20 6F 66 20 74 68  72 65 65 20 66 69 65 6C  |ed of three fiel|
00000220: 64 73 2C 20 74 68 65 20  22 79 65 61 72 22 2C 20  |ds, the "year", |
00000230: 22 6D 6F 64 65 6C 22 2C  20 0D 0D 20 20 20 20 20  |"model", ..     |
00000240: 20 20 20 61 6E 64 20 20  22 65 6E 67 69 6E 65 22  |   and  "engine"|
00000250: 20 76 61 72 69 61 62 6C  65 73 2E 20 20 20 4E 6F  | variables.   No|
00000260: 74 69 63 65 20 74 68 61  74 20 74 68 65 20 74 68  |tice that the th|
00000270: 72 65 65 20 66 69 65 6C  64 73 20 20 61 72 65 20  |ree fields  are |
00000280: 0D 0D 20 20 20 20 20 20  20 20 65 61 63 68 20 6F  |..        each o|
00000290: 66 20 61 20 64 69 66 66  65 72 65 6E 74 20 74 79  |f a different ty|
000002A0: 70 65 2C 20 20 69 6E 64  69 63 61 74 69 6E 67 20  |pe,  indicating |
000002B0: 74 68 61 74 20 74 68 65  20 72 65 63 6F 72 64 20  |that the record |
000002C0: 63 61 6E 20 62 65 20 0D  0D 20 20 20 20 20 20 20  |can be ..       |
000002D0: 20 6F 66 20 20 6D 69 78  65 64 20 74 79 70 65 73  | of  mixed types|
000002E0: 2E 20 20 20 59 6F 75 20  68 61 76 65 20 61 20 63  |.   You have a c|
000002F0: 6F 6D 70 6C 65 74 65 20  65 78 61 6D 70 6C 65 20  |omplete example |
00000300: 6F 66 20 74 68 65 20 77  61 79 20 20 61 20 0D 0D  |of the way  a ..|
00000310: 20 20 20 20 20 20 20 20  72 65 63 6F 72 64 20 20  |        record  |
00000320: 69 73 20 20 64 65 66 69  6E 65 64 20 20 62 65 66  |is  defined  bef|
00000330: 6F 72 65 20 20 79 6F 75  2E 20 20 20 49 74 20 69  |ore  you.   It i|
00000340: 73 20 20 63 6F 6D 70 6F  73 65 64 20 20 6F 66 20  |s  composed  of |
00000350: 20 74 68 65 20 0D 0D 20  20 20 20 20 20 20 20 69  | the ..        i|
00000360: 64 65 6E 74 69 66 69 65  72 20 28 22 64 65 73 63  |dentifier ("desc|
00000370: 72 69 70 74 69 6F 6E 22  29 2C 20 20 74 68 65 20  |ription"),  the |
00000380: 72 65 73 65 72 76 65 64  20 77 6F 72 64 20 20 52  |reserved word  R|
00000390: 45 43 4F 52 44 2C 20 20  74 68 65 20 0D 0D 20 20  |ECORD,  the ..  |
000003A0: 20 20 20 20 20 20 6C 69  73 74 20 6F 66 20 65 6C  |      list of el|
000003B0: 65 6D 65 6E 74 73 2C 20  20 61 6E 64 20 66 6F 6C  |ements,  and fol|
000003C0: 6C 6F 77 65 64 20 62 79  20 45 4E 44 3B 2E 20 20  |lowed by END;.  |
000003D0: 54 68 69 73 20 69 73 20  6F 6E 65 20 6F 66 20 74  |This is one of t|
000003E0: 68 65 20 0D 0D 20 20 20  20 20 20 20 20 70 6C 61  |he ..        pla|
000003F0: 63 65 73 20 20 20 69 6E  20 20 20 50 61 73 63 61  |ces   in   Pasca|
00000400: 6C 20 20 77 68 65 72 65  20 20 61 6E 20 20 45 4E  |l  where  an  EN|
00000410: 44 20 20 69 73 20 20 75  73 65 64 20 20 20 77 69  |D  is  used   wi|
00000420: 74 68 6F 75 74 20 20 20  61 20 0D 0D 20 20 20 20  |thout   a ..    |
00000430: 20 20 20 20 63 6F 72 72  65 73 70 6F 6E 64 69 6E  |    correspondin|
00000440: 67 20 42 45 47 49 4E 2E  20 20 20 4E 6F 74 69 63  |g BEGIN.   Notic|
00000450: 65 20 74 68 61 74 20 74  68 69 73 20 6F 6E 6C 79  |e that this only|
00000460: 20 64 65 66 69 6E 65 73  20 61 20 54 59 50 45 2C  | defines a TYPE,|
00000470: 20 0D 0D 20 20 20 20 20  20 20 20 69 74 20 20 64  | ..        it  d|
00000480: 6F 65 73 20 6E 6F 74 20  64 65 66 69 6E 65 20 61  |oes not define a|
00000490: 6E 79 20 76 61 72 69 61  62 6C 65 73 2E 20 20 20  |ny variables.   |
000004A0: 54 68 61 74 20 69 73 20  64 6F 6E 65 20 69 6E 20  |That is done in |
000004B0: 74 68 65 20 56 41 52 20  0D                       |the VAR .       |

CAN BE OF ANY PREDEFINED DATA  TYPE, .. 
       INCLUDING  OTHER RECORDS.   RATHE
R THAN SPEND TIME TRYING TO ..        DE
FINE  A  RECORD  IN DETAIL,  LETS GO RIG
HT  TO  THE  FIRST ..        EXAMPLE PRO
GRAM, SMALLREC.  THIS IS A PROGRAM USING
 NONSENSE ..        DATA THAT WILL ILLUS
TRATE THE USE OF A RECORD...            
               A VERY SIMPLE RECORD..   
         THERE IS ONLY ONE ENTRY IN THE 
TYPE DECLARATION PART  OF ..        THE 
PROGRAM,  NAMELY THE RECORD IDENTIFIED B
Y "DESCRIPTION".  ..        THE RECORD I
S COMPOSED OF THREE FIELDS, THE "YEAR", 
"MODEL", ..        AND  "ENGINE" VARIABL
ES.   NOTICE THAT THE THREE FIELDS  ARE 
..        EACH OF A DIFFERENT TYPE,  IND
ICATING THAT THE RECORD CAN BE ..       
 OF  MIXED TYPES.   YOU HAVE A COMPLETE 
EXAMPLE OF THE WAY  A ..        RECORD  
IS  DEFINED  BEFORE  YOU.   IT IS  COMPO
SED  OF  THE ..        IDENTIFIER ("DESC
RIPTION"),  THE RESERVED WORD  RECORD,  
THE ..        LIST OF ELEMENTS,  AND FOL
LOWED BY END;.  THIS IS ONE OF THE ..   
     PLACES   IN   PASCAL  WHERE  AN  EN
D  IS  USED   WITHOUT   A ..        CORR
ESPONDING BEGIN.   NOTICE THAT THIS ONLY
 DEFINES A TYPE, ..        IT  DOES NOT 
DEFINE ANY VARIABLES.   THAT IS DONE IN 
THE VAR .

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL