DATEIVERWALTUNG
FILE INFORMATION
FILENAME(S): DATEIVERWALTUNG
FILE TYPE(S): PRG
FILE SIZE: 2.3K
FIRST SEEN: 2025-12-01 13:51:32
APPEARS ON: 1 disk(s)
FILE HASH
ce44e3b5f27b1611cbbc88e5b271c9626ffb76b690413ea3d53d3d2081c63549
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| METALLICA | DATEIVERWALTUNG | PRG | hedning, The Viking | 27 | 16 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 23 08 64 00 8F 20 44 41 54 45 49 56 45 52 |..#.d.. DATEIVER| 00000010: 57 41 4C 54 55 4E 47 20 42 59 20 46 4F 54 5A 49 |WALTUNG BY FOTZI| 00000020: 27 38 37 00 45 08 6E 00 8F 20 3D 3D 3D 3D 3D 3D |'87.E.n.. ======| 00000030: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================| 00000040: 3D 3D 3D 3D 3D 00 60 08 78 00 8F 20 4C 49 53 54 |=====.`.x.. LIST| 00000050: 53 43 48 55 54 5A 20 45 49 4E 42 41 55 45 4E 21 |SCHUTZ EINBAUEN!| 00000060: 00 6C 08 C8 00 8F 20 4D 45 4E 55 45 00 87 08 D2 |.l.... MENUE....| 00000070: 00 99 22 93 22 3A 97 35 33 32 38 30 2C 36 3A 97 |..".":.53280,6:.| 00000080: 35 33 32 38 31 2C 36 00 AF 08 DC 00 99 22 11 11 |53281,6......"..| 00000090: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 44 41 54 45 49 56 |..........DATEIV| 000000A0: 45 52 57 41 4C 54 55 4E 47 20 56 32 2E 32 22 00 |ERWALTUNG V2.2".| 000000B0: D5 08 E6 00 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |....."..........| 000000C0: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................| 000000D0: B8 B8 B8 B8 22 00 FA 08 F0 00 99 22 1D 1D 1D 1D |...."......"....| 000000E0: 1D 1D 1D 1D 1D 1D 1D 57 52 49 54 54 45 4E 20 37 |.......WRITTEN 7| 000000F0: 2E 37 2E 27 38 37 20 42 59 22 00 21 09 FA 00 99 |.7.'87 BY".!....| 00000100: 22 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 54 48 |".............TH| 00000110: 45 20 46 41 4D 4F 55 53 20 12 46 4F 54 5A 49 92 |E FAMOUS .FOTZI.| 00000120: 22 00 51 09 04 01 99 22 3A 3A 3A 3A 3A 3A 3A 3A |".Q...."::::::::| 00000130: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |::::::::::::::::| 00000140: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |::::::::::::::::| 00000150: 22 00 65 09 0E 01 99 22 57 4F 4C 4C 45 4E 20 53 |".e...."WOLLEN S| 00000160: 49 45 20 3A 22 00 8C 09 13 01 99 22 C3 C3 C3 C3 |IE :"......"....| 00000170: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |................| 00000180: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 AE 22 00 B3 09 18 |..........."....| 00000190: 01 99 22 31 29 20 44 41 54 45 4E 20 45 49 4E 47 |.."1) DATEN EING| 000001A0: 45 42 45 4E 20 26 20 53 43 48 52 45 49 42 45 4E |EBEN & SCHREIBEN| 000001B0: 20 C2 22 00 DA 09 1D 01 99 22 C3 C3 C3 C3 C3 C3 | ."......"......| 000001C0: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |................| 000001D0: C3 C3 C3 C3 C3 C3 C3 C3 B3 22 00 01 0A 22 01 99 |........."..."..| 000001E0: 22 32 29 20 44 41 54 45 4E 20 4C 45 53 45 4E 20 |"2) DATEN LESEN | 000001F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 C2 | .| 00000200: 22 00 28 0A 27 01 99 22 C3 C3 C3 C3 C3 C3 C3 C3 |".(.'.."........| 00000210: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |................| 00000220: C3 C3 C3 C3 C3 C3 B3 22 00 4F 0A 2C 01 99 22 33 |.......".O.,.."3| 00000230: 29 20 44 41 54 45 4E 20 4C 4F 45 53 43 48 45 4E |) DATEN LOESCHEN| 00000240: 20 20 20 20 20 20 20 20 20 20 20 20 20 C2 22 00 | .".| 00000250: 76 0A 31 01 99 22 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |v.1.."..........| 00000260: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |................| 00000270: C3 C3 C3 C3 B3 22 00 9D 0A 36 01 99 22 34 29 20 |....."...6.."4) | 00000280: 42 45 45 4E 44 45 4E 20 20 20 20 20 20 20 20 20 |BEENDEN | 00000290: 20 20 20 20 20 20 20 20 20 20 20 C2 22 00 C4 0A | ."...| 000002A0: 3B 01 99 22 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |;.."............| 000002B0: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |................| 000002C0: C3 C3 BD 22 00 CB 0A 40 01 85 41 00 DD 0A 4A 01 |..."...@..A...J.| 000002D0: 8B 41 B3 31 B0 41 B1 34 A7 89 33 32 30 00 F4 0A |.A.1.A.4..320...| 000002E0: 54 01 91 41 89 33 39 30 2C 35 39 30 2C 37 36 30 |T..A.390,590,760| 000002F0: 2C 38 35 30 00 FA 0A 5E 01 8A 00 0F 0B 68 01 8F |,850...^.....h..| 00000300: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 | --------------.| 00000310: 24 0B 72 01 8F 20 44 41 54 45 4E 20 45 49 4E 47 |$.r.. DATEN EING| 00000320: 45 42 45 4E 00 39 0B 7C 01 8F 20 2D 2D 2D 2D 2D |EBEN.9.|.. -----| 00000330: 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 57 0B 86 01 99 22 |---------.W...."| 00000340: 93 22 3A 99 22 11 11 11 44 41 54 45 4E 20 45 49 |.":."...DATEN EI| 00000350: 4E 47 45 42 45 4E 22 00 6D 0B 90 01 99 22 A3 A3 |NGEBEN".m...."..| 00000360: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 22 00 93 0B |............"...| 00000370: 9A 01 85 22 57 49 45 20 53 4F 4C 4C 20 44 49 45 |..."WIE SOLL DIE| 00000380: 20 44 41 54 45 49 20 48 45 49 53 53 45 4E 3F 22 | DATEI HEISSEN?"| 00000390: 3B 44 24 00 AB 0B A4 01 9F 31 2C 38 2C 32 2C 22 |;D$......1,8,2,"| 000003A0: 22 AA 44 24 AA 22 2C 53 2C 57 22 00 C4 0B AE 01 |".D$.",S,W".....| 000003B0: 85 22 4E 41 4D 45 2C 56 4F 52 4E 41 4D 45 3A 22 |."NAME,VORNAME:"| 000003C0: 3B 4E 41 24 00 CF 0B B8 01 98 31 2C 4E 41 24 00 |;NA$......1,NA$.| 000003D0: E6 0B C2 01 85 22 47 45 42 55 52 54 53 44 41 54 |....."GEBURTSDAT| 000003E0: 55 4D 3A 22 3B 47 00 EF 0B CC 01 98 31 2C 47 00 |UM:";G......1,G.| 000003F0: 02 0C D6 01 85 22 57 4F 48 4E 4F 52 54 3A 22 3B |....."WOHNORT:";| 00000400: 57 24 00 0C 0C E0 01 98 31 2C 57 24 00 23 0C E5 |W$......1,W$.#..| 00000410: 01 85 22 50 4F 53 54 4C 45 49 54 5A 41 48 4C 3A |.."POSTLEITZAHL:| 00000420: 22 3B 50 00 2C 0C E6 01 98 31 2C 50 00 3F 0C EA |";P.,....1,P.?..| 00000430: 01 85 22 53 54 52 41 53 53 45 3A 22 3B 52 24 00 |.."STRASSE:";R$.| 00000440: 49 0C F4 01 98 31 2C 52 24 00 5E 0C F5 01 85 22 |I....1,R$.^...."| 00000450: 48 41 55 53 4E 55 4D 4D 45 52 3A 22 3B 4E 00 67 |HAUSNUMMER:";N.g| 00000460: 0C F6 01 98 31 2C 4E 00 7F 0C FE 01 85 22 54 45 |....1,N......"TE| 00000470: 4C 45 46 4F 4E 4E 55 4D 4D 45 52 3A 22 3B 45 00 |LEFONNUMMER:";E.| 00000480: 88 0C 08 02 98 31 2C 45 00 99 0C 09 02 85 22 42 |.....1,E......"B| 00000490: 45 52 55 46 3A 22 3B 42 24 00 A3 0C 0A 02 98 31 |ERUF:";B$......1| 000004A0: 2C 42 24 00 BC 0C 0B 02 85 22 46 41 4D 49 4C 49 |,B$......"FAMILI| 000004B0: 45 4E 53 54 41 4E 44 3A 22 3B 46 24 00 C6 0C 0C |ENSTAND:";F$....| 000004C0: 02 98 31 2C 46 24 00 E1 0C 0D 02 99 22 42 45 53 |..1,F$......"BES| 000004D0: 4F 4E 44 45 52 45 20 56 45 52 4D 45 52 4B 45 3A |ONDERE VERMERKE:| 000004E0: 22 00 EA 0C 0E 02 85 42 45 24 00 F5 0C 0F 02 98 |"......BE$......| 000004F0: 31 2C 42 45 24 00 FC 0C 12 02 A0 31 00 2A 0D 1C |1,BE$......1.*..| 00000500: 02 85 22 57 4F 4C 4C 45 4E 20 53 49 45 20 4E 4F |.."WOLLEN SIE NO| 00000510: 43 48 20 45 49 4E 20 46 49 4C 45 20 53 50 45 49 |CH EIN FILE SPEI| 00000520: 43 48 45 52 4E 3F 22 3B 41 24 00 42 0D 26 02 8B |CHERN?";A$.B.&..| 00000530: 41 24 B3 B1 22 4A 22 A7 8A 3A 45 4C 53 45 89 33 |A$.."J"..:ELSE.3| 00000540: 39 30 00 54 0D 30 02 8F 20 2D 2D 2D 2D 2D 2D 2D |90.T.0.. -------| 00000550: 2D 2D 2D 2D 00 66 0D 3A 02 8F 20 44 41 54 45 4E |----.f.:.. DATEN| 00000560: 20 4C 45 53 45 4E 00 78 0D 44 02 8F 20 2D 2D 2D | LESEN.x.D.. ---| 00000570: 2D 2D 2D 2D 2D 2D 2D 2D 00 93 0D 4E 02 99 22 93 |--------...N..".| 00000580: 22 3A 99 22 11 11 11 44 41 54 45 4E 20 4C 45 53 |":."...DATEN LES| 00000590: 45 4E 22 00 A6 0D 58 02 99 22 A3 A3 A3 A3 A3 A3 |EN"...X.."......| 000005A0: A3 A3 A3 A3 A3 22 00 C7 0D 62 02 85 22 57 49 45 |....."...b.."WIE| 000005B0: 20 48 45 49 53 53 54 20 44 49 45 20 44 41 54 45 | HEISST DIE DATE| 000005C0: 49 20 3F 22 3B 44 24 00 DB 0D 6C 02 9F 31 2C 38 |I ?";D$...l..1,8| 000005D0: 2C 32 2C 22 22 AA 44 24 AA 22 22 00 01 0E 76 02 |,2,"".D$.""...v.| 000005E0: 84 31 2C 4E 41 24 2C 47 2C 57 24 2C 50 2C 52 24 |.1,NA$,G,W$,P,R$| 000005F0: 2C 4E 2C 45 2C 42 24 2C 46 24 2C 42 45 24 3A A0 |,N,E,B$,F$,BE$:.| 00000600: 31 00 1A 0E 80 02 99 22 4E 41 4D 45 2C 56 4F 52 |1......"NAME,VOR| 00000610: 4E 41 4D 45 3A 22 3B 4E 41 24 00 31 0E 8A 02 99 |NAME:";NA$.1....| 00000620: 22 47 45 42 55 52 54 53 44 41 54 55 4D 3A 22 3B |"GEBURTSDATUM:";| 00000630: 47 00 44 0E 94 02 99 22 57 4F 48 4E 4F 52 54 3A |G.D...."WOHNORT:| 00000640: 22 2C 57 24 00 5B 0E 99 02 99 22 50 4F 53 54 4C |",W$.[...."POSTL| 00000650: 45 49 54 5A 41 48 4C 3A 22 3B 50 00 6E 0E 9E 02 |EITZAHL:";P.n...| 00000660: 99 22 53 54 52 41 53 53 45 3A 22 3B 52 24 00 83 |."STRASSE:";R$..| 00000670: 0E A3 02 99 22 48 41 55 53 4E 55 4D 4D 45 52 3A |...."HAUSNUMMER:| 00000680: 22 3B 4E 00 9B 0E A8 02 99 22 54 45 4C 45 46 4F |";N......"TELEFO| 00000690: 4E 4E 55 4D 4D 45 52 3A 22 3B 45 00 AC 0E A9 02 |NNUMMER:";E.....| 000006A0: 99 22 42 45 52 55 46 3A 22 3B 42 24 00 C5 0E AA |."BERUF:";B$....| 000006B0: 02 99 22 46 41 4D 49 4C 49 45 4E 53 54 41 4E 44 |.."FAMILIENSTAND| 000006C0: 3A 22 3B 46 24 00 E4 0E AB 02 99 22 42 45 53 4F |:";F$......"BESO| 000006D0: 4E 44 45 52 45 20 56 45 52 4D 45 52 4B 45 3A 22 |NDERE VERMERKE:"| 000006E0: 3B 42 45 24 00 FB 0E B2 02 99 22 11 11 50 52 45 |;BE$......"..PRE| 000006F0: 53 53 20 3C 53 50 41 43 45 3E 22 00 10 0F BC 02 |SS <SPACE>".....| 00000700: A1 59 24 3A 8B 59 24 B3 B1 22 20 22 A7 37 30 30 |.Y$:.Y$.." ".700| 00000710: 00 3B 0F C6 02 85 22 57 4F 4C 4C 45 4E 20 53 49 |.;...."WOLLEN SI| 00000720: 45 20 4E 4F 43 48 20 45 49 4E 45 20 44 41 54 45 |E NOCH EINE DATE| 00000730: 49 20 4C 45 53 45 4E 22 3B 41 24 00 53 0F D0 02 |I LESEN";A$.S...| 00000740: 8B 41 24 B3 B1 22 4A 22 A7 8A 3A 45 4C 53 45 89 |.A$.."J"..:ELSE.| 00000750: 35 39 30 00 68 0F DA 02 8F 20 2D 2D 2D 2D 2D 2D |590.h.... ------| 00000760: 2D 2D 2D 2D 2D 2D 2D 2D 00 7D 0F E4 02 8F 20 44 |--------.}.... D| 00000770: 41 54 45 4E 20 4C 4F 45 53 43 48 45 4E 00 92 0F |ATEN LOESCHEN...| 00000780: EE 02 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |... ------------| 00000790: 2D 2D 00 B0 0F F8 02 99 22 93 22 3A 99 22 11 11 |--......".":."..| 000007A0: 11 44 41 54 45 4E 20 4C 4F 45 53 43 48 45 4E 22 |.DATEN LOESCHEN"| 000007B0: 00 D0 0F 02 03 85 22 57 49 45 20 48 45 49 53 53 |......"WIE HEISS| 000007C0: 54 20 44 49 45 20 44 41 54 45 49 22 3B 4E 41 24 |T DIE DATEI";NA$| 000007D0: 00 EB 0F 0C 03 9F 31 2C 38 2C 31 35 2C 22 53 3A |......1,8,15,"S:| 000007E0: 22 AA 4E 41 24 AA 22 22 3A A0 31 00 0D 10 16 03 |".NA$."":.1.....| 000007F0: 99 22 44 49 45 20 44 41 54 45 49 20 57 55 52 44 |."DIE DATEI WURD| 00000800: 45 20 47 45 4C 4F 45 53 43 48 54 2E 22 00 3B 10 |E GELOESCHT.".;.| 00000810: 20 03 85 22 57 4F 4C 4C 45 4E 20 53 49 45 20 4E | .."WOLLEN SIE N| 00000820: 4F 43 48 20 45 49 4E 45 20 44 41 54 45 49 20 4C |OCH EINE DATEI L| 00000830: 4F 45 53 43 48 45 4E 22 3B 41 24 00 53 10 2A 03 |OESCHEN";A$.S.*.| 00000840: 8B 41 24 B3 B1 22 4A 22 A7 8A 3A 45 4C 53 45 89 |.A$.."J"..:ELSE.| 00000850: 37 36 30 00 61 10 34 03 8F 20 2D 2D 2D 2D 2D 2D |760.a.4.. ------| 00000860: 2D 00 6F 10 3E 03 8F 20 42 45 45 4E 44 45 4E 00 |-.o.>.. BEENDEN.| 00000870: 7D 10 48 03 8F 20 2D 2D 2D 2D 2D 2D 2D 00 90 10 |}.H.. -------...| 00000880: 52 03 99 22 93 11 11 11 42 45 45 4E 44 45 4E 22 |R.."....BEENDEN"| 00000890: 00 9F 10 5C 03 99 22 A3 A3 A3 A3 A3 A3 A3 22 00 |...\..".......".| 000008A0: E8 10 66 03 85 22 11 11 11 57 4F 4C 4C 45 4E 20 |..f.."...WOLLEN | 000008B0: 53 49 45 20 44 49 45 53 45 53 20 57 55 4E 44 45 |SIE DIESES WUNDE| 000008C0: 52 56 4F 4C 4C 45 20 50 52 4F 47 52 41 4D 4D 20 |RVOLLE PROGRAMM | 000008D0: 20 57 49 52 4B 4C 49 43 48 20 56 45 52 4C 41 53 | WIRKLICH VERLAS| 000008E0: 53 45 4E 3F 22 3B 41 24 00 00 11 70 03 8B 41 24 |SEN?";A$...p..A$| 000008F0: B3 B1 22 4A 22 A7 8A 3A 45 4C 53 45 89 38 39 30 |.."J"..:ELSE.890| 00000900: 00 30 11 7A 03 99 22 53 49 45 20 48 41 42 45 4E |.0.z.."SIE HABEN| 00000910: 20 45 53 20 53 4F 20 47 45 57 4F 4C 4C 54 2C 53 | ES SO GEWOLLT,S| 00000920: 49 45 20 44 49 43 4B 53 43 48 41 45 44 45 4C 22 |IE DICKSCHAEDEL"| 00000930: 00 3B 11 84 03 9E 36 34 37 33 38 00 00 00 |.;....64738... |
..#.D.. DATEIVERWALTUNG BY FOTZI'87.E.N. . ===========================.`.X.. LIST SCHUTZ EINBAUEN!.L.H.. MENUE...R..".":.5 3280,6:.53281,6......"............DATEIV ERWALTUNG V2.2".U....".................. ............"......"...........WRITTEN 7 .7.'87 BY".!....".............THE FAMOUS .FOTZI.".Q....":::::::::::::::::::::::: ::::::::::::::::".E...."WOLLEN SIE :"... ..."CCCCCCCCCCCCCCCCCCCCCCCCCCCCCC.".... .."1) DATEN EINGEBEN & SCHREIBEN B".Z... ."CCCCCCCCCCCCCCCCCCCCCCCCCCCCCC."...".. "2) DATEN LESEN B".(.'.." CCCCCCCCCCCCCCCCCCCCCCCCCCCCCC.".O.,.."3 ) DATEN LOESCHEN B".V.1.."CC CCCCCCCCCCCCCCCCCCCCCCCCCCCC."...6.."4) BEENDEN B".D.;.."CCCC CCCCCCCCCCCCCCCCCCCCCCCCCC.".K.@..A...J. .A.1.A.4..320...T..A.390,590,760,850...^ .....H.. --------------.$.R.. DATEN EING EBEN.9.|.. --------------.W....".":."... DATEN EINGEBEN".M....".............."... ..."WIE SOLL DIE DATEI HEISSEN?";D$..... .1,8,2,"".D$.",S,W".D...."NAME,VORNAME:" ;NA$.O....1,NA$...B.."GEBURTSDATUM:";G.. .L..1,G...V.."WOHNORT:";W$......1,W$.#.. .."POSTLEITZAHL:";P.,....1,P.?...."STRAS SE:";R$.I....1,R$.^...."HAUSNUMMER:";N.G ....1,N....."TELEFONNUMMER:";E......1,E ......"BERUF:";B$......1,B$......"FAMILI ENSTAND:";F$.F....1,F$......"BESONDERE V ERMERKE:"......BE$......1,BE$..... 1.*.. .."WOLLEN SIE NOCH EIN FILE SPEICHERN?"; A$.B.&..A$.."J"..:ELSE.390.T.0.. ------- ----.F.:.. DATEN LESEN.X.D.. ----------- ...N..".":."...DATEN LESEN"...X.."...... .....".G.B.."WIE HEISST DIE DATEI ?";D$. ..L..1,8,2,"".D$.""...V..1,NA$,G,W$,P,R$ ,N,E,B$,F$,BE$: 1......"NAME,VORNAME:";N A$.1...."GEBURTSDATUM:";G.D...."WOHNORT: ",W$.[...."POSTLEITZAHL:";P.N...."STRASS E:";R$......"HAUSNUMMER:";N......"TELEFO NNUMMER:";E......"BERUF:";B$.E...."FAMIL IENSTAND:";F$......"BESONDERE VERMERKE:" ;BE$......"..PRESS <SPACE>"......Y$:.Y$. ." ".700.;.F.."WOLLEN SIE NOCH EINE DATE I LESEN";A$.S.P..A$.."J"..:ELSE.590.H.Z. . --------------.}.... DATEN LOESCHEN... ... --------------......".":."...DATEN L OESCHEN".P...."WIE HEISST DIE DATEI";NA$ ......1,8,15,"S:".NA$."": 1......"DIE DA TEI WURDE GELOESCHT.".;. .."WOLLEN SIE N OCH EINE DATEI LOESCHEN";A$.S.*..A$.."J" ..:ELSE.760.A.4.. -------.O.>.. BEENDEN. }.H.. -------...R.."....BEENDEN"...\..". ......"...F.."...WOLLEN SIE DIESES WUNDE RVOLLE PROGRAMM WIRKLICH VERLASSEN?";A$ ...P..A$.."J"..:ELSE.890.0.Z.."SIE HABEN ES SO GEWOLLT,SIE DICKSCHAEDEL".;....64 738...
> CLICK IMAGE PREVIEW FOR FULL MODAL