BER.1.LOGO
FILE INFORMATION
FILENAME(S): BER.1.LOGO
FILE TYPE(S): DEL
FILE SIZE: 2.2K
FIRST SEEN: 2025-11-30 21:11:01
APPEARS ON: 1 disk(s)
FILE HASH
9a6b82556b9e43f75d3b94dfcc20fcd7a0cdf883b2b21b9a683de089fc8c7fae
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LOGO | BER.1.LOGO | DEL | DuncanTwain | 24 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 32 35 0D 20 56 54 20 32 35 0D 20 4C 49 20 39 30 |25. VT 25. LI 90| 00000010: 20 56 54 20 31 35 20 4C 49 20 39 30 20 56 54 20 | VT 15 LI 90 VT | 00000020: 32 35 0D 45 4E 44 0D 0D 54 4F 20 5A 45 54 52 41 |25.END..TO ZETRA| 00000030: 4E 44 0D 20 4C 4F 4B 41 41 4C 20 22 58 30 20 4D |ND. LOKAAL "X0 M| 00000040: 41 41 4B 20 22 58 30 20 58 50 4F 53 20 4C 4F 4B |AAK "X0 XPOS LOK| 00000050: 41 41 4C 20 22 59 30 20 4D 41 41 4B 20 22 59 30 |AAL "Y0 MAAK "Y0| 00000060: 20 59 50 4F 53 0D 20 50 4F 20 4E 41 41 52 58 59 | YPOS. PO NAARXY| 00000070: 20 2D 20 31 36 30 20 31 33 30 20 50 4E 20 4E 41 | - 160 130 PN NA| 00000080: 41 52 59 20 2D 20 37 35 20 4E 41 41 52 58 20 31 |ARY - 75 NAARX 1| 00000090: 35 39 20 4E 41 41 52 59 20 31 33 30 20 4E 41 41 |59 NAARY 130 NAA| 000000A0: 52 58 20 2D 20 31 36 30 0D 20 50 4F 20 4E 41 41 |RX - 160. PO NAA| 000000B0: 52 58 59 20 3A 58 30 20 3A 59 30 0D 45 4E 44 0D |RXY :X0 :Y0.END.| 000000C0: 0D 54 4F 20 42 45 47 49 4E 0D 20 50 4F 20 4E 41 |.TO BEGIN. PO NA| 000000D0: 41 52 50 4C 20 30 20 30 20 4D 53 20 4E 41 41 52 |ARPL 0 0 MS NAAR| 000000E0: 48 4F 45 4B 20 39 30 0D 45 4E 44 0D 0D 54 4F 20 |HOEK 90.END..TO | 000000F0: 5A 45 54 20 3A 54 45 4B 53 54 0D 20 53 50 52 4F |ZET :TEKST. SPRO| 00000100: 4F 4B 20 30 20 4B 4F 4D 20 5A 45 54 31 20 3A 54 |OK 0 KOM ZET1 :T| 00000110: 45 4B 53 54 0D 20 41 4C 53 20 52 45 47 45 4C 20 |EKST. ALS REGEL | 00000120: 3C 20 31 38 20 44 41 4E 20 4E 41 41 52 50 4C 20 |< 18 DAN NAARPL | 00000130: 30 20 52 45 47 45 4C 20 2B 20 31 20 41 4E 44 45 |0 REGEL + 1 ANDE| 00000140: 52 53 20 4E 41 41 52 50 4C 20 30 20 30 0D 45 4E |RS NAARPL 0 0.EN| 00000150: 44 0D 0D 54 4F 20 52 41 41 4D 0D 20 48 45 52 48 |D..TO RAAM. HERH| 00000160: 41 41 4C 20 34 20 5B 52 45 20 39 30 20 56 49 45 |AAL 4 [RE 90 VIE| 00000170: 52 4B 41 4E 54 5D 0D 20 50 4F 20 56 54 20 34 35 |RKANT]. PO VT 45| 00000180: 20 50 4E 20 52 45 20 39 30 20 56 54 20 34 35 20 | PN RE 90 VT 45 | 00000190: 48 45 52 48 41 41 4C 20 34 20 5B 52 45 20 39 30 |HERHAAL 4 [RE 90| 000001A0: 20 56 54 20 39 30 5D 0D 45 4E 44 0D 0D 54 4F 20 | VT 90].END..TO | 000001B0: 44 49 41 4D 41 4E 54 20 0D 45 4E 44 0D 0D 54 4F |DIAMANT .END..TO| 000001C0: 20 41 43 48 54 48 4F 45 4B 0D 20 48 45 52 48 41 | ACHTHOEK. HERHA| 000001D0: 41 4C 20 38 20 5B 56 54 20 32 35 20 52 45 20 34 |AL 8 [VT 25 RE 4| 000001E0: 35 5D 0D 45 4E 44 0D 0D 54 4F 20 56 49 45 52 4B |5].END..TO VIERK| 000001F0: 41 4E 54 0D 20 48 45 52 48 41 41 4C 20 34 20 5B |ANT. HERHAAL 4 [| 00000200: 56 54 20 34 30 20 52 45 20 39 30 5D 0D 45 4E 44 |VT 40 RE 90].END| 00000210: 0D 0D 54 4F 20 26 42 0D 20 26 26 20 22 50 52 49 |..TO &B. && "PRI| 00000220: 4E 54 42 0D 45 4E 44 0D 0D 54 4F 20 21 48 0D 20 |NTB.END..TO !H. | 00000230: 57 45 47 20 5B 42 45 57 41 41 52 50 20 4F 4E 54 |WEG [BEWAARP ONT| 00000240: 48 4F 55 44 20 50 52 4F 47 20 41 4E 54 57 4F 4F |HOUD PROG ANTWOO| 00000250: 52 44 31 20 49 4E 20 45 45 4E 55 49 54 20 50 45 |RD1 IN EENUIT PE| 00000260: 4E 20 42 4F 4F 47 4A 45 20 57 41 43 48 54 20 53 |N BOOGJE WACHT S| 00000270: 50 41 54 49 45 20 53 50 20 52 55 49 4D 54 45 20 |PATIE SP RUIMTE | 00000280: 26 56 20 26 4C 20 26 50 20 26 5A 20 26 4D 20 26 |&V &L &P &Z &M &| 00000290: 53 20 26 26 20 26 42 20 21 48 5D 0D 45 4E 44 0D |S && &B !H].END.| 000002A0: 0D 54 4F 20 42 45 57 41 41 52 50 20 3A 42 45 53 |.TO BEWAARP :BES| 000002B0: 54 41 4E 44 20 3A 4E 41 4D 45 4E 0D 20 28 20 42 |TAND :NAMEN. ( B| 000002C0: 45 57 41 41 52 20 3A 42 45 53 54 41 4E 44 20 3A |EWAAR :BESTAND :| 000002D0: 4E 41 4D 45 4E 20 29 0D 20 50 52 20 22 42 45 57 |NAMEN ). PR "BEW| 000002E0: 41 41 52 44 0D 45 4E 44 0D 0D 54 4F 20 4F 4E 54 |AARD.END..TO ONT| 000002F0: 48 4F 55 44 20 3A 4E 41 41 4D 0D 20 50 52 49 4E |HOUD :NAAM. PRIN| 00000300: 54 31 20 22 3E 20 44 45 46 49 4E 49 45 45 52 20 |T1 "> DEFINIEER | 00000310: 3A 4E 41 41 4D 20 5A 45 54 56 20 5B 5D 20 50 52 |:NAAM ZETV [] PR| 00000320: 4F 47 20 3A 4E 41 41 4D 20 41 4E 54 57 4F 4F 52 |OG :NAAM ANTWOOR| 00000330: 44 0D 45 4E 44 0D 0D 54 4F 20 50 52 4F 47 20 3A |D.END..TO PROG :| 00000340: 4E 41 41 4D 20 3A 43 4F 4D 4D 0D 20 41 4C 53 20 |NAAM :COMM. ALS | 00000350: 3A 43 4F 4D 4D 20 3D 20 5B 45 4E 44 5D 20 50 52 |:COMM = [END] PR| 00000360: 49 4E 54 20 53 41 4D 45 4E 20 3A 4E 41 41 4D 20 |INT SAMEN :NAAM | 00000370: 5B 47 45 4C 45 45 52 44 5D 20 52 45 53 20 5B 5D |[GELEERD] RES []| 00000380: 0D 20 52 55 4E 20 3A 43 4F 4D 4D 20 50 52 49 4E |. RUN :COMM PRIN| 00000390: 54 31 20 22 3E 0D 20 52 45 53 20 5A 45 54 56 20 |T1 ">. RES ZETV | 000003A0: 3A 43 4F 4D 4D 20 50 52 4F 47 20 3A 4E 41 41 4D |:COMM PROG :NAAM| 000003B0: 20 41 4E 54 57 4F 4F 52 44 0D 45 4E 44 0D 0D 54 | ANTWOORD.END..T| 000003C0: 4F 20 41 4E 54 57 4F 4F 52 44 31 0D 20 4C 4F 4B |O ANTWOORD1. LOK| 000003D0: 41 41 4C 20 22 41 20 4D 41 41 4B 20 22 41 20 41 |AAL "A MAAK "A A| 000003E0: 4E 54 57 4F 4F 52 44 0D 20 41 4C 53 20 4C 45 45 |NTWOORD. ALS LEE| 000003F0: 47 3F 20 3A 41 20 52 45 53 20 22 20 41 4E 44 45 |G? :A RES " ANDE| 00000400: 52 53 20 52 45 53 20 45 45 52 53 54 45 20 3A 41 |RS RES EERSTE :A| 00000410: 0D 45 4E 44 0D 0D 54 4F 20 49 4E 20 3A 4C 49 4A |.END..TO IN :LIJ| 00000420: 53 54 20 3A 54 45 4B 53 54 0D 20 41 4C 53 20 57 |ST :TEKST. ALS W| 00000430: 4F 4F 52 44 3F 20 3A 54 45 4B 53 54 20 4D 41 41 |OORD? :TEKST MAA| 00000440: 4B 20 22 54 45 4B 53 54 20 53 41 4D 45 4E 20 3A |K "TEKST SAMEN :| 00000450: 54 45 4B 53 54 20 5B 5D 0D 20 41 4C 53 20 4C 45 |TEKST []. ALS LE| 00000460: 45 47 3F 20 3A 54 45 4B 53 54 20 52 45 53 55 4C |EG? :TEKST RESUL| 00000470: 54 41 41 54 20 22 57 41 41 52 0D 20 41 4C 53 20 |TAAT "WAAR. ALS | 00000480: 4E 49 45 54 20 45 52 42 49 4A 3F 20 45 45 52 53 |NIET ERBIJ? EERS| 00000490: 54 45 20 3A 54 45 4B 53 54 20 3A 4C 49 4A 53 54 |TE :TEKST :LIJST| 000004A0: 20 52 45 53 20 22 4E 49 45 54 57 0D 20 52 45 53 | RES "NIETW. RES| 000004B0: 55 4C 54 41 41 54 20 49 4E 20 3A 4C 49 4A 53 54 |ULTAAT IN :LIJST| 000004C0: 20 4D 45 20 3A 54 45 4B 53 54 0D 45 4E 44 0D 0D | ME :TEKST.END..| 000004D0: 54 4F 20 45 45 4E 55 49 54 20 3A 4C 49 4A 53 54 |TO EENUIT :LIJST| 000004E0: 0D 20 52 45 53 55 4C 54 41 41 54 20 53 41 4D 45 |. RESULTAAT SAME| 000004F0: 4E 20 5B 5D 20 45 4C 45 4D 45 4E 54 20 28 20 31 |N [] ELEMENT ( 1| 00000500: 20 2B 20 52 41 4E 44 4F 4D 20 41 41 4E 54 41 4C | + RANDOM AANTAL| 00000510: 20 3A 4C 49 4A 53 54 20 29 20 3A 4C 49 4A 53 54 | :LIJST ) :LIJST| 00000520: 0D 45 4E 44 0D 0D 54 4F 20 50 45 4E 0D 20 4B 4C |.END..TO PEN. KL| 00000530: 20 31 0D 45 4E 44 0D 0D 54 4F 20 42 4F 4F 47 4A | 1.END..TO BOOGJ| 00000540: 45 20 3A 53 54 52 41 41 4C 0D 20 48 45 52 48 41 |E :STRAAL. HERHA| 00000550: 41 4C 20 31 30 20 5B 56 54 20 33 2E 31 34 31 20 |AL 10 [VT 3.141 | 00000560: 2A 20 3A 53 54 52 41 41 4C 20 2F 20 32 30 20 52 |* :STRAAL / 20 R| 00000570: 45 20 39 5D 0D 45 4E 44 0D 0D 54 4F 20 57 41 43 |E 9].END..TO WAC| 00000580: 48 54 20 3A 54 49 4A 44 0D 20 48 45 52 48 41 41 |HT :TIJD. HERHAA| 00000590: 4C 20 37 35 30 20 2A 20 3A 54 49 4A 44 20 5B 5D |L 750 * :TIJD []| 000005A0: 0D 45 4E 44 0D 0D 54 4F 20 53 50 41 54 49 45 20 |.END..TO SPATIE | 000005B0: 3A 41 41 4E 54 41 4C 0D 20 41 4C 53 20 3A 41 41 |:AANTAL. ALS :AA| 000005C0: 4E 54 41 4C 20 3D 20 31 20 52 45 53 20 43 48 41 |NTAL = 1 RES CHA| 000005D0: 52 20 33 32 0D 20 52 45 53 20 57 4F 4F 52 44 20 |R 32. RES WOORD | 000005E0: 43 48 41 52 20 33 32 20 53 50 41 54 49 45 20 3A |CHAR 32 SPATIE :| 000005F0: 41 41 4E 54 41 4C 20 2D 20 31 0D 45 4E 44 0D 0D |AANTAL - 1.END..| 00000600: 54 4F 20 53 50 20 3A 41 41 4E 54 41 4C 0D 20 52 |TO SP :AANTAL. R| 00000610: 45 53 55 4C 54 41 41 54 20 53 50 41 54 49 45 20 |ESULTAAT SPATIE | 00000620: 3A 41 41 4E 54 41 4C 0D 45 4E 44 0D 0D 54 4F 20 |:AANTAL.END..TO | 00000630: 52 55 49 4D 54 45 0D 20 2E 47 43 4F 4C 4C 20 50 |RUIMTE. .GCOLL P| 00000640: 52 20 2E 4E 4F 44 45 53 0D 45 4E 44 0D 0D 54 4F |R .NODES.END..TO| 00000650: 20 26 56 0D 20 26 26 20 22 56 4F 52 4D 45 4E 0D | &V. && "VORMEN.| 00000660: 45 4E 44 0D 0D 54 4F 20 26 4C 0D 20 26 26 20 22 |END..TO &L. && "| 00000670: 4C 49 4A 53 54 45 4E 0D 45 4E 44 0D 0D 54 4F 20 |LIJSTEN.END..TO | 00000680: 26 50 0D 20 26 26 20 22 50 52 49 4E 54 56 0D 45 |&P. && "PRINTV.E| 00000690: 4E 44 0D 0D 54 4F 20 26 5A 0D 20 26 26 20 22 5A |ND..TO &Z. && "Z| 000006A0: 45 54 54 45 4E 0D 45 4E 44 0D 0D 54 4F 20 26 4D |ETTEN.END..TO &M| 000006B0: 0D 20 26 26 20 22 4D 55 5A 49 45 4B 0D 45 4E 44 |. && "MUZIEK.END| 000006C0: 0D 0D 54 4F 20 26 53 0D 20 26 26 20 22 53 50 52 |..TO &S. && "SPR| 000006D0: 4F 4B 45 4E 0D 45 4E 44 0D 0D 54 4F 20 26 26 20 |OKEN.END..TO && | 000006E0: 3A 58 0D 20 53 43 48 52 49 4A 56 45 4E 0D 20 4D |:X. SCHRIJVEN. M| 000006F0: 41 41 4B 20 22 58 20 57 4F 4F 52 44 20 22 4C 4F |AAK "X WOORD "LO| 00000700: 47 4F 20 3A 58 0D 20 50 52 20 53 41 4D 45 4E 20 |GO :X. PR SAMEN | 00000710: 3A 58 20 5B 57 4F 52 44 54 20 4E 55 20 47 45 4C |:X [WORDT NU GEL| 00000720: 41 44 45 4E 5D 0D 20 4C 41 41 44 20 3A 58 0D 45 |ADEN]. LAAD :X.E| 00000730: 4E 44 0D 0D 4D 41 41 4B 20 22 47 49 53 20 28 38 |ND..MAAK "GIS (8| 00000740: 29 0D 4D 41 41 4B 20 22 46 49 53 20 28 36 29 0D |).MAAK "FIS (6).| 00000750: 4D 41 41 4B 20 22 44 49 53 20 28 33 29 0D 4D 41 |MAAK "DIS (3).MA| 00000760: 41 4B 20 22 43 49 53 20 28 31 29 0D 4D 41 41 4B |AK "CIS (1).MAAK| 00000770: 20 22 42 45 53 20 28 31 30 29 0D 4D 41 41 4B 20 | "BES (10).MAAK | 00000780: 22 41 49 53 20 28 31 30 29 0D 4D 41 41 4B 20 22 |"AIS (10).MAAK "| 00000790: 47 20 28 37 29 0D 4D 41 41 4B 20 22 46 20 28 35 |G (7).MAAK "F (5| 000007A0: 29 0D 4D 41 41 4B 20 22 45 20 28 34 29 0D 4D 41 |).MAAK "E (4).MA| 000007B0: 41 4B 20 22 44 20 28 32 29 0D 4D 41 41 4B 20 22 |AK "D (2).MAAK "| 000007C0: 42 20 28 31 31 29 0D 4D 41 41 4B 20 22 4C 41 44 |B (11).MAAK "LAD| 000007D0: 44 45 52 20 5B 38 37 37 39 20 39 33 30 31 20 39 |DER [8779 9301 9| 000007E0: 38 35 34 20 31 30 34 34 30 20 31 31 30 36 30 20 |854 10440 11060 | 000007F0: 31 31 37 31 38 20 31 32 34 31 35 20 31 33 31 35 |11718 12415 1315| 00000800: 33 20 31 33 39 33 35 20 31 34 37 36 34 20 31 35 |3 13935 14764 15| 00000810: 37 34 32 20 31 36 35 37 32 20 31 37 35 35 37 20 |742 16572 17557 | 00000820: 31 38 36 30 31 5D 0D 4D 41 41 4B 20 22 4F 43 54 |18601].MAAK "OCT| 00000830: 41 41 46 20 28 31 29 0D 4D 41 41 4B 20 22 54 45 |AAF (1).MAAK "TE| 00000840: 4D 50 4F 20 28 32 30 29 0D 4D 41 41 4B 20 22 4C |MPO (20).MAAK "L| 00000850: 50 20 28 31 35 29 0D 4D 41 41 4B 20 22 48 50 20 |P (15).MAAK "HP | 00000860: 28 31 35 29 0D 4D 41 41 4B 20 22 47 4F 4C 46 20 |(15).MAAK "GOLF | 00000870: 28 31 37 29 0D 4D 41 41 4B 20 22 53 52 20 28 30 |(17).MAAK "SR (0| 00000880: 29 0D 4D 41 41 4B 20 22 41 44 20 28 39 29 0D 4D |).MAAK "AD (9).M| 00000890: 41 41 4B 20 22 43 20 28 30 29 0D 4D 41 41 4B 20 |AAK "C (0).MAAK | 000008A0: 22 41 20 28 39 29 0D 4D 41 41 4B 20 22 53 54 41 |"A (9).MAAK "STA| 000008B0: 52 54 4F 50 20 5B 5A 45 54 4F 50 5D 0D |RTOP [ZETOP]. |
25. VT 25. LI 90 VT 15 LI 90 VT 25.END.. TO ZETRAND. LOKAAL "X0 MAAK "X0 XPOS LOK AAL "Y0 MAAK "Y0 YPOS. PO NAARXY - 160 1 30 PN NAARY - 75 NAARX 159 NAARY 130 NAA RX - 160. PO NAARXY :X0 :Y0.END..TO BEGI N. PO NAARPL 0 0 MS NAARHOEK 90.END..TO ZET :TEKST. SPROOK 0 KOM ZET1 :TEKST. AL S REGEL < 18 DAN NAARPL 0 REGEL + 1 ANDE RS NAARPL 0 0.END..TO RAAM. HERHAAL 4 [R E 90 VIERKANT]. PO VT 45 PN RE 90 VT 45 HERHAAL 4 [RE 90 VT 90].END..TO DIAMANT .END..TO ACHTHOEK. HERHAAL 8 [VT 25 RE 4 5].END..TO VIERKANT. HERHAAL 4 [VT 40 RE 90].END..TO &B. && "PRINTB.END..TO !H. WEG [BEWAARP ONTHOUD PROG ANTWOORD1 IN E ENUIT PEN BOOGJE WACHT SPATIE SP RUIMTE &V &L &P &Z &M &S && &B !H].END..TO BEWA ARP :BESTAND :NAMEN. ( BEWAAR :BESTAND : NAMEN ). PR "BEWAARD.END..TO ONTHOUD :NA AM. PRINT1 "> DEFINIEER :NAAM ZETV [] PR OG :NAAM ANTWOORD.END..TO PROG :NAAM :CO MM. ALS :COMM = [END] PRINT SAMEN :NAAM [GELEERD] RES []. RUN :COMM PRINT1 ">. R ES ZETV :COMM PROG :NAAM ANTWOORD.END..T O ANTWOORD1. LOKAAL "A MAAK "A ANTWOORD. ALS LEEG? :A RES " ANDERS RES EERSTE :A .END..TO IN :LIJST :TEKST. ALS WOORD? :T EKST MAAK "TEKST SAMEN :TEKST []. ALS LE EG? :TEKST RESULTAAT "WAAR. ALS NIET ERB IJ? EERSTE :TEKST :LIJST RES "NIETW. RES ULTAAT IN :LIJST ME :TEKST.END..TO EENUI T :LIJST. RESULTAAT SAMEN [] ELEMENT ( 1 + RANDOM AANTAL :LIJST ) :LIJST.END..TO PEN. KL 1.END..TO BOOGJE :STRAAL. HERHA AL 10 [VT 3.141 * :STRAAL / 20 RE 9].END ..TO WACHT :TIJD. HERHAAL 750 * :TIJD [] .END..TO SPATIE :AANTAL. ALS :AANTAL = 1 RES CHAR 32. RES WOORD CHAR 32 SPATIE : AANTAL - 1.END..TO SP :AANTAL. RESULTAAT SPATIE :AANTAL.END..TO RUIMTE. .GCOLL P R .NODES.END..TO &V. && "VORMEN.END..TO &L. && "LIJSTEN.END..TO &P. && "PRINTV.E ND..TO &Z. && "ZETTEN.END..TO &M. && "MU ZIEK.END..TO &S. && "SPROKEN.END..TO && :X. SCHRIJVEN. MAAK "X WOORD "LOGO :X. P R SAMEN :X [WORDT NU GELADEN]. LAAD :X.E ND..MAAK "GIS (8).MAAK "FIS (6).MAAK "DI S (3).MAAK "CIS (1).MAAK "BES (10).MAAK "AIS (10).MAAK "G (7).MAAK "F (5).MAAK " E (4).MAAK "D (2).MAAK "B (11).MAAK "LAD DER [8779 9301 9854 10440 11060 11718 12 415 13153 13935 14764 15742 16572 17557 18601].MAAK "OCTAAF (1).MAAK "TEMPO (20) .MAAK "LP (15).MAAK "HP (15).MAAK "GOLF (17).MAAK "SR (0).MAAK "AD (9).MAAK "C ( 0).MAAK "A (9).MAAK "STARTOP [ZETOP].
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL