LEG             
FILE INFORMATION
FILENAME(S): LEG             
FILE TYPE(S): PRG
FILE SIZE: 4.1K
FIRST SEEN: 2025-12-01 00:59:40
APPEARS ON: 1 disk(s)
FILE HASH
7273f367603040c1e8561977e9c2d161d24a6a0ce05a080e6a6e67344f169b5d
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| J J DISK 1 | LEG              | PRG | hedning, Dean | 2 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 2E 08 64 00 99 22 93 11 11 11 11 11 11 1D |....d.."........|
00000010: 1D 1D 1D 1D 1D 1D 1D 1D 1D 2A 2A 2A 2A 2A 2A 2A |.........*******|
00000020: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 00 54 |*************".T|
00000030: 08 6E 00 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 2A |.n.."..........*|
00000040: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000050: 20 20 2A 22 00 7A 08 78 00 99 22 1D 1D 1D 1D 1D | *".z.x..".....|
00000060: 1D 1D 1D 1D 1D 2A 20 20 20 20 20 20 4D 45 4E 59 |.....* MENY|
00000070: 20 20 20 20 20 20 20 20 2A 22 00 A0 08 82 00 99 | *"......|
00000080: 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 2A 20 20 20 20 |"..........* |
00000090: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 22 | *"|
000000A0: 00 C6 08 8C 00 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D |......".........|
000000B0: 1D 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.***************|
000000C0: 2A 2A 2A 2A 2A 22 00 EC 08 96 00 99 22 1D 1D 1D |*****"......"...|
000000D0: 1D 1D 1D 1D 1D 1D 1D 2A 20 20 20 20 20 20 20 20 |.......* |
000000E0: 20 20 20 20 20 20 20 20 20 20 2A 22 00 12 09 A0 | *"....|
000000F0: 00 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 2A 20 31 |.."..........* 1|
00000100: 3A 56 45 43 4B 4F 44 41 47 20 20 20 20 20 20 20 |:VECKODAG |
00000110: 2A 22 00 38 09 AA 00 99 22 1D 1D 1D 1D 1D 1D 1D |*".8....".......|
00000120: 1D 1D 1D 2A 20 20 20 20 20 20 20 20 20 20 20 20 |...* |
00000130: 20 20 20 20 20 20 2A 22 00 5E 09 B4 00 99 22 1D | *".^....".|
00000140: 1D 1D 1D 1D 1D 1D 1D 1D 1D 2A 20 32 3A 53 54 4A |.........* 2:STJ|
00000150: 5C 52 4E 54 45 43 4B 45 4E 20 20 20 2A 22 00 84 |\RNTECKEN *"..|
00000160: 09 BE 00 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 2A |...."..........*|
00000170: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000180: 20 20 2A 22 00 AA 09 C8 00 99 22 1D 1D 1D 1D 1D | *"......".....|
00000190: 1D 1D 1D 1D 1D 2A 20 33 3A 52 40 56 41 52 53 50 |.....* 3:R@VARSP|
000001A0: 52 41 4B 45 54 20 20 20 2A 22 00 D0 09 D2 00 99 |RAKET *"......|
000001B0: 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 2A 20 20 20 20 |"..........* |
000001C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 22 | *"|
000001D0: 00 F6 09 DC 00 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D |......".........|
000001E0: 1D 2A 20 34 3A 53 54 52 59 4B 54 49 50 53 52 41 |.* 4:STRYKTIPSRA|
000001F0: 44 20 20 20 2A 22 00 1C 0A E6 00 99 22 1D 1D 1D |D *"......"...|
00000200: 1D 1D 1D 1D 1D 1D 1D 2A 20 20 20 20 20 20 20 20 |.......* |
00000210: 20 20 20 20 20 20 20 20 20 20 2A 22 00 42 0A F0 | *".B..|
00000220: 00 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 2A 20 35 |.."..........* 5|
00000230: 3A 52 49 54 20 50 52 47 2E 20 20 20 20 20 20 20 |:RIT PRG. |
00000240: 2A 22 00 68 0A FA 00 99 22 1D 1D 1D 1D 1D 1D 1D |*".h....".......|
00000250: 1D 1D 1D 2A 20 20 20 20 20 20 20 20 20 20 20 20 |...* |
00000260: 20 20 20 20 20 20 2A 22 00 8E 0A 04 01 99 22 1D | *"......".|
00000270: 1D 1D 1D 1D 1D 1D 1D 1D 1D 2A 2A 2A 2A 2A 2A 2A |.........*******|
00000280: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 00 A5 |*************"..|
00000290: 0A 2C 01 A1 20 41 24 3A 8B 20 41 24 B2 22 22 20 |.,.. A$:. A$."" |
000002A0: A7 20 33 30 30 00 B9 0A 36 01 8B 20 41 24 B2 22 |. 300...6.. A$."|
000002B0: 31 22 20 A7 20 31 30 30 30 00 CD 0A 68 01 8B 20 |1" . 1000...h.. |
000002C0: 41 24 B2 22 32 22 20 A7 20 32 30 30 30 00 E1 0A |A$."2" . 2000...|
000002D0: 72 01 8B 20 41 24 B2 22 33 22 20 A7 20 33 30 30 |r.. A$."3" . 300|
000002E0: 30 00 F5 0A 7C 01 8B 20 41 24 B2 22 34 22 20 A7 |0...|.. A$."4" .|
000002F0: 20 34 30 30 30 00 08 0B 86 01 8B 20 41 24 B2 22 | 4000...... A$."|
00000300: 35 22 A7 20 35 30 30 30 00 1B 0B E8 03 99 20 22 |5". 5000...... "|
00000310: 93 11 11 11 11 11 11 11 11 11 22 00 32 0B F2 03 |..........".2...|
00000320: 8F 20 56 49 4C 4B 45 4E 20 56 45 43 4B 4F 44 41 |. VILKEN VECKODA|
00000330: 47 3F 00 42 0B FC 03 8F 20 56 41 52 49 41 42 45 |G?.B.... VARIABE|
00000340: 4C 3A 00 4E 0B 06 04 8F 20 44 3D 44 41 47 00 5C |L:.N.... D=DAG.\|
00000350: 0B 10 04 8F 20 4D 3D 4D 41 4E 41 44 00 78 0B 1A |.... M=MANAD.x..|
00000360: 04 8F 20 48 3D 41 52 54 41 4C 2C 53 49 46 46 52 |.. H=ARTAL,SIFFR|
00000370: 20 31 20 4F 43 48 20 32 00 94 0B 24 04 8F 20 54 | 1 OCH 2...$.. T|
00000380: 3D 41 52 54 41 4C 2C 53 49 46 46 52 20 33 20 4F |=ARTAL,SIFFR 3 O|
00000390: 43 48 20 34 00 B5 0B 2E 04 8F 20 5A 3D 5A 45 4C |CH 4...... Z=ZEL|
000003A0: 4C 4E 45 52 53 20 46 4F 52 4D 45 4C 3D 56 45 43 |LNERS FORMEL=VEC|
000003B0: 4B 4F 44 41 47 00 CB 0B 56 04 99 2C 22 53 4B 52 |KODAG...V..,"SKR|
000003C0: 49 56 20 44 41 54 55 4D 3A 11 22 00 DD 0B 60 04 |IV DATUM:."...`.|
000003D0: 99 2C 22 44 41 47 2C 31 2D 33 31 3F 22 00 EB 0B |.,"DAG,1-31?"...|
000003E0: 6A 04 99 22 11 22 2C 3A 85 20 44 00 FE 0B 6F 04 |j..".",:. D...o.|
000003F0: 99 20 22 93 11 11 11 11 11 11 11 11 11 22 00 12 |. ".........."..|
00000400: 0C 74 04 99 2C 22 4D 41 4E 41 44 2C 31 2D 31 32 |.t..,"MANAD,1-12|
00000410: 3F 22 00 20 0C 7E 04 99 22 11 22 2C 3A 85 20 4D |?". .~..".",:. M|
00000420: 00 33 0C 83 04 99 20 22 93 11 11 11 11 11 11 11 |.3.... "........|
00000430: 11 11 22 00 54 0C 88 04 99 2C 22 53 49 46 46 52 |..".T....,"SIFFR|
00000440: 20 31 20 4F 43 48 20 32 20 49 20 41 52 54 41 4C | 1 OCH 2 I ARTAL|
00000450: 45 54 3F 22 00 62 0C 92 04 99 22 11 22 2C 3A 85 |ET?".b....".",:.|
00000460: 20 48 00 75 0C 97 04 99 20 22 93 11 11 11 11 11 | H.u.... "......|
00000470: 11 11 11 11 22 00 96 0C 9C 04 99 2C 22 53 49 46 |...."......,"SIF|
00000480: 46 52 20 33 20 4F 43 48 20 34 20 49 20 41 52 54 |FR 3 OCH 4 I ART|
00000490: 41 4C 45 54 3F 22 00 A4 0C A6 04 99 22 11 22 2C |ALET?"......".",|
000004A0: 3A 85 20 54 00 B7 0C AB 04 99 20 22 93 11 11 11 |:. T...... "....|
000004B0: 11 11 11 11 11 11 22 00 C7 0C B0 04 8F 20 42 45 |......"...... BE|
000004C0: 52 5C 4B 4E 49 4E 47 00 D3 0C BA 04 88 20 4D B2 |R\KNING...... M.|
000004D0: 4D AB 32 00 F0 0C C4 04 8B 20 4D B3 31 20 A7 20 |M.2...... M.1 . |
000004E0: 88 20 4D B2 4D AA 31 32 3A 88 20 54 B2 54 AB 31 |. M.M.12:. T.T.1|
000004F0: 00 1B 0D CE 04 88 20 5A B2 B5 28 32 2E 36 AC 4D |...... Z..(2.6.M|
00000500: AB 30 2E 31 29 AA 44 AA 54 AA B5 28 54 AD 34 29 |.0.1).D.T..(T.4)|
00000510: AA B5 28 48 AD 34 29 AB 32 AC 48 00 2E 0D D8 04 |..(H.4).2.H.....|
00000520: 88 20 5A B2 5A AB 37 AC B5 28 5A AD 37 29 00 3D |. Z.Z.7..(Z.7).=|
00000530: 0D 14 05 8F 20 55 54 53 4B 52 49 46 54 00 4F 0D |.... UTSKRIFT.O.|
00000540: 1E 05 99 22 93 11 11 11 11 11 11 11 11 11 22 00 |..."..........".|
00000550: 6A 0D 28 05 99 2C 22 56 45 43 4B 4F 44 41 47 45 |j.(..,"VECKODAGE|
00000560: 4E 20 5C 52 20 45 4E 20 22 3B 00 88 0D 32 05 8B |N \R EN ";...2..|
00000570: 20 5A B2 30 20 A7 20 99 20 22 53 40 4E 44 41 47 | Z.0 . . "S@NDAG|
00000580: 22 3A 89 20 31 34 30 30 00 A6 0D 3C 05 8B 20 5A |":. 1400...<.. Z|
00000590: B2 31 20 A7 20 99 20 22 4D 41 4E 44 41 47 22 3A |.1 . . "MANDAG":|
000005A0: 89 20 31 34 30 30 00 C4 0D 46 05 8B 20 5A B2 32 |. 1400...F.. Z.2|
000005B0: 20 A7 20 99 20 22 54 49 53 44 41 47 22 3A 89 20 | . . "TISDAG":. |
000005C0: 31 34 30 30 00 E2 0D 50 05 8B 20 5A B2 33 20 A7 |1400...P.. Z.3 .|
000005D0: 20 99 20 22 4F 4E 53 44 41 47 22 3A 89 20 31 34 | . "ONSDAG":. 14|
000005E0: 30 30 00 01 0E 5A 05 8B 20 5A B2 34 20 A7 20 99 |00...Z.. Z.4 . .|
000005F0: 20 22 54 4F 52 53 44 41 47 22 3A 89 20 31 34 30 | "TORSDAG":. 140|
00000600: 30 00 1F 0E 64 05 8B 20 5A B2 35 20 A7 20 99 20 |0...d.. Z.5 . . |
00000610: 22 46 52 45 44 41 47 22 3A 89 20 31 34 30 30 00 |"FREDAG":. 1400.|
00000620: 2E 0E 6E 05 99 20 22 4C 40 52 44 41 47 22 00 4A |..n.. "L@RDAG".J|
00000630: 0E 78 05 99 20 22 11 11 11 11 11 11 11 22 3A 81 |.x.. ".......":.|
00000640: 49 B2 31 A4 31 30 30 30 3A 82 00 6B 0E DC 05 99 |I.1.1000:..k....|
00000650: 2C 22 41 54 45 52 20 54 49 4C 4C 20 4D 45 4E 59 |,"ATER TILL MENY|
00000660: 4E 20 20 20 20 20 20 3D 4D 11 22 00 8B 0E E6 05 |N =M.".....|
00000670: 99 2C 22 56 49 4C 4C 20 44 55 20 46 40 52 53 40 |.,"VILL DU F@RS@|
00000680: 4B 41 20 49 47 45 4E 20 3D 4A 22 00 A3 0E F0 05 |KA IGEN =J".....|
00000690: A1 20 41 24 3A 8B 20 41 24 B2 22 22 20 A7 20 31 |. A$:. A$."" . 1|
000006A0: 35 32 30 00 B6 0E FA 05 8B 20 41 24 B2 22 4D 22 |520...... A$."M"|
000006B0: 20 A7 20 31 30 30 00 CA 0E 04 06 8B 20 41 24 B2 | . 100...... A$.|
000006C0: 22 4A 22 20 A7 20 31 30 30 30 00 D7 0E D0 07 86 |"J" . 1000......|
000006D0: 20 41 24 28 32 34 29 00 EF 0E DA 07 8F 20 44 49 | A$(24)...... DI|
000006E0: 54 54 20 53 54 4A 5C 52 4E 54 45 43 4B 45 4E 00 |TT STJ\RNTECKEN.|
000006F0: 00 0F E4 07 8F 20 56 41 52 49 41 42 4C 45 52 3A |..... VARIABLER:|
00000700: 00 0E 0F EE 07 8F 20 4D 3D 4D 41 4E 41 44 00 1C |...... M=MANAD..|
00000710: 0F F8 07 8F 20 4D 3D 4D 41 4E 41 44 00 28 0F 02 |.... M=MANAD.(..|
00000720: 08 8F 20 44 3D 44 41 47 00 49 0F 0C 08 8F 20 46 |.. D=DAG.I.... F|
00000730: 3D 46 40 52 53 54 41 20 44 41 47 20 49 20 4E 5C |=F@RSTA DAG I N\|
00000740: 53 54 41 20 56 45 43 4B 41 00 5C 0F 16 08 99 20 |STA VECKA.\.... |
00000750: 22 93 11 11 11 11 11 11 11 11 11 22 00 72 0F 34 |"..........".r.4|
00000760: 08 8F 20 54 45 43 4B 45 4E 20 4C 5C 53 45 53 20 |.. TECKEN L\SES |
00000770: 49 4E 00 81 0F 3E 08 81 20 49 B2 31 20 A4 20 31 |IN...>.. I.1 . 1|
00000780: 32 00 8D 0F 48 08 87 20 41 24 28 49 29 00 95 0F |2...H.. A$(I)...|
00000790: 52 08 82 20 49 00 C3 0F 5C 08 83 20 53 54 45 4E |R.. I...\.. STEN|
000007A0: 42 4F 43 4B 45 4E 2C 56 41 54 54 55 4D 41 4E 4E |BOCKEN,VATTUMANN|
000007B0: 45 4E 2C 46 49 53 4B 41 52 4E 41 2C 56 5C 44 55 |EN,FISKARNA,V\DU|
000007C0: 52 45 4E 00 EC 0F 66 08 83 20 4F 58 45 4E 2C 54 |REN...f.. OXEN,T|
000007D0: 56 49 4C 4C 49 4E 47 41 52 4E 41 2C 4B 52 5C 46 |VILLINGARNA,KR\F|
000007E0: 54 41 4E 2C 4C 45 49 4A 4F 4E 45 54 00 14 10 70 |TAN,LEIJONET...p|
000007F0: 08 83 20 4A 55 4E 47 46 52 55 4E 2C 56 41 47 45 |.. JUNGFRUN,VAGE|
00000800: 4E 2C 53 4B 4F 52 50 49 4F 4E 45 4E 2C 53 4B 59 |N,SKORPIONEN,SKY|
00000810: 54 54 45 4E 00 1A 10 75 08 8C 00 38 10 98 08 8F |TTEN...u...8....|
00000820: 20 49 4E 4D 41 54 4E 49 4E 47 20 4D 41 4E 41 44 | INMATNING MANAD|
00000830: 20 4F 43 48 20 44 41 47 00 57 10 A2 08 99 2C 22 | OCH DAG.W....,"|
00000840: 44 49 4E 20 46 40 44 45 4C 53 45 4D 41 4E 41 44 |DIN F@DELSEMANAD|
00000850: 3A 31 2D 31 32 3F 22 00 66 10 AC 08 99 22 11 22 |:1-12?".f...."."|
00000860: 2C 3A 20 85 20 4D 00 78 10 B1 08 99 22 93 11 11 |,: . M.x...."...|
00000870: 11 11 11 11 11 11 11 22 00 95 10 B6 08 99 2C 22 |......."......,"|
00000880: 44 49 4E 20 46 40 44 45 4C 53 45 44 41 47 3A 31 |DIN F@DELSEDAG:1|
00000890: 2D 33 31 3F 22 00 A4 10 C0 08 99 22 11 22 2C 3A |-31?"......".",:|
000008A0: 20 85 20 44 00 B6 10 C5 08 99 22 93 11 11 11 11 | . D......".....|
000008B0: 11 11 11 11 11 22 00 D7 10 FC 08 8F 20 47 52 5C |....."...... GR\|
000008C0: 4E 53 20 53 54 4A 5C 52 4E 54 45 43 4B 45 4E 20 |NS STJ\RNTECKEN |
000008D0: 42 45 53 54 5C 4D 53 00 E2 10 06 09 88 20 46 B2 |BEST\MS...... F.|
000008E0: 32 30 00 28 11 10 09 91 20 4D 20 89 20 32 33 37 |20.(.... M . 237|
000008F0: 30 2C 32 33 38 30 2C 32 33 37 30 2C 32 33 37 30 |0,2380,2370,2370|
00000900: 2C 32 33 36 30 2C 32 33 36 30 2C 32 33 34 30 2C |,2360,2360,2340,|
00000910: 32 33 34 30 2C 32 33 34 30 2C 32 33 34 30 2C 32 |2340,2340,2340,2|
00000920: 33 35 30 2C 32 33 36 30 00 3D 11 1A 09 8F 20 4A |350,2360.=.... J|
00000930: 55 53 54 45 52 49 4E 47 20 41 56 20 46 00 49 11 |USTERING AV F.I.|
00000940: 24 09 88 20 46 B2 46 AA 31 00 55 11 2E 09 88 20 |$.. F.F.1.U.... |
00000950: 46 B2 46 AA 31 00 61 11 38 09 88 20 46 B2 46 AA |F.F.1.a.8.. F.F.|
00000960: 31 00 6D 11 42 09 88 20 46 B2 46 AA 31 00 80 11 |1.m.B.. F.F.1...|
00000970: 4C 09 8B 20 44 B1 B2 46 20 A7 20 4D B2 4D AA 31 |L.. D..F . M.M.1|
00000980: 00 91 11 56 09 8B 20 4D B1 31 32 20 A7 20 4D B2 |...V.. M.12 . M.|
00000990: 31 00 A0 11 C4 09 8F 20 55 54 53 4B 52 49 46 54 |1...... UTSKRIFT|
000009A0: 00 BE 11 CE 09 99 2C 22 44 49 54 54 20 53 54 4A |......,"DITT STJ|
000009B0: 5C 52 4E 54 45 43 4B 45 4E 20 5C 52 11 22 00 CB |\RNTECKEN \R."..|
000009C0: 11 D3 09 99 20 2C 41 24 28 4D 29 00 E7 11 23 0A |.... ,A$(M)...#.|
000009D0: 99 20 22 11 11 11 11 11 11 11 22 3A 81 49 B2 31 |. ".......":.I.1|
000009E0: A4 31 30 30 30 3A 82 00 08 12 28 0A 99 2C 22 41 |.1000:....(..,"A|
000009F0: 54 45 52 20 54 49 4C 4C 20 4D 45 4E 59 4E 20 20 |TER TILL MENYN |
00000A00: 20 20 20 20 3D 4D 11 22 00 29 12 32 0A 99 2C 22 | =M.".).2..,"|
00000A10: 56 49 4C 4C 20 44 55 20 46 40 52 53 40 4B 41 20 |VILL DU F@RS@KA |
00000A20: 49 47 45 4E 20 3D 20 4A 22 00 41 12 3C 0A A1 20 |IGEN = J".A.<.. |
00000A30: 41 24 3A 8B 20 41 24 B2 22 22 20 A7 20 32 36 32 |A$:. A$."" . 262|
00000A40: 30 00 52 12 46 0A 8B 20 41 24 B2 22 4D 22 20 A7 |0.R.F.. A$."M" .|
00000A50: 20 8A 00 66 12 50 0A 8B 20 41 24 B2 22 4A 22 20 | ..f.P.. A$."J" |
00000A60: A7 20 32 30 37 30 00 6C 12 B8 0B 99 00 7F 12 C2 |. 2070.l........|
00000A70: 0B 8F 20 52 40 56 41 52 53 50 52 41 4B 45 54 00 |.. R@VARSPRAKET.|
00000A80: 8F 12 CC 0B 8F 20 56 41 52 49 41 42 45 4C 3A 00 |..... VARIABEL:.|
00000A90: A1 12 D6 0B 8F 20 56 24 28 4A 29 3D 56 4F 4B 41 |..... V$(J)=VOKA|
00000AA0: 4C 00 BE 12 E0 0B 8F 20 4A 3D 4C 4F 4F 50 56 41 |L...... J=LOOPVA|
00000AB0: 52 49 41 42 45 4C 20 56 4F 4B 41 4C 45 52 00 DA |RIABEL VOKALER..|
00000AC0: 12 EA 0B 8F 20 41 24 3D 54 45 58 54 20 41 54 54 |.... A$=TEXT ATT|
00000AD0: 20 40 56 45 52 53 5C 54 54 41 00 F6 12 F4 0B 8F | @VERS\TTA......|
00000AE0: 20 4C 3D 41 4E 54 41 4C 20 54 45 43 4B 45 4E 20 | L=ANTAL TECKEN |
00000AF0: 49 20 54 45 58 54 00 0D 13 FE 0B 8F 20 52 24 3D |I TEXT...... R$=|
00000B00: 40 56 45 52 53 41 54 54 20 54 45 58 54 00 31 13 |@VERSATT TEXT.1.|
00000B10: 08 0C 8F 20 42 24 3D 48 4A 5C 4C 50 56 41 52 49 |... B$=HJ\LPVARI|
00000B20: 41 42 45 4C 20 40 56 45 52 53 5C 54 54 4E 49 4E |ABEL @VERS\TTNIN|
00000B30: 47 00 4F 13 12 0C 8F 20 56 41 52 49 41 42 45 4C |G.O.... VARIABEL|
00000B40: 4E 20 52 24 20 4E 4F 4C 4C 53 54 5C 4C 4C 53 00 |N R$ NOLLST\LLS.|
00000B50: 5B 13 1C 0C 88 20 52 24 B2 22 22 00 74 13 26 0C |[.... R$."".t.&.|
00000B60: 8F 20 56 4F 4B 41 4C 45 52 4E 41 20 4C 5C 53 45 |. VOKALERNA L\SE|
00000B70: 53 20 49 4E 00 86 13 30 0C 99 22 93 11 11 11 11 |S IN...0..".....|
00000B80: 11 11 11 11 11 22 00 91 13 3A 0C 8D 20 33 33 30 |....."...:.. 330|
00000B90: 30 00 97 13 3F 0C 8C 00 AB 13 44 0C 8F 20 54 45 |0...?.....D.. TE|
00000BA0: 58 54 20 4D 41 54 41 53 20 49 4E 00 B6 13 4E 0C |XT MATAS IN...N.|
00000BB0: 8D 20 33 34 30 30 00 CB 13 58 0C 8F 20 54 45 58 |. 3400...X.. TEX|
00000BC0: 54 20 40 56 45 52 53 5C 54 54 53 00 D6 13 62 0C |T @VERS\TTS...b.|
00000BD0: 8D 20 33 35 30 30 00 F4 13 6C 0C 8F 20 40 56 45 |. 3500...l.. @VE|
00000BE0: 52 53 41 54 54 20 54 45 58 54 20 53 4B 52 49 56 |RSATT TEXT SKRIV|
00000BF0: 53 20 55 54 00 FD 13 76 0C 99 22 93 22 00 08 14 |S UT...v.."."...|
00000C00: 80 0C 8D 20 33 37 30 30 00 23 14 8A 0C 99 22 11 |... 3700.#....".|
00000C10: 11 11 11 11 11 11 22 3A 81 49 B2 31 A4 33 30 30 |......":.I.1.300|
00000C20: 30 3A 82 00 43 14 94 0C 99 2C 22 41 54 45 52 20 |0:..C....,"ATER |
00000C30: 54 49 4C 4C 20 4D 45 4E 59 4E 20 20 20 20 20 3D |TILL MENYN =|
00000C40: 4D 11 22 00 63 14 9E 0C 99 2C 22 56 49 4C 4C 20 |M.".c....,"VILL |
00000C50: 44 55 20 46 40 52 53 40 4B 41 20 49 47 45 4E 20 |DU F@RS@KA IGEN |
00000C60: 3D 4A 22 00 7B 14 A8 0C A1 20 41 24 3A 8B 20 41 |=J".{.... A$:. A|
00000C70: 24 B2 22 22 20 A7 20 33 32 34 30 00 8E 14 B2 0C |$."" . 3240.....|
00000C80: 8B 20 41 24 B2 22 4D 22 20 A7 20 31 30 30 00 A2 |. A$."M" . 100..|
00000C90: 14 BC 0C 8B 20 41 24 B2 22 4A 22 20 A7 20 33 30 |.... A$."J" . 30|
00000CA0: 30 30 00 C4 14 E4 0C 8F 20 53 55 42 52 55 54 49 |00...... SUBRUTI|
00000CB0: 4E 20 56 4F 4B 41 4C 45 52 4E 41 20 4C 5C 53 45 |N VOKALERNA L\SE|
00000CC0: 53 20 49 4E 00 D2 14 EE 0C 81 20 4A B2 31 20 A4 |S IN...... J.1 .|
00000CD0: 20 39 00 DE 14 F8 0C 87 20 56 24 28 4A 29 00 E6 | 9...... V$(J)..|
00000CE0: 14 02 0D 82 20 4A 00 FE 14 0C 0D 83 20 41 2C 45 |.... J...... A,E|
00000CF0: 2C 49 2C 4F 2C 55 2C 59 2C 41 2C 5C 2C 40 00 04 |,I,O,U,Y,A,\,@..|
00000D00: 15 16 0D 8E 00 21 15 48 0D 8F 20 53 55 42 52 55 |.....!.H.. SUBRU|
00000D10: 54 49 4E 20 54 45 58 54 20 4D 41 54 41 53 20 49 |TIN TEXT MATAS I|
00000D20: 4E 00 46 15 52 0D 99 22 53 4B 52 49 56 20 45 54 |N.F.R.."SKRIV ET|
00000D30: 54 20 4F 52 44 20 45 4C 4C 45 52 20 45 4E 20 4D |T ORD ELLER EN M|
00000D40: 45 4E 49 4E 47 22 00 4F 15 5C 0D 85 20 41 24 00 |ENING".O.\.. A$.|
00000D50: 55 15 66 0D 8E 00 73 15 AC 0D 8F 20 53 55 42 52 |U.f...s.... SUBR|
00000D60: 55 54 49 4E 20 54 45 58 54 20 40 56 45 52 53 5C |UTIN TEXT @VERS\|
00000D70: 54 54 53 00 81 15 B6 0D 88 20 4C B2 C3 28 41 24 |TTS...... L..(A$|
00000D80: 29 00 8F 15 C0 0D 81 20 49 B2 31 20 A4 20 4C 00 |)...... I.1 . L.|
00000D90: A2 15 CA 0D 88 20 42 24 B2 CA 28 41 24 2C 49 2C |..... B$..(A$,I,|
00000DA0: 31 29 00 B1 15 D4 0D 88 20 52 24 B2 52 24 AA 42 |1)...... R$.R$.B|
00000DB0: 24 00 BF 15 DE 0D 81 20 4A B2 31 20 A4 20 39 00 |$...... J.1 . 9.|
00000DC0: D7 15 E8 0D 8B 20 42 24 B2 56 24 28 4A 29 20 A7 |..... B$.V$(J) .|
00000DD0: 20 89 20 33 35 39 30 00 DF 15 F2 0D 82 20 4A 00 | . 3590...... J.|
00000DE0: F2 15 FC 0D 88 20 52 24 B2 52 24 AA 22 4F 22 AA |..... R$.R$."O".|
00000DF0: 42 24 00 FA 15 06 0E 82 20 49 00 00 16 10 0E 8E |B$...... I......|
00000E00: 00 27 16 74 0E 8F 20 53 55 42 52 55 54 49 4E 20 |.'.t.. SUBRUTIN |
00000E10: 40 56 45 52 53 41 54 54 20 54 45 58 54 20 53 4B |@VERSATT TEXT SK|
00000E20: 52 49 56 53 20 55 54 00 48 16 7E 0E 99 20 41 24 |RIVS UT.H.~.. A$|
00000E30: 3B 22 20 50 41 20 52 40 56 41 52 53 50 52 41 4B |;" PA R@VARSPRAK|
00000E40: 45 54 20 42 4C 49 52 22 00 4E 16 88 0E 99 00 57 |ET BLIR".N.....W|
00000E50: 16 92 0E 99 20 52 24 00 5D 16 9C 0E 8E 00 69 16 |.... R$.].....i.|
00000E60: A0 0F 99 22 93 11 11 11 22 00 89 16 AA 0F 99 20 |..."...."...... |
00000E70: 20 22 20 20 20 20 20 20 20 20 20 20 53 54 52 59 | " STRY|
00000E80: 4B 54 49 50 53 52 41 44 22 00 8F 16 B4 0F 99 00 |KTIPSRAD".......|
00000E90: 9E 16 BE 0F 81 20 58 B2 31 20 A4 20 31 33 00 AB |..... X.1 . 13..|
00000EA0: 16 C8 0F 88 20 50 B2 BB 28 30 29 00 BD 16 D2 0F |.... P..(0).....|
00000EB0: 8B 20 50 B3 2E 35 20 A7 20 34 31 30 30 00 D0 16 |. P..5 . 4100...|
00000EC0: DC 0F 8B 20 50 B3 2E 37 35 20 A7 20 34 31 32 30 |... P..75 . 4120|
00000ED0: 00 EC 16 E6 0F 99 20 22 20 20 20 20 20 20 20 20 |...... " |
00000EE0: 20 20 20 20 20 20 20 20 20 20 32 22 00 F4 16 F0 | 2"....|
00000EF0: 0F 82 20 58 00 FA 16 F1 0F 99 00 0E 17 F5 0F 99 |.. X............|
00000F00: 2C 22 56 45 43 4B 41 4E 53 20 52 41 44 22 00 24 |,"VECKANS RAD".$|
00000F10: 17 FA 0F 99 20 22 11 22 3A 81 49 B2 31 A4 34 30 |.... ".":.I.1.40|
00000F20: 30 30 3A 82 00 44 17 FC 0F 99 2C 22 41 54 45 52 |00:..D....,"ATER|
00000F30: 20 54 49 4C 4C 20 4D 45 4E 59 4E 20 20 20 20 20 | TILL MENYN |
00000F40: 3D 4D 11 22 00 64 17 FE 0F 99 2C 22 56 49 4C 4C |=M.".d....,"VILL|
00000F50: 20 44 55 20 46 40 52 53 40 4B 41 20 49 47 45 4E | DU F@RS@KA IGEN|
00000F60: 20 3D 4A 22 00 7C 17 00 10 A1 20 41 24 3A 8B 20 | =J".|.... A$:. |
00000F70: 41 24 B2 22 22 20 A7 20 34 30 39 36 00 8F 17 01 |A$."" . 4096....|
00000F80: 10 8B 20 41 24 B2 22 4D 22 20 A7 20 31 30 30 00 |.. A$."M" . 100.|
00000F90: A3 17 02 10 8B 20 41 24 B2 22 4A 22 20 A7 20 34 |..... A$."J" . 4|
00000FA0: 30 30 30 00 BC 17 04 10 99 22 20 20 20 20 20 20 |000......" |
00000FB0: 20 20 20 20 20 20 20 20 20 20 31 22 00 C7 17 0E | 1"....|
00000FC0: 10 89 20 34 30 38 30 00 E1 17 18 10 99 22 20 20 |.. 4080......" |
00000FD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 58 | X|
00000FE0: 22 00 EC 17 22 10 89 20 34 30 38 30 00 F5 17 88 |"...".. 4080....|
00000FF0: 13 99 22 93 22 00 18 18 92 13 99 22 54 55 52 4E |.."."......"TURN|
00001000: 20 44 49 53 4B 45 54 54 45 20 26 20 50 52 45 53 | DISKETTE & PRES|
00001010: 53 20 53 50 41 43 45 22 00 30 18 9C 13 A1 20 5A |S SPACE".0.... Z|
00001020: 24 3A 8B 20 5A 24 B2 22 20 22 A7 20 35 30 33 30 |$:. Z$." ". 5030|
00001030: 00 3B 18 A1 13 89 20 35 30 32 30 00 50 18 A6 13 |.;.... 5020.P...|
00001040: D3 22 4B 4F 41 4C 41 20 50 41 49 4E 54 45 52 22 |."KOALA PAINTER"|
00001050: 00 00 00 |... |
....D..".................***************
*****".T.N.."..........*
*".Z.X.."..........* MENY
*". ...."..........* *"
.F...."..........********************"..
...."..........* *"...
.."..........* 1:VECKODAG *".8....
"..........* *".^....".
.........* 2:STJ\RNTECKEN *"......"...
.......* *"...H..".....
.....* 3:R@VARSPRAKET *".P.R..".......
...* *"......".........
.* 4:STRYKTIPSRAD *"......"..........*
*".B...."..........* 5
:RIT PRG. *".H...."..........*
*"......"..........*******
*************"...,.. A$:. A$."" . 300...
6.. A$."1" . 1000.M.H.. A$."2" . 2000...
R.. A$."3" . 3000...|.. A$."4" . 4000...
... A$."5". 5000...... "..........".2...
. VILKEN VECKODAG?.B.... VARIABEL:.N....
D=DAG.\.... M=MANAD.X.... H=ARTAL,SIFFR
1 OCH 2...$.. T=ARTAL,SIFFR 3 OCH 4....
.. Z=ZELLNERS FORMEL=VECKODAG.K.V..,"SKR
IV DATUM:."...`..,"DAG,1-31?"...J..".",:
. D...O.. ".........."...T..,"MANAD,1-12
?". .~..".",:. M.3.... "..........".T...
.,"SIFFR 1 OCH 2 I ARTALET?".B....".",:.
H.U.... ".........."......,"SIFFR 3 OCH
4 I ARTALET?"......".",:. T...... "....
......".G.... BER\KNING.S.... M.M.2...D.
. M.1 . . M.M.12:. T.T.1...N.. Z..(2.6.M
.0.1).D.T..(T.4)..(H.4).2.H...X.. Z.Z.7.
.(Z.7).=.... UTSKRIFT.O...."..........".
J.(..,"VECKODAGEN \R EN ";...2.. Z.0 . .
"S@NDAG":. 1400...<.. Z.1 . . "MANDAG":
. 1400.D.F.. Z.2 . . "TISDAG":. 1400...P
.. Z.3 . . "ONSDAG":. 1400...Z.. Z.4 . .
"TORSDAG":. 1400...D.. Z.5 . . "FREDAG"
:. 1400...N.. "L@RDAG".J.X.. ".......":.
I.1.1000:..K....,"ATER TILL MENYN =
M."......,"VILL DU F@RS@KA IGEN =J".....
. A$:. A$."" . 1520...... A$."M" . 100.J
.... A$."J" . 1000.W.P.. A$(24)...Z.. DI
TT STJ\RNTECKEN...... VARIABLER:...... M
=MANAD...... M=MANAD.(.... D=DAG.I.... F
=F@RSTA DAG I N\STA VECKA.\.... ".......
...".R.4.. TECKEN L\SES IN...>.. I.1 . 1
2...H.. A$(I)...R.. I.C.\.. STENBOCKEN,V
ATTUMANNEN,FISKARNA,V\DUREN...F.. OXEN,T
VILLINGARNA,KR\FTAN,LEIJONET...P.. JUNGF
RUN,VAGEN,SKORPIONEN,SKYTTEN...U...8....
INMATNING MANAD OCH DAG.W....,"DIN F@DE
LSEMANAD:1-12?".F....".",: . M.X...."...
......."......,"DIN F@DELSEDAG:1-31?"...
...".",: . D...E.."..........".W.... GR\
NS STJ\RNTECKEN BEST\MS...... F.20.(....
M . 2370,2380,2370,2370,2360,2360,2340,
2340,2340,2340,2350,2360.=.... JUSTERING
AV F.I.$.. F.F.1.U.... F.F.1.A.8.. F.F.
1.M.B.. F.F.1...L.. D..F . M.M.1...V.. M
.12 . M.1. .D.. UTSKRIFT...N..,"DITT STJ
\RNTECKEN \R.".K.S.. ,A$(M)...#.. ".....
..":.I.1.1000:....(..,"ATER TILL MENYN
=M.".).2..,"VILL DU F@RS@KA IGEN = J
".A.<.. A$:. A$."" . 2620.R.F.. A$."M" .
..F.P.. A$."J" . 2070.L......B.. R@VAR
SPRAKET...L.. VARIABEL:...V.. V$(J)=VOKA
L...... J=LOOPVARIABEL VOKALER.Z.... A$=
TEXT ATT @VERS\TTA...... L=ANTAL TECKEN
I TEXT...... R$=@VERSATT TEXT.1.... B$=H
J\LPVARIABEL @VERS\TTNING.O.... VARIABEL
N R$ NOLLST\LLS.[.... R$."".T.&.. VOKALE
RNA L\SES IN...0..".........."...:.. 330
0...?.....D.. TEXT MATAS IN...N.. 3400.K
.X.. TEXT @VERS\TTS.V.B.. 3500...L.. @VE
RSATT TEXT SKRIVS UT...V.."."...... 3700
.#....".......":.I.1.3000:..C....,"ATER
TILL MENYN =M.".C....,"VILL DU F@RS@
KA IGEN =J".{.... A$:. A$."" . 3240.....
. A$."M" . 100...... A$."J" . 3000.D....
SUBRUTIN VOKALERNA L\SES IN.R.... J.1 .
9...... V$(J)...... J...... A,E,I,O,U,Y
,A,\,@.......!.H.. SUBRUTIN TEXT MATAS I
N.F.R.."SKRIV ETT ORD ELLER EN MENING".O
.\.. A$.U.F...S.... SUBRUTIN TEXT @VERS\
TTS...... L.C(A$)...... I.1 . L...J.. B$
.J(A$,I,1)...T.. R$.R$.B$...... J.1 . 9.
W.... B$.V$(J) . . 3590...... J...... R$
.R$."O".B$...... I.......'.T.. SUBRUTIN
@VERSATT TEXT SKRIVS UT.H.~.. A$;" PA R@
VARSPRAKET BLIR".N.....W.... R$.].....I.
.."...."...... " STRYKTIPSRAD
"............ X.1 . 13...H.. P..(0)...R.
. P..5 . 4100.P.... P..75 . 4120...... "
2"...... X............
,"VECKANS RAD".$.... ".":.I.1.4000:..D..
..,"ATER TILL MENYN =M.".D....,"VILL
DU F@RS@KA IGEN =J".|.... A$:. A$."" .
4096...... A$."M" . 100...... A$."J" . 4
000......" 1".G.... 4080.
....." X"...".. 4080....
.."."......"TURN DISKETTE & PRESS SPACE"
.0.... Z$:. Z$." ". 5030.;.... 5020.P...
S"KOALA PAINTER"...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL