LEKTION4
FILE INFORMATION
FILENAME(S): LEKTION4
FILE TYPE(S): SEQ
FILE SIZE: 5.3K
FIRST SEEN: 2025-11-02 22:11:06
APPEARS ON: 1 disk(s)
FILE HASH
9ebf72ef9e246a9fe688e877dbf8ad3a4b0f417a3f8b0b596d1b67a99cf5358d
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| COMMODORE DISC53 | LEKTION4 | SEQ | Treasure Chest - ToGuMi | 13 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 2F 2A 20 CC 45 4B 54 49 4F 4E 34 0D 0D CB 4F 4E |/* .EKTION4...ON| 00000010: 53 54 41 4E 54 45 4E 2C 20 D6 41 52 49 41 42 4C |STANTEN, .ARIABL| 00000020: 45 4E 2C 20 DA 55 47 52 49 46 46 20 55 4E 44 20 |EN, .UGRIFF UND | 00000030: DA 45 49 47 45 52 0D 0D CB 4F 4E 53 54 41 4E 54 |.EIGER...ONSTANT| 00000040: 45 4E 0D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D DA 41 |EN.----------..A| 00000050: 48 4C 45 4E 57 45 52 54 45 4E 20 4B 4F 45 4E 4E |HLENWERTEN KOENN| 00000060: 45 4E 20 CE 41 4D 45 4E 20 47 45 47 45 42 45 4E |EN .AMEN GEGEBEN| 00000070: 20 57 45 52 44 45 4E 2C 20 45 54 57 41 3A 0D 0D | WERDEN, ETWA:..| 00000080: 44 45 46 20 53 43 52 45 45 4E 20 31 30 32 34 3B |DEF SCREEN 1024;| 00000090: 0D 0D C4 41 44 55 52 43 48 20 57 49 52 44 20 44 |...ADURCH WIRD D| 000000A0: 41 53 20 C7 45 44 41 45 43 48 54 4E 49 53 20 44 |AS .EDAECHTNIS D| 000000B0: 45 53 20 C3 4F 4D 50 49 4C 45 52 53 20 57 45 4E |ES .OMPILERS WEN| 000000C0: 49 47 45 52 20 42 45 4C 41 53 54 45 54 20 41 4C |IGER BELASTET AL| 000000D0: 53 20 44 55 52 43 48 20 CD 41 4B 52 4F 53 2E 0D |S DURCH .AKROS..| 000000E0: 0D 43 4F 4E 53 54 20 53 43 52 45 45 4E 20 31 30 |.CONST SCREEN 10| 000000F0: 32 34 20 42 53 4F 55 54 20 30 58 46 46 44 32 20 |24 BSOUT 0XFFD2 | 00000100: 3B 0D 0D C4 45 52 20 C3 4F 4E 53 54 2D D6 45 52 |;...ER .ONST-.ER| 00000110: 45 49 4E 42 41 52 55 4E 47 20 4B 41 4E 4E 20 45 |EINBARUNG KANN E| 00000120: 49 4E 45 20 47 41 4E 5A 45 20 CB 4F 4E 53 54 41 |INE GANZE .ONSTA| 00000130: 4E 54 45 4E 4C 49 53 54 45 2C 20 4A 45 57 45 49 |NTENLISTE, JEWEI| 00000140: 4C 53 20 41 55 53 20 CE 41 4D 45 20 55 4E 44 20 |LS AUS .AME UND | 00000150: D7 45 52 54 20 42 45 53 54 45 48 45 4E 44 2C 20 |.ERT BESTEHEND, | 00000160: 46 4F 4C 47 45 4E 2E 20 C4 45 4D 20 44 49 45 20 |FOLGEN. .EM DIE | 00000170: D6 45 52 45 49 4E 42 41 52 55 4E 47 20 41 42 53 |.EREINBARUNG ABS| 00000180: 43 48 4C 49 45 53 53 45 4E 44 45 20 D3 54 52 49 |CHLIESSENDE .TRI| 00000190: 43 48 50 55 4E 4B 54 20 48 41 54 20 4D 49 4E 44 |CHPUNKT HAT MIND| 000001A0: 45 53 54 45 4E 53 20 45 49 4E 20 D4 52 45 4E 4E |ESTENS EIN .RENN| 000001B0: 5A 45 49 43 48 45 4E 20 56 4F 52 41 55 53 5A 55 |ZEICHEN VORAUSZU| 000001C0: 47 45 48 45 4E 2E 0D 0D D6 41 52 49 41 42 4C 45 |GEHEN....ARIABLE| 000001D0: 4E 0D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D D6 41 52 49 |N.---------..ARI| 000001E0: 41 42 4C 45 4E 20 53 49 4E 44 20 4E 49 43 48 54 |ABLEN SIND NICHT| 000001F0: 53 20 41 4E 44 45 52 45 53 20 41 4C 53 20 D3 50 |S ANDERES ALS .P| 00000200: 45 49 43 48 45 52 53 54 45 4C 4C 45 4E 20 4D 49 |EICHERSTELLEN MI| 00000210: 54 20 CE 41 4D 45 4E 2C 20 49 4E 20 44 49 45 20 |T .AMEN, IN DIE | 00000220: D7 45 52 54 45 20 47 45 53 43 48 52 49 45 42 45 |.ERTE GESCHRIEBE| 00000230: 4E 20 4F 44 45 52 20 41 55 53 20 44 45 4E 45 4E |N ODER AUS DENEN| 00000240: 20 D7 45 52 54 45 20 47 45 4C 45 53 45 4E 20 57 | .ERTE GELESEN W| 00000250: 45 52 44 45 4E 2E 20 C4 49 45 20 C4 45 46 49 4E |ERDEN. .IE .EFIN| 00000260: 49 54 49 4F 4E 53 57 4F 52 54 45 20 49 4E 54 20 |ITIONSWORTE INT | 00000270: 55 4E 44 20 43 48 41 52 20 44 49 45 4E 45 4E 20 |UND CHAR DIENEN | 00000280: 5A 55 52 20 D6 45 52 45 49 4E 42 41 52 55 4E 47 |ZUR .EREINBARUNG| 00000290: 20 55 4E 44 20 D0 4C 41 54 5A 52 45 53 45 52 56 | UND .LATZRESERV| 000002A0: 49 45 52 55 4E 47 2E 20 C4 45 52 20 4C 45 54 5A |IERUNG. .ER LETZ| 000002B0: 54 45 20 C2 55 43 48 53 54 41 42 45 20 44 45 53 |TE .UCHSTABE DES| 000002C0: 20 D6 41 52 49 41 42 4C 45 4E 4E 41 4D 45 4E 53 | .ARIABLENNAMENS| 000002D0: 20 44 41 52 46 20 4B 45 49 4E 45 20 4F 45 46 46 | DARF KEINE OEFF| 000002E0: 4E 45 4E 44 45 20 CB 4C 41 4D 4D 45 52 20 53 45 |NENDE .LAMMER SE| 000002F0: 49 4E 2C 20 44 41 20 44 49 45 53 45 53 20 41 4C |IN, DA DIESES AL| 00000300: 53 20 C6 55 4E 4B 54 49 4F 4E 53 56 45 52 45 49 |S .UNKTIONSVEREI| 00000310: 4E 42 41 52 55 4E 47 20 41 4E 47 45 53 45 48 45 |NBARUNG ANGESEHE| 00000320: 4E 20 57 55 45 52 44 45 3A 0D 0D 49 4E 54 20 41 |N WUERDE:..INT A| 00000330: 20 2C 20 42 20 2C 20 43 20 3B 0D 0D C4 55 52 43 | , B , C ;...URC| 00000340: 48 20 CB 4F 4D 4D 41 53 20 4C 41 45 53 53 54 20 |H .OMMAS LAESST | 00000350: 53 49 43 48 20 45 49 4E 45 20 47 41 4E 5A 45 20 |SICH EINE GANZE | 00000360: CC 49 53 54 45 20 44 45 46 49 4E 49 45 52 45 4E |.ISTE DEFINIEREN| 00000370: 2E 20 C5 49 4E 45 20 C9 4E 54 2D C1 4E 57 45 49 |. .INE .NT-.NWEI| 00000380: 53 55 4E 47 20 52 45 53 45 52 56 49 45 52 54 20 |SUNG RESERVIERT | 00000390: D2 41 55 4D 20 46 55 45 52 20 5A 57 45 49 20 C2 |.AUM FUER ZWEI .| 000003A0: 59 54 45 53 2C 20 57 41 45 48 52 45 4E 44 20 44 |YTES, WAEHREND D| 000003B0: 49 45 20 C3 48 41 52 2D C1 4E 57 45 49 53 55 4E |IE .HAR-.NWEISUN| 000003C0: 47 20 4E 55 52 20 46 55 45 52 20 45 49 4E 20 C2 |G NUR FUER EIN .| 000003D0: 59 54 45 20 28 D7 45 52 54 45 20 56 4F 4E 20 30 |YTE (.ERTE VON 0| 000003E0: 20 42 49 53 20 32 35 35 29 20 D0 4C 41 54 5A 20 | BIS 255) .LATZ | 000003F0: 53 43 48 41 46 46 54 2E 20 C5 53 20 45 4D 50 46 |SCHAFFT. .S EMPF| 00000400: 49 45 48 4C 54 20 53 49 43 48 20 C9 4E 54 2D D6 |IEHLT SICH .NT-.| 00000410: 41 52 49 41 42 4C 45 4E 20 44 45 4E 20 D6 4F 52 |ARIABLEN DEN .OR| 00000420: 41 4E 47 20 5A 55 20 47 45 42 45 4E 2C 20 41 55 |ANG ZU GEBEN, AU| 00000430: 43 48 20 57 45 4E 4E 20 45 49 4E 45 20 C3 48 41 |CH WENN EINE .HA| 00000440: 52 2D D6 41 52 49 41 42 4C 45 20 47 45 4E 55 45 |R-.ARIABLE GENUE| 00000450: 47 45 4E 20 57 55 45 52 44 45 2E 20 D3 4F 20 4B |GEN WUERDE. .O K| 00000460: 4F 4D 4D 54 20 45 53 20 4E 49 43 48 54 20 5A 55 |OMMT ES NICHT ZU| 00000470: 20 D0 52 4F 42 4C 45 4D 45 4E 2C 20 57 45 4E 4E | .ROBLEMEN, WENN| 00000480: 20 D3 49 45 20 44 49 45 20 C2 59 54 45 4B 45 4E | .IE DIE .YTEKEN| 00000490: 4E 55 4E 47 20 27 42 59 27 20 56 45 52 47 45 53 |NUNG 'BY' VERGES| 000004A0: 53 45 4E 20 53 4F 4C 4C 54 45 4E 2E 0D 0D D3 54 |SEN SOLLTEN....T| 000004B0: 41 54 49 53 43 48 45 20 D6 41 52 49 41 42 4C 45 |ATISCHE .ARIABLE| 000004C0: 4E 20 44 45 52 20 45 42 45 4E 20 42 45 53 50 52 |N DER EBEN BESPR| 000004D0: 4F 43 48 45 4E 45 4E 20 C1 52 54 20 57 45 52 44 |OCHENEN .RT WERD| 000004E0: 45 4E 20 4D 49 54 20 CE 55 4C 4C 57 45 52 54 45 |EN MIT .ULLWERTE| 000004F0: 4E 20 56 4F 52 42 45 4C 45 47 54 2C 20 53 4F 46 |N VORBELEGT, SOF| 00000500: 45 52 4E 20 44 45 52 20 D0 52 4F 47 52 41 4D 4D |ERN DER .ROGRAMM| 00000510: 49 45 52 45 52 20 4B 45 49 4E 45 20 41 4E 44 45 |IERER KEINE ANDE| 00000520: 52 45 20 D6 4F 52 42 45 4C 45 47 55 4E 47 20 56 |RE .ORBELEGUNG V| 00000530: 4F 52 4E 49 4D 4D 54 2E 20 C4 49 45 53 45 53 20 |ORNIMMT. .IESES | 00000540: 49 53 54 20 4F 48 4E 45 20 57 45 49 54 45 52 45 |IST OHNE WEITERE| 00000550: 53 20 4D 4F 45 47 4C 49 43 48 3A 0D 0D 49 4E 54 |S MOEGLICH:..INT| 00000560: 20 5A 45 49 4C 45 4E 20 32 35 20 2C 20 53 50 41 | ZEILEN 25 , SPA| 00000570: 4C 54 45 4E 20 34 30 20 3B 0D 0D CE 41 43 48 20 |LTEN 40 ;...ACH | 00000580: 44 45 4D 20 C3 4F 4D 50 49 4C 49 45 52 45 4E 20 |DEM .OMPILIEREN | 00000590: 4F 44 45 52 20 C5 49 4E 4C 41 44 45 4E 20 44 45 |ODER .INLADEN DE| 000005A0: 53 20 D0 52 4F 47 52 41 4D 4D 45 53 20 53 49 4E |S .ROGRAMMES SIN| 000005B0: 44 20 48 49 45 52 20 44 49 45 20 D6 41 52 49 41 |D HIER DIE .ARIA| 000005C0: 42 4C 45 4E 49 4E 48 41 4C 54 45 20 53 43 48 4F |BLENINHALTE SCHO| 000005D0: 4E 20 4D 49 54 20 44 45 4E 20 45 4E 54 53 50 52 |N MIT DEN ENTSPR| 000005E0: 45 43 48 45 4E 44 45 4E 20 D7 45 52 54 45 4E 20 |ECHENDEN .ERTEN | 000005F0: 56 4F 52 42 45 4C 45 47 54 2E 20 D7 49 52 44 20 |VORBELEGT. .IRD | 00000600: 44 41 53 20 D0 52 4F 47 52 41 4D 4D 20 41 4C 4C |DAS .ROGRAMM ALL| 00000610: 45 52 44 49 4E 47 53 20 4E 41 43 48 20 C2 45 45 |ERDINGS NACH .EE| 00000620: 4E 44 49 47 55 4E 47 20 45 52 4E 45 55 54 20 41 |NDIGUNG ERNEUT A| 00000630: 55 46 47 45 52 55 46 45 4E 2C 20 4F 48 4E 45 20 |UFGERUFEN, OHNE | 00000640: 45 53 20 41 55 43 48 20 4E 45 55 20 5A 55 20 4C |ES AUCH NEU ZU L| 00000650: 41 44 45 4E 20 4F 44 45 52 20 5A 55 20 43 4F 4D |ADEN ODER ZU COM| 00000660: 50 49 4C 49 45 52 45 4E 20 4B 4F 45 4E 4E 45 4E |PILIEREN KOENNEN| 00000670: 20 53 49 43 48 20 41 4E 44 45 52 45 20 D7 45 52 | SICH ANDERE .ER| 00000680: 54 45 20 49 4E 20 44 45 4E 20 D6 41 52 49 41 42 |TE IN DEN .ARIAB| 00000690: 4C 45 4E 20 42 45 46 49 4E 44 45 4E 2C 20 53 4F |LEN BEFINDEN, SO| 000006A0: 46 45 52 4E 20 44 49 45 53 45 20 57 41 45 48 52 |FERN DIESE WAEHR| 000006B0: 45 4E 44 20 44 45 53 20 56 4F 52 48 45 52 49 47 |END DES VORHERIG| 000006C0: 45 4E 20 D0 52 4F 47 52 41 4D 4D 4C 41 55 46 45 |EN .ROGRAMMLAUFE| 000006D0: 53 20 47 45 41 45 4E 44 45 52 54 20 57 55 52 44 |S GEAENDERT WURD| 000006E0: 45 4E 2E 0D 0D C5 49 4E 45 20 D6 41 52 49 41 42 |EN....INE .ARIAB| 000006F0: 4C 45 4E 20 4B 41 4E 4E 20 4E 49 43 48 54 20 4E |LEN KANN NICHT N| 00000700: 55 52 20 45 49 4E 45 4E 20 45 49 4E 5A 49 47 45 |UR EINEN EINZIGE| 00000710: 4E 20 D7 C5 52 54 20 45 4E 54 48 41 4C 54 45 4E |N ..RT ENTHALTEN| 00000720: 2C 20 53 4F 4E 44 45 52 4E 20 45 49 4E 45 20 47 |, SONDERN EINE G| 00000730: 41 4E 5A 45 20 CC 49 53 54 45 3A 0D 0D 43 48 41 |ANZE .ISTE:..CHA| 00000740: 52 20 54 45 58 54 20 27 48 27 20 27 41 27 20 27 |R TEXT 'H' 'A' '| 00000750: 4C 27 20 27 4C 27 20 27 4F 27 20 30 20 3B 0D 0D |L' 'L' 'O' 0 ;..| 00000760: C6 55 45 52 20 44 49 45 53 45 20 CB 4F 4D 42 49 |.UER DIESE .OMBI| 00000770: 4E 41 54 49 4F 4E 20 56 4F 4E 20 4D 45 48 52 45 |NATION VON MEHRE| 00000780: 52 45 4E 20 DA 45 49 43 48 45 4E 20 4D 49 54 20 |REN .EICHEN MIT | 00000790: 45 49 4E 45 4D 20 41 42 53 43 48 4C 49 45 53 53 |EINEM ABSCHLIESS| 000007A0: 45 4E 44 45 4E 20 CE 55 4C 4C 42 59 54 45 20 45 |ENDEN .ULLBYTE E| 000007B0: 58 49 53 54 49 45 52 54 20 45 49 4E 45 20 C1 42 |XISTIERT EINE .B| 000007C0: 4B 55 45 52 5A 55 4E 47 3A 0D 0D 43 48 41 52 20 |KUERZUNG:..CHAR | 000007D0: 54 45 58 54 20 22 48 41 4C 4C 4F 22 20 3B 0D 0D |TEXT "HALLO" ;..| 000007E0: C5 4E 44 4C 49 43 48 20 53 49 4E 44 20 57 49 52 |.NDLICH SIND WIR| 000007F0: 20 53 4F 57 45 49 54 2C 20 44 41 53 53 20 D3 54 | SOWEIT, DASS .T| 00000800: 52 49 4E 47 53 20 4B 45 49 4E 20 D0 52 4F 42 4C |RINGS KEIN .ROBL| 00000810: 45 4D 20 53 49 4E 44 2E 0D 0D C5 49 4E 45 20 41 |EM SIND....INE A| 00000820: 4E 44 45 52 45 20 CD 4F 45 47 4C 49 43 48 4B 45 |NDERE .OEGLICHKE| 00000830: 49 54 20 D0 4C 41 54 5A 20 5A 55 20 53 43 48 41 |IT .LATZ ZU SCHA| 00000840: 46 46 45 4E 2C 20 42 49 45 54 45 4E 20 44 49 4D |FFEN, BIETEN DIM| 00000850: 45 4E 53 49 4F 4E 49 45 52 54 45 20 D6 41 52 49 |ENSIONIERTE .ARI| 00000860: 41 42 4C 45 4E 3A 0D 0D 43 48 41 52 20 42 55 46 |ABLEN:..CHAR BUF| 00000870: 46 45 52 5B 20 32 30 20 3B 0D 0D C4 49 45 20 45 |FER[ 20 ;...IE E| 00000880: 43 4B 49 47 45 20 4F 45 46 46 4E 45 4E 44 45 20 |CKIGE OEFFNENDE | 00000890: CB 4C 41 4D 4D 45 52 20 4B 45 4E 4E 5A 45 49 43 |.LAMMER KENNZEIC| 000008A0: 48 4E 45 54 20 45 49 4E 45 20 D6 41 52 49 41 42 |HNET EINE .ARIAB| 000008B0: 4C 45 20 4E 41 4D 45 4E 53 20 42 55 46 46 45 52 |LE NAMENS BUFFER| 000008C0: 2C 20 44 49 45 20 D0 4C 41 54 5A 20 46 55 45 52 |, DIE .LATZ FUER| 000008D0: 20 32 30 20 C2 59 54 45 53 20 42 49 45 54 45 54 | 20 .YTES BIETET| 000008E0: 2E 20 DA 55 20 42 45 41 43 48 54 45 4E 20 49 53 |. .U BEACHTEN IS| 000008F0: 54 2C 20 44 41 53 53 20 44 49 4D 45 4E 53 49 4F |T, DASS DIMENSIO| 00000900: 4E 49 45 52 54 45 20 D6 41 52 49 41 42 4C 45 4E |NIERTE .ARIABLEN| 00000910: 20 4E 49 43 48 54 20 56 4F 52 42 45 4C 45 47 54 | NICHT VORBELEGT| 00000920: 20 57 45 52 44 45 4E 20 4B 4F 45 4E 4E 45 4E 2E | WERDEN KOENNEN.| 00000930: 20 D3 49 45 20 57 45 52 44 45 4E 20 4E 49 43 48 | .IE WERDEN NICH| 00000940: 54 20 4D 49 54 54 45 4E 20 49 4D 20 D0 52 4F 47 |T MITTEN IM .ROG| 00000950: 52 41 4D 4D 20 41 4E 47 45 4C 45 47 54 2C 20 53 |RAMM ANGELEGT, S| 00000960: 4F 4E 44 45 52 4E 20 45 52 53 54 20 48 49 4E 54 |ONDERN ERST HINT| 00000970: 45 52 20 44 45 4D 20 D0 52 4F 47 52 41 4D 4D 2E |ER DEM .ROGRAMM.| 00000980: 0D 0D 43 48 41 52 20 54 45 58 54 31 20 27 41 27 |..CHAR TEXT1 'A'| 00000990: 20 2C 20 54 45 58 54 32 5B 20 31 30 20 2C 20 54 | , TEXT2[ 10 , T| 000009A0: 45 58 54 33 20 27 42 27 20 2C 20 54 45 58 54 34 |EXT3 'B' , TEXT4| 000009B0: 5B 20 35 20 3B 0D 0D C4 49 45 20 D6 41 52 49 41 |[ 5 ;...IE .ARIA| 000009C0: 42 4C 45 4E 20 54 45 58 54 31 20 55 4E 44 20 54 |BLEN TEXT1 UND T| 000009D0: 45 58 54 33 20 4C 49 45 47 45 4E 20 4D 49 54 54 |EXT3 LIEGEN MITT| 000009E0: 45 4E 20 49 4D 20 D0 52 4F 47 52 41 4D 4D 20 55 |EN IM .ROGRAMM U| 000009F0: 4E 4D 49 54 54 45 4C 42 41 52 20 48 49 4E 54 45 |NMITTELBAR HINTE| 00000A00: 52 45 49 4E 41 4E 44 45 52 2C 20 57 41 45 48 52 |REINANDER, WAEHR| 00000A10: 45 4E 44 20 54 45 58 54 32 20 55 4E 44 20 54 45 |END TEXT2 UND TE| 00000A20: 58 54 34 20 4E 41 43 48 20 44 45 4D 20 D0 52 4F |XT4 NACH DEM .RO| 00000A30: 47 52 41 4D 4D 20 48 49 4E 54 45 52 45 49 4E 41 |GRAMM HINTEREINA| 00000A40: 4E 44 45 52 20 41 4E 47 45 4F 52 44 4E 45 54 20 |NDER ANGEORDNET | 00000A50: 53 49 4E 44 2E 0D 0D D6 41 52 49 41 42 4C 45 4E |SIND....ARIABLEN| 00000A60: 20 55 4E 44 20 DA 55 47 52 49 46 46 0D 2D 2D 2D | UND .UGRIFF.---| 00000A70: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000A80: 2D 2D 0D 0D C9 4E 20 C2 C1 D3 C9 C3 20 42 45 44 |--...N ..... BED| 00000A90: 45 55 54 45 4E 20 D6 41 52 49 41 42 4C 45 4E 4E |EUTEN .ARIABLENN| 00000AA0: 41 4D 45 4E 20 45 54 57 41 53 20 55 4E 54 45 52 |AMEN ETWAS UNTER| 00000AB0: 53 43 48 49 45 44 4C 4C 49 43 48 45 53 2C 20 4A |SCHIEDLLICHES, J| 00000AC0: 45 20 4E 41 43 48 44 45 4D 2C 20 4F 42 20 53 49 |E NACHDEM, OB SI| 00000AD0: 45 20 53 49 43 48 20 4C 49 4E 4B 53 20 4F 44 45 |E SICH LINKS ODE| 00000AE0: 52 20 52 45 43 48 54 53 20 44 45 53 20 DA 55 57 |R RECHTS DES .UW| 00000AF0: 45 49 53 55 4E 47 53 4F 50 45 52 53 41 54 4F 52 |EISUNGSOPERSATOR| 00000B00: 53 20 42 45 46 49 4E 44 45 4E 3A 0D 0D 41 3D 42 |S BEFINDEN:..A=B| 00000B10: 0D 0D CC 49 4E 4B 53 20 44 41 56 4F 4E 20 49 53 |...INKS DAVON IS| 00000B20: 54 20 44 45 52 20 D0 4C 41 54 5A 20 44 45 52 20 |T DER .LATZ DER | 00000B30: D6 41 52 49 41 42 4C 45 4E 20 47 45 4D 45 49 4E |.ARIABLEN GEMEIN| 00000B40: 54 2C 20 52 45 43 48 54 53 20 44 41 56 4F 4E 20 |T, RECHTS DAVON | 00000B50: 44 45 52 45 4E 20 C9 4E 48 41 4C 54 2E 20 C9 4E |DEREN .NHALT. .N| 00000B60: 20 C3 D0 20 53 54 45 48 54 20 44 45 52 20 D6 41 | .. STEHT DER .A| 00000B70: 52 49 41 42 4C 45 4E 4E 41 4D 45 20 49 4D 4D 45 |RIABLENNAME IMME| 00000B80: 52 20 46 55 45 52 20 44 49 45 20 C1 44 52 45 53 |R FUER DIE .DRES| 00000B90: 53 45 20 44 45 52 20 D6 41 52 49 41 42 4C 45 4E |SE DER .ARIABLEN| 00000BA0: 2E 20 C4 45 52 45 4E 20 C9 4E 48 41 4C 54 20 4D |. .EREN .NHALT M| 00000BB0: 55 53 53 20 45 52 53 54 20 44 55 52 43 48 20 45 |USS ERST DURCH E| 00000BC0: 49 4E 45 4E 20 D0 45 45 4B 2D C2 45 46 45 48 4C |INEN .EEK-.EFEHL| 00000BD0: 2C 20 44 45 52 20 49 4E 20 C3 D0 20 4D 49 54 20 |, DER IN .. MIT | 00000BE0: 45 49 4E 45 52 20 53 49 43 48 20 53 43 48 4C 49 |EINER SICH SCHLI| 00000BF0: 45 53 53 45 4E 44 45 4E 20 45 43 4B 49 47 45 4E |ESSENDEN ECKIGEN| 00000C00: 20 CB 4C 41 4D 4D 45 52 20 41 55 53 47 45 44 52 | .LAMMER AUSGEDR| 00000C10: 55 45 43 4B 54 20 57 49 52 44 2C 20 47 45 4C 45 |UECKT WIRD, GELE| 00000C20: 53 45 4E 20 57 45 52 44 45 4E 3A 0D 0D 42 20 5D |SEN WERDEN:..B ]| 00000C30: 20 41 20 3D 0D 0D C4 49 45 53 45 53 20 49 53 54 | A =...IESES IST| 00000C40: 20 44 49 45 20 C5 4E 54 53 50 52 45 43 48 55 4E | DIE .NTSPRECHUN| 00000C50: 47 20 5A 55 4D 20 C2 C1 D3 C9 C3 2D C2 45 49 53 |G ZUM .....-.EIS| 00000C60: 50 49 45 4C 2E 0D 0D C9 4D 20 4E 41 43 48 46 4F |PIEL....M NACHFO| 00000C70: 4C 47 45 4E 44 45 4E 20 C2 45 49 53 50 49 45 4C |LGENDEN .EISPIEL| 00000C80: 20 57 49 52 44 20 4E 49 43 48 54 20 45 49 4E 20 | WIRD NICHT EIN | 00000C90: D3 54 52 49 4E 47 20 41 4E 20 44 49 45 20 D6 41 |.TRING AN DIE .A| 00000CA0: 52 49 41 42 4C 45 20 42 20 55 45 42 45 52 47 45 |RIABLE B UEBERGE| 00000CB0: 42 45 4E 2C 20 53 4F 4E 44 45 52 4E 20 4E 55 52 |BEN, SONDERN NUR| 00000CC0: 20 44 49 45 20 C1 44 52 45 53 53 45 20 56 4F 4E | DIE .DRESSE VON| 00000CD0: 20 41 24 2E 20 C2 20 45 4E 54 48 41 45 4C 54 20 | A$. . ENTHAELT | 00000CE0: 4E 49 43 48 54 20 41 24 20 53 4F 4E 44 45 52 4E |NICHT A$ SONDERN| 00000CF0: 20 49 53 54 20 DA 45 49 47 45 52 20 41 55 46 20 | IST .EIGER AUF | 00000D00: 41 24 2E 0D 0D 43 48 41 52 20 41 24 20 22 D3 54 |A$...CHAR A$ ".T| 00000D10: 52 49 4E 47 22 20 3B 0D 49 4E 54 20 42 20 3B 0D |RING" ;.INT B ;.| 00000D20: 4D 41 49 4E 28 29 0D 42 45 47 49 4E 0D 20 41 24 |MAIN().BEGIN. A$| 00000D30: 20 42 20 3D 0D 42 45 4E 44 0D 0D CE 41 43 48 20 | B =.BEND...ACH | 00000D40: 44 49 45 53 45 52 20 DA 55 57 45 49 53 55 4E 47 |DIESER .UWEISUNG| 00000D50: 20 4B 41 4E 4E 20 4D 49 54 20 C8 49 4C 46 45 20 | KANN MIT .ILFE | 00000D60: 56 4F 4E 20 42 20 41 55 43 48 20 41 55 46 20 41 |VON B AUCH AUF A| 00000D70: 24 20 5A 55 47 45 47 52 49 46 46 45 4E 20 57 45 |$ ZUGEGRIFFEN WE| 00000D80: 52 44 45 4E 3A 0D 0D 42 20 20 20 20 20 20 20 20 |RDEN:..B | 00000D90: C1 44 52 45 53 53 45 20 56 4F 4E 20 42 0D 42 20 |.DRESSE VON B.B | 00000DA0: 5D 20 20 20 20 20 20 C9 4E 48 41 4C 54 20 56 4F |] .NHALT VO| 00000DB0: 4E 20 42 20 28 20 C1 44 52 45 53 53 45 20 56 4F |N B ( .DRESSE VO| 00000DC0: 4E 20 41 24 29 0D 42 20 5D 20 42 59 20 5D 20 C9 |N A$).B ] BY ] .| 00000DD0: 4E 48 41 4C 54 20 56 4F 4E 20 41 24 20 28 45 52 |NHALT VON A$ (ER| 00000DE0: 53 54 45 53 20 DA 45 49 43 48 45 4E 20 D3 29 0D |STES .EICHEN .).| 00000DF0: 0D C1 55 43 48 20 42 45 49 4D 20 CC 45 53 45 4E |..UCH BEIM .ESEN| 00000E00: 20 47 49 42 54 20 45 53 20 57 49 45 44 45 52 20 | GIBT ES WIEDER | 00000E10: 44 49 45 20 CB 45 4E 4E 55 4E 47 20 27 42 59 27 |DIE .ENNUNG 'BY'| 00000E20: 20 46 55 45 52 20 C2 59 54 45 5A 55 47 52 49 46 | FUER .YTEZUGRIF| 00000E30: 46 2E 0D 0D DA 45 49 47 45 52 42 45 46 45 48 4C |F....EIGERBEFEHL| 00000E40: 45 0D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D |E.-------------.| 00000E50: 0D DA 45 49 47 45 52 20 53 49 4E 44 20 45 49 4E |..EIGER SIND EIN| 00000E60: 20 57 49 43 48 54 49 47 45 53 20 C5 4C 45 4D 45 | WICHTIGES .LEME| 00000E70: 4E 54 20 49 4E 20 C3 D0 2D C3 4F 44 45 2E 20 D3 |NT IN ..-.ODE. .| 00000E80: 50 45 5A 49 45 4C 4C 45 20 DA 45 49 47 45 52 42 |PEZIELLE .EIGERB| 00000E90: 45 46 45 48 4C 45 20 45 52 4C 45 49 43 48 54 45 |EFEHLE ERLEICHTE| 00000EA0: 52 4E 20 44 49 45 20 C8 41 4E 44 48 41 42 55 4E |RN DIE .ANDHABUN| 00000EB0: 47 2E 20 C1 4C 4C 45 20 4E 41 43 48 46 4F 4C 47 |G. .LLE NACHFOLG| 00000EC0: 45 4E 44 45 4E 20 C2 45 46 45 48 4C 45 20 47 49 |ENDEN .EFEHLE GI| 00000ED0: 42 54 20 45 53 20 46 55 45 52 20 57 4F 52 54 2D |BT ES FUER WORT-| 00000EE0: 20 55 4E 44 20 42 59 54 45 57 45 49 53 45 4E 20 | UND BYTEWEISEN | 00000EF0: DA 55 47 52 49 46 46 2E 0D 0D 5D 5D 20 C1 42 4B |.UGRIFF...]] .BK| 00000F00: 55 45 52 5A 55 4E 47 20 46 55 45 52 20 5D 20 5D |UERZUNG FUER ] ]| 00000F10: 0D 0D 42 59 20 5D 5D 20 C1 42 4B 55 45 52 5A 55 |..BY ]] .BKUERZU| 00000F20: 4E 47 20 46 55 45 52 20 5D 20 42 59 20 5D 0D 0D |NG FUER ] BY ]..| 00000F30: 5D 2B 2B 20 D6 41 52 49 41 42 4C 45 4E 49 4E 48 |]++ .ARIABLENINH| 00000F40: 41 4C 54 20 57 49 52 44 20 47 45 4C 45 53 45 4E |ALT WIRD GELESEN| 00000F50: 2C 20 D6 41 52 49 41 42 4C 45 4E 49 4E 48 41 4C |, .ARIABLENINHAL| 00000F60: 54 20 41 4E 53 43 48 4C 49 45 53 53 45 4E 44 20 |T ANSCHLIESSEND | 00000F70: 45 52 48 4F 45 48 54 2E 0D 0D 2B 2B 5D 20 D6 41 |ERHOEHT...++] .A| 00000F80: 52 49 41 42 4C 45 4E 49 4E 48 41 4C 54 20 57 49 |RIABLENINHALT WI| 00000F90: 52 44 20 45 52 48 4F 45 48 54 2C 20 44 45 52 20 |RD ERHOEHT, DER | 00000FA0: 42 45 52 45 49 54 53 20 45 52 48 4F 45 48 54 45 |BEREITS ERHOEHTE| 00000FB0: 20 C9 4E 48 41 4C 54 20 47 45 4C 45 53 45 4E 2E | .NHALT GELESEN.| 00000FC0: 0D 0D 5D 2D 2D 20 D6 41 52 49 41 42 4C 45 4E 49 |..]-- .ARIABLENI| 00000FD0: 4E 48 41 4C 54 20 57 49 52 44 20 47 45 4C 45 53 |NHALT WIRD GELES| 00000FE0: 45 4E 2C 20 D6 41 52 49 41 42 4C 45 4E 49 4E 48 |EN, .ARIABLENINH| 00000FF0: 41 4C 54 20 41 4E 53 43 48 4C 49 45 53 53 45 4E |ALT ANSCHLIESSEN| 00001000: 44 20 45 52 4E 49 45 44 52 49 47 54 2E 0D 0D 2D |D ERNIEDRIGT...-| 00001010: 2D 5D 20 D6 41 52 49 41 42 4C 45 4E 49 4E 48 41 |-] .ARIABLENINHA| 00001020: 4C 54 20 57 49 52 44 20 45 52 4E 49 45 44 52 49 |LT WIRD ERNIEDRI| 00001030: 47 54 2C 20 44 45 52 20 42 45 52 45 49 54 53 20 |GT, DER BEREITS | 00001040: 45 52 4E 49 45 44 52 49 47 54 45 20 C9 4E 48 41 |ERNIEDRIGTE .NHA| 00001050: 4C 54 20 47 45 4C 45 53 45 4E 2E 0D 0D 0D D0 4C |LT GELESEN.....L| 00001060: 41 54 5A 20 46 55 45 52 20 C4 45 46 49 4E 49 54 |ATZ FUER .EFINIT| 00001070: 49 4F 4E 45 4E 0D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |IONEN.----------| 00001080: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 0D CD 41 |------------...A| 00001090: 4B 52 4F 53 2C 20 CB 4F 4E 53 54 41 4E 54 45 4E |KROS, .ONSTANTEN| 000010A0: 20 55 4E 44 20 D6 41 52 49 41 42 4C 45 4E 20 4B | UND .ARIABLEN K| 000010B0: 4F 45 4E 4E 45 4E 20 49 4E 4E 45 52 48 41 4C 42 |OENNEN INNERHALB| 000010C0: 20 45 49 4E 45 52 20 C6 55 4E 4B 54 49 4F 4E 20 | EINER .UNKTION | 000010D0: 44 45 46 49 4E 49 45 52 54 20 57 45 52 44 45 4E |DEFINIERT WERDEN| 000010E0: 20 4F 44 45 52 20 41 55 53 53 45 52 48 41 4C 42 | ODER AUSSERHALB| 000010F0: 2E 20 C4 45 46 49 4E 49 54 49 4F 4E 45 4E 20 41 |. .EFINITIONEN A| 00001100: 55 53 53 45 52 48 41 4C 42 20 53 49 4E 44 20 47 |USSERHALB SIND G| 00001110: 4C 4F 42 41 4C 2E 20 C1 4C 4C 45 20 46 4F 4C 47 |LOBAL. .LLE FOLG| 00001120: 45 4E 44 45 4E 20 C6 55 4E 4B 54 49 4F 4E 45 4E |ENDEN .UNKTIONEN| 00001130: 20 4B 4F 45 4E 4E 45 4E 20 56 4F 4E 20 44 49 45 | KOENNEN VON DIE| 00001140: 53 45 4E 20 D6 45 52 45 49 4E 42 41 52 55 4E 47 |SEN .EREINBARUNG| 00001150: 45 4E 20 C7 45 42 52 41 55 43 48 20 4D 41 43 48 |EN .EBRAUCH MACH| 00001160: 45 4E 2E 20 C4 45 46 49 4E 49 54 49 4F 4E 45 4E |EN. .EFINITIONEN| 00001170: 20 49 4E 4E 45 52 48 41 4C 42 20 45 49 4E 45 52 | INNERHALB EINER| 00001180: 20 C6 55 4E 4B 54 49 4F 4E 20 53 49 4E 44 20 4C | .UNKTION SIND L| 00001190: 4F 4B 41 4C 20 55 4E 44 20 47 45 4C 54 45 4E 20 |OKAL UND GELTEN | 000011A0: 4E 55 52 20 46 55 45 52 20 44 49 45 20 42 45 54 |NUR FUER DIE BET| 000011B0: 52 45 46 46 45 4E 44 45 20 C6 55 4E 4B 54 49 4F |REFFENDE .UNKTIO| 000011C0: 4E 2E 20 CC 4F 4B 41 4C 45 20 CB 4F 4E 53 54 41 |N. .OKALE .ONSTA| 000011D0: 4E 54 45 4E 20 55 4E 44 20 CD 41 4B 52 4F 53 20 |NTEN UND .AKROS | 000011E0: 53 4F 4C 4C 54 45 4E 20 5A 55 52 20 42 45 53 53 |SOLLTEN ZUR BESS| 000011F0: 45 52 45 4E 20 D5 45 42 45 52 53 49 43 48 54 20 |EREN .EBERSICHT | 00001200: 5A 57 49 53 43 48 45 4E 20 44 45 52 20 C6 55 4E |ZWISCHEN DER .UN| 00001210: 4B 54 49 4F 4E 53 56 45 52 45 49 4E 42 41 52 55 |KTIONSVEREINBARU| 00001220: 4E 47 20 55 4E 44 20 42 45 47 49 4E 20 44 45 46 |NG UND BEGIN DEF| 00001230: 49 4E 49 45 52 54 20 57 45 52 44 45 4E 2E 20 C6 |INIERT WERDEN. .| 00001240: 55 45 52 20 53 54 41 54 49 53 43 48 45 20 D6 41 |UER STATISCHE .A| 00001250: 52 49 41 42 4C 45 4E 20 49 53 54 20 44 49 45 53 |RIABLEN IST DIES| 00001260: 20 5A 57 49 4E 47 45 4E 44 20 4E 4F 54 57 45 4E | ZWINGEND NOTWEN| 00001270: 44 49 47 2E 20 DA 55 20 44 59 4E 41 4D 49 53 43 |DIG. .U DYNAMISC| 00001280: 48 45 4E 20 D6 41 52 49 41 42 4C 45 4E 20 4B 4F |HEN .ARIABLEN KO| 00001290: 4D 4D 45 4E 20 57 49 52 20 53 50 41 45 54 45 52 |MMEN WIR SPAETER| 000012A0: 20 4E 4F 43 48 2E 0D 0D 0D 47 4C 4F 42 41 4C 45 | NOCH....GLOBALE| 000012B0: 52 20 C2 45 52 45 49 43 48 0D 0D 4D 41 49 4E 28 |R .EREICH..MAIN(| 000012C0: 29 0D 20 20 4C 4F 4B 41 4C 45 52 20 C2 45 52 45 |). LOKALER .ERE| 000012D0: 49 43 48 0D 42 45 47 49 4E 0D 42 45 4E 44 0D 0D |ICH.BEGIN.BEND..| 000012E0: D3 4F 4E 44 45 52 42 45 48 41 4E 44 4C 55 4E 47 |.ONDERBEHANDLUNG| 000012F0: 20 46 55 45 52 20 D3 54 52 49 4E 47 53 0D D3 54 | FUER .TRINGS..T| 00001300: 52 49 4E 47 53 20 4B 4F 4D 4D 45 4E 20 48 41 45 |RINGS KOMMEN HAE| 00001310: 55 46 49 47 20 56 4F 52 2C 20 53 4F 44 41 53 53 |UFIG VOR, SODASS| 00001320: 20 48 49 45 52 20 45 49 4E 45 20 D3 4F 4E 44 45 | HIER EINE .ONDE| 00001330: 52 42 45 48 41 4E 44 4C 55 4E 47 20 45 49 4E 47 |RBEHANDLUNG EING| 00001340: 45 46 55 45 48 52 54 20 57 55 52 44 45 2E 20 C5 |EFUEHRT WURDE. .| 00001350: 49 4E 20 D3 54 52 49 4E 47 2C 20 44 45 52 20 4D |IN .TRING, DER M| 00001360: 49 54 20 44 4F 50 50 45 4C 54 45 4E 20 C1 4E 46 |IT DOPPELTEN .NF| 00001370: 55 45 48 52 55 4E 47 53 5A 45 49 43 48 45 4E 20 |UEHRUNGSZEICHEN | 00001380: 44 41 52 53 54 45 4C 4C 42 41 52 20 49 53 54 2C |DARSTELLBAR IST,| 00001390: 20 42 52 41 55 43 48 54 20 4E 49 43 48 54 20 45 | BRAUCHT NICHT E| 000013A0: 58 54 52 41 20 41 4C 53 20 D6 41 52 49 41 42 4C |XTRA ALS .ARIABL| 000013B0: 45 20 44 45 46 49 4E 49 45 52 54 20 57 45 52 44 |E DEFINIERT WERD| 000013C0: 45 4E 2C 20 55 4D 20 53 45 49 4E 45 20 C1 4E 46 |EN, UM SEINE .NF| 000013D0: 41 4E 47 53 41 44 52 45 53 53 45 20 5A 55 20 42 |ANGSADRESSE ZU B| 000013E0: 45 4B 4F 4D 4D 45 4E 2E 20 D3 54 41 54 54 44 45 |EKOMMEN. .TATTDE| 000013F0: 53 53 45 4E 20 49 53 54 20 41 55 43 48 20 4D 4F |SSEN IST AUCH MO| 00001400: 45 47 4C 49 43 48 20 22 53 54 52 49 4E 47 22 20 |EGLICH "STRING" | 00001410: 5A 47 20 3D 2C 20 57 49 45 20 49 4D 20 46 4F 4C |ZG =, WIE IM FOL| 00001420: 47 45 4E 44 45 4E 20 C2 45 49 53 50 49 45 4C 3A |GENDEN .EISPIEL:| 00001430: 0D 2A 2F 0D 0D 0D 56 4F 49 44 20 50 55 54 43 28 |.*/...VOID PUTC(| 00001440: 20 29 0D 42 45 47 49 4E 0D 20 20 41 43 20 42 59 | ).BEGIN. AC BY| 00001450: 20 3D 20 30 58 46 46 44 32 20 53 59 53 0D 42 45 | = 0XFFD2 SYS.BE| 00001460: 4E 44 0D 0D 4D 41 49 4E 28 29 0D 49 4E 54 20 5A |ND..MAIN().INT Z| 00001470: 47 20 3B 0D 44 45 46 20 2E 20 5A 47 20 5D 2B 2B |G ;.DEF . ZG ]++| 00001480: 20 42 59 20 5D 20 50 55 54 43 3B 0D 42 45 47 49 | BY ] PUTC;.BEGI| 00001490: 4E 0D 20 20 22 2F 31 34 37 D3 54 52 49 4E 47 22 |N. "/147.TRING"| 000014A0: 20 5A 47 20 3D 0D 20 20 2E 20 2E 20 2E 20 2E 20 | ZG =. . . . . | 000014B0: 2E 20 2E 20 2E 0D 42 45 4E 44 0D 0D 0D 2F 2A 20 |. . ..BEND.../* | 000014C0: C4 55 52 43 48 20 44 41 53 20 D0 55 4E 4B 54 4D |.URCH DAS .UNKTM| 000014D0: 41 4B 52 4F 20 57 45 52 44 45 4E 20 44 49 45 20 |AKRO WERDEN DIE | 000014E0: 53 49 45 42 45 4E 20 DA 45 49 43 48 45 4E 20 44 |SIEBEN .EICHEN D| 000014F0: 45 53 20 D3 54 52 49 4E 47 53 20 4D 49 54 20 C8 |ES .TRINGS MIT .| 00001500: 49 4C 46 45 20 44 45 53 20 DA 45 49 47 45 52 53 |ILFE DES .EIGERS| 00001510: 20 5A 47 20 55 4E 44 20 44 45 52 20 C6 55 4E 4B | ZG UND DER .UNK| 00001520: 54 49 4F 4E 20 50 55 54 43 20 41 55 53 47 45 47 |TION PUTC AUSGEG| 00001530: 45 42 45 4E 2E 20 D7 45 49 54 45 52 20 4D 49 54 |EBEN. .EITER MIT| 00001540: 20 4C 45 4B 54 49 4F 4E 35 20 2A 2F 0D | LEKTION5 */. |
/* LEKTION4..KONSTANTEN, VARIABLEN, ZUGR IFF UND ZEIGER..KONSTANTEN.----------.ZA HLENWERTEN KOENNEN NAMEN GEGEBEN WERDEN, ETWA:..DEF SCREEN 1024;..DADURCH WIRD D AS GEDAECHTNIS DES COMPILERS WENIGER BEL ASTET ALS DURCH MAKROS...CONST SCREEN 10 24 BSOUT 0XFFD2 ;..DER CONST-VEREINBARUN G KANN EINE GANZE KONSTANTENLISTE, JEWEI LS AUS NAME UND WERT BESTEHEND, FOLGEN. DEM DIE VEREINBARUNG ABSCHLIESSENDE STRI CHPUNKT HAT MINDESTENS EIN TRENNZEICHEN VORAUSZUGEHEN...VARIABLEN.---------.VARI ABLEN SIND NICHTS ANDERES ALS SPEICHERST ELLEN MIT NAMEN, IN DIE WERTE GESCHRIEBE N ODER AUS DENEN WERTE GELESEN WERDEN. D IE DEFINITIONSWORTE INT UND CHAR DIENEN ZUR VEREINBARUNG UND PLATZRESERVIERUNG. DER LETZTE BUCHSTABE DES VARIABLENNAMENS DARF KEINE OEFFNENDE KLAMMER SEIN, DA D IESES ALS FUNKTIONSVEREINBARUNG ANGESEHE N WUERDE:..INT A , B , C ;..DURCH KOMMAS LAESST SICH EINE GANZE LISTE DEFINIEREN . EINE INT-ANWEISUNG RESERVIERT RAUM FUE R ZWEI BYTES, WAEHREND DIE CHAR-ANWEISUN G NUR FUER EIN BYTE (WERTE VON 0 BIS 255 ) PLATZ SCHAFFT. ES EMPFIEHLT SICH INT-V ARIABLEN DEN VORANG ZU GEBEN, AUCH WENN EINE CHAR-VARIABLE GENUEGEN WUERDE. SO K OMMT ES NICHT ZU PROBLEMEN, WENN SIE DIE BYTEKENNUNG 'BY' VERGESSEN SOLLTEN...ST ATISCHE VARIABLEN DER EBEN BESPROCHENEN ART WERDEN MIT NULLWERTEN VORBELEGT, SOF ERN DER PROGRAMMIERER KEINE ANDERE VORBE LEGUNG VORNIMMT. DIESES IST OHNE WEITERE S MOEGLICH:..INT ZEILEN 25 , SPALTEN 40 ;..NACH DEM COMPILIEREN ODER EINLADEN DE S PROGRAMMES SIND HIER DIE VARIABLENINHA LTE SCHON MIT DEN ENTSPRECHENDEN WERTEN VORBELEGT. WIRD DAS PROGRAMM ALLERDINGS NACH BEENDIGUNG ERNEUT AUFGERUFEN, OHNE ES AUCH NEU ZU LADEN ODER ZU COMPILIEREN KOENNEN SICH ANDERE WERTE IN DEN VARIAB LEN BEFINDEN, SOFERN DIESE WAEHREND DES VORHERIGEN PROGRAMMLAUFES GEAENDERT WURD EN...EINE VARIABLEN KANN NICHT NUR EINEN EINZIGEN WERT ENTHALTEN, SONDERN EINE G ANZE LISTE:..CHAR TEXT 'H' 'A' 'L' 'L' ' O' 0 ;..FUER DIESE KOMBINATION VON MEHRE REN ZEICHEN MIT EINEM ABSCHLIESSENDEN NU LLBYTE EXISTIERT EINE ABKUERZUNG:..CHAR TEXT "HALLO" ;..ENDLICH SIND WIR SOWEIT, DASS STRINGS KEIN PROBLEM SIND...EINE A NDERE MOEGLICHKEIT PLATZ ZU SCHAFFEN, BI ETEN DIMENSIONIERTE VARIABLEN:..CHAR BUF FER[ 20 ;..DIE ECKIGE OEFFNENDE KLAMMER KENNZEICHNET EINE VARIABLE NAMENS BUFFER , DIE PLATZ FUER 20 BYTES BIETET. ZU BEA CHTEN IST, DASS DIMENSIONIERTE VARIABLEN NICHT VORBELEGT WERDEN KOENNEN. SIE WER DEN NICHT MITTEN IM PROGRAMM ANGELEGT, S ONDERN ERST HINTER DEM PROGRAMM...CHAR T EXT1 'A' , TEXT2[ 10 , TEXT3 'B' , TEXT4 [ 5 ;..DIE VARIABLEN TEXT1 UND TEXT3 LIE GEN MITTEN IM PROGRAMM UNMITTELBAR HINTE REINANDER, WAEHREND TEXT2 UND TEXT4 NACH DEM PROGRAMM HINTEREINANDER ANGEORDNET SIND...VARIABLEN UND ZUGRIFF.----------- ----------..IN BASIC BEDEUTEN VARIABLENN AMEN ETWAS UNTERSCHIEDLLICHES, JE NACHDE M, OB SIE SICH LINKS ODER RECHTS DES ZUW EISUNGSOPERSATORS BEFINDEN:..A=B..LINKS DAVON IST DER PLATZ DER VARIABLEN GEMEIN T, RECHTS DAVON DEREN INHALT. IN CP STEH T DER VARIABLENNAME IMMER FUER DIE ADRES SE DER VARIABLEN. DEREN INHALT MUSS ERST DURCH EINEN PEEK-BEFEHL, DER IN CP MIT EINER SICH SCHLIESSENDEN ECKIGEN KLAMMER AUSGEDRUECKT WIRD, GELESEN WERDEN:..B ] A =..DIESES IST DIE ENTSPRECHUNG ZUM BA SIC-BEISPIEL...IM NACHFOLGENDEN BEISPIEL WIRD NICHT EIN STRING AN DIE VARIABLE B UEBERGEBEN, SONDERN NUR DIE ADRESSE VON A$. B ENTHAELT NICHT A$ SONDERN IST ZEI GER AUF A$...CHAR A$ "STRING" ;.INT B ;. MAIN().BEGIN. A$ B =.BEND..NACH DIESER Z UWEISUNG KANN MIT HILFE VON B AUCH AUF A $ ZUGEGRIFFEN WERDEN:..B ADRESSE VON B.B ] INHALT VON B ( ADRESSE VO N A$).B ] BY ] INHALT VON A$ (ERSTES ZEI CHEN S)..AUCH BEIM LESEN GIBT ES WIEDER DIE KENNUNG 'BY' FUER BYTEZUGRIFF...ZEIG ERBEFEHLE.-------------..ZEIGER SIND EIN WICHTIGES ELEMENT IN CP-CODE. SPEZIELLE ZEIGERBEFEHLE ERLEICHTERN DIE HANDHABUN G. ALLE NACHFOLGENDEN BEFEHLE GIBT ES FU ER WORT- UND BYTEWEISEN ZUGRIFF...]] ABK UERZUNG FUER ] ]..BY ]] ABKUERZUNG FUER ] BY ]..]++ VARIABLENINHALT WIRD GELESEN , VARIABLENINHALT ANSCHLIESSEND ERHOEHT. ..++] VARIABLENINHALT WIRD ERHOEHT, DER BEREITS ERHOEHTE INHALT GELESEN...]-- VA RIABLENINHALT WIRD GELESEN, VARIABLENINH ALT ANSCHLIESSEND ERNIEDRIGT...--] VARIA BLENINHALT WIRD ERNIEDRIGT, DER BEREITS ERNIEDRIGTE INHALT GELESEN....PLATZ FUER DEFINITIONEN.----------------------..MA KROS, KONSTANTEN UND VARIABLEN KOENNEN I NNERHALB EINER FUNKTION DEFINIERT WERDEN ODER AUSSERHALB. DEFINITIONEN AUSSERHAL B SIND GLOBAL. ALLE FOLGENDEN FUNKTIONEN KOENNEN VON DIESEN VEREINBARUNGEN GEBRA UCH MACHEN. DEFINITIONEN INNERHALB EINER FUNKTION SIND LOKAL UND GELTEN NUR FUER DIE BETREFFENDE FUNKTION. LOKALE KONSTA NTEN UND MAKROS SOLLTEN ZUR BESSEREN UEB ERSICHT ZWISCHEN DER FUNKTIONSVEREINBARU NG UND BEGIN DEFINIERT WERDEN. FUER STAT ISCHE VARIABLEN IST DIES ZWINGEND NOTWEN DIG. ZU DYNAMISCHEN VARIABLEN KOMMEN WIR SPAETER NOCH....GLOBALER BEREICH..MAIN( ). LOKALER BEREICH.BEGIN.BEND..SONDERBE HANDLUNG FUER STRINGS.STRINGS KOMMEN HAE UFIG VOR, SODASS HIER EINE SONDERBEHANDL UNG EINGEFUEHRT WURDE. EIN STRING, DER M IT DOPPELTEN ANFUEHRUNGSZEICHEN DARSTELL BAR IST, BRAUCHT NICHT EXTRA ALS VARIABL E DEFINIERT WERDEN, UM SEINE ANFANGSADRE SSE ZU BEKOMMEN. STATTDESSEN IST AUCH MO EGLICH "STRING" ZG =, WIE IM FOLGENDEN B EISPIEL:.*/...VOID PUTC( ).BEGIN. AC BY = 0XFFD2 SYS.BEND..MAIN().INT ZG ;.DEF . ZG ]++ BY ] PUTC;.BEGIN. "/147STRING" ZG =. . . . . . . ..BEND.../* DURCH DA S PUNKTMAKRO WERDEN DIE SIEBEN ZEICHEN D ES STRINGS MIT HILFE DES ZEIGERS ZG UND DER FUNKTION PUTC AUSGEGEBEN. WEITER MIT LEKTION5 */.
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL