ROST-BELYSN.
FILE INFORMATION
FILENAME(S): ROST-BELYSN.
FILE TYPE(S): DEL
FILE SIZE: 4.8K
FIRST SEEN: 2025-11-30 19:38:40
APPEARS ON: 1 disk(s)
FILE HASH
2ac17e93543504af8563d20ccdc4e91be746cf8419477a3583e2e564e57489bb
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DISK NR 00 | ROST-BELYSN. | DEL | Curtcool, Brian | 26 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 54 41 45 4C 00 E7 19 08 0C 82 4E 00 EE 19 12 0C |TAEL......N.....|
00000010: 64 34 00 FA 19 1C 0C 64 31 20 54 41 45 4C 00 04 |d4.....d1 TAEL..|
00000020: 1A 26 0C 4C B2 59 AA 44 00 0B 1A 30 0C 64 3A 00 |.&.L.Y.D...0.d:.|
00000030: 1B 1A 3A 0C 59 B2 59 AA 54 3A 5A B2 5A AA 31 00 |..:.Y.Y.T:Z.Z.1.|
00000040: 2D 1A 44 0C 43 28 5A 29 B2 43 28 5A AB 31 29 AA |-.D.C(Z).C(Z.1).|
00000050: 54 00 39 1A 4E 0C 53 4F B2 43 28 5A 29 00 50 1A |T.9.N.SO.C(Z).P.|
00000060: 58 0C 64 33 20 53 50 52 49 4E 47 20 54 49 4C 20 |X.d3 SPRING TIL |
00000070: 4B 55 52 53 00 61 1A 62 0C 41 25 28 58 2C 59 29 |KURS.a.b.A%(X,Y)|
00000080: B2 4B 4F AC 54 00 70 1A 6C 0C 8B 59 B3 59 4E A7 |.KO.T.p.l..Y.YN.|
00000090: 59 4E B2 59 00 7F 1A 76 0C 8B 59 B1 59 58 A7 59 |YN.Y...v..Y.YX.Y|
000000A0: 58 B2 59 00 8C 1A 80 0C 64 35 20 8B 20 59 B2 4C |X.Y.....d5 . Y.L|
000000B0: 00 93 1A 8A 0C 64 36 00 9F 1A 94 0C 43 28 30 29 |.....d6.....C(0)|
000000C0: B2 4B 4F 00 A6 1A 9E 0C 82 4E 00 AD 1A A8 0C 64 |.KO......N.....d|
000000D0: 34 00 D1 1A B2 0C 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |4......*********|
000000E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000F0: 2A 2A 2A 2A 2A 00 E5 1A BC 0C 8F 20 20 20 53 43 |*****...... SC|
00000100: 52 41 54 43 48 20 46 49 4C 00 09 1B C6 0C 8F 2A |RATCH FIL......*|
00000110: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000120: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 18 1B |*************...|
00000130: D0 0C 64 31 20 53 43 52 41 54 43 48 00 2E 1B DA |..d1 SCRATCH....|
00000140: 0C 99 4B 24 22 46 49 4C 20 53 4C 45 54 54 45 53 |..K$"FIL SLETTES|
00000150: 21 22 00 48 1B E4 0C 85 22 41 4B 54 49 45 4E 53 |!".H...."AKTIENS|
00000160: 20 4E 41 56 4E 20 3A 22 3B 41 41 24 00 58 1B EE | NAVN :";AA$.X..|
00000170: 0C 45 B2 33 3A 64 33 20 42 45 45 50 00 87 1B F8 |.E.3:d3 BEEP....|
00000180: 0C 99 50 24 4D 24 41 41 24 22 20 53 4C 45 54 54 |..P$M$AA$" SLETT|
00000190: 45 53 21 20 20 45 52 20 44 55 20 53 49 4B 4B 45 |ES! ER DU SIKKE|
000001A0: 52 3F 20 53 41 41 20 20 46 31 22 00 A9 1B 02 0D |R? SAA F1".....|
000001B0: 99 50 24 22 20 20 20 20 20 20 20 20 20 20 20 20 |.P$" |
000001C0: 20 20 45 4C 4C 45 52 53 20 20 46 37 22 00 BC 1B | ELLERS F7"...|
000001D0: 0C 0D 64 20 3A 51 B2 64 56 3A 64 29 51 B3 B1 30 |..d :Q.dV:d)Q..0|
000001E0: 00 E2 1B 16 0D 8B 51 B2 31 A7 20 9F 31 35 2C 38 |......Q.1. .15,8|
000001F0: 2C 31 35 2C 22 53 3A 2B 41 41 24 20 20 20 3A 43 |,15,"S:+AA$ :C|
00000200: 4C 4F 53 45 31 35 00 E9 1B 20 0D 64 34 00 0D 1C |LOSE15... .d4...|
00000210: 2A 0D 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |*..*************|
00000220: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000230: 2A 00 1A 1C 34 0D 8F 20 20 20 42 45 45 50 00 3E |*...4.. BEEP.>|
00000240: 1C 3E 0D 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.>..************|
00000250: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000260: 2A 2A 00 4A 1C 48 0D 64 31 20 42 45 45 50 00 5C |**.J.H.d1 BEEP.\|
00000270: 1C 52 0D 64 26 20 31 2C 30 30 30 31 30 30 30 30 |.R.d& 1,00010000|
00000280: 00 71 1C 5C 0D 64 24 20 31 2C 31 35 2C 31 35 2C |.q.\.d$ 1,15,15,|
00000290: 31 33 2C 31 33 00 81 1C 66 0D 64 1E 31 2C 22 93 |13,13...f.d.1,".|
000002A0: 31 41 35 8C 22 00 9D 1C 70 0D 51 B2 30 3A 64 20 |1A5."...p.Q.0:d |
000002B0: 3A 64 21 20 31 3A 51 B2 51 AA 31 3A 64 29 51 B2 |:d! 1:Q.Q.1:d)Q.|
000002C0: 45 00 A5 1C 7A 0D 45 B2 31 00 AC 1C 84 0D 64 34 |E...z.E.1.....d4|
000002D0: 00 D0 1C 8E 0D 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |......**********|
000002E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000002F0: 2A 2A 2A 2A 00 DD 1C 98 0D 8F 20 20 20 53 54 4F |****...... STO|
00000300: 50 00 01 1D A2 0D 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |P......*********|
00000310: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000320: 2A 2A 2A 2A 2A 00 0A 1D AC 0D 64 31 20 90 00 21 |*****.....d1 ..!|
00000330: 1D B6 0D 99 4B 24 22 41 46 53 4C 55 54 20 50 52 |....K$"AFSLUT PR|
00000340: 4F 47 52 41 4D 00 42 1D C0 0D 99 50 24 22 46 4F |OGRAM.B....P$"FO|
00000350: 52 54 52 59 44 45 52 20 20 20 20 20 20 20 20 20 |RTRYDER |
00000360: 20 20 20 20 46 31 00 63 1D CA 0D 99 50 24 22 53 | F1.c....P$"S|
00000370: 4C 55 54 20 20 20 20 20 20 20 20 20 20 20 20 20 |LUT |
00000380: 20 20 20 20 20 46 35 00 84 1D D4 0D 99 50 24 22 | F5......P$"|
00000390: 53 4C 55 54 20 28 44 41 54 41 20 53 41 56 45 53 |SLUT (DATA SAVES|
000003A0: 21 29 20 20 20 20 46 37 00 97 1D DE 0D 64 20 3A |!) F7.....d :|
000003B0: 51 B2 64 56 3A 64 29 51 B3 B1 30 00 AF 1D E8 0D |Q.dV:d)Q..0.....|
000003C0: 8B 51 B2 31 A7 20 64 32 20 48 4F 56 45 44 4D 45 |.Q.1. d2 HOVEDME|
000003D0: 4E 55 45 00 D9 1D F2 0D 8B 51 B2 37 A7 81 51 B2 |NUE......Q.7..Q.|
000003E0: 30 A4 4E 4E 3A 4B 28 51 29 B2 4C 28 51 29 3A 82 |0.NN:K(Q).L(Q):.|
000003F0: 51 3A 64 33 20 49 4E 49 54 AB 47 45 4D 00 E3 1D |Q:d3 INIT.GEM...|
00000400: FC 0D 99 4B 24 3A 80 00 07 1E 06 0E 8F 2A 2A 2A |...K$:.......***|
00000410: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000420: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 17 1E 10 0E |***********.....|
00000430: 8F 20 20 20 4F 50 44 41 54 45 52 00 3B 1E 1A 0E |. OPDATER.;...|
00000440: 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.***************|
00000450: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00000460: 4A 1E 24 0E 64 31 20 4F 50 44 41 54 45 52 00 56 |J.$.d1 OPDATER.V|
00000470: 1E 2E 0E 64 1A 31 33 2C 31 33 00 73 1E 38 0E 99 |...d.13,13.s.8..|
00000480: 4B 24 22 4F 50 44 41 54 45 52 49 4E 47 20 41 46 |K$"OPDATERING AF|
00000490: 20 4B 55 52 53 45 52 00 9D 1E 42 0E 8B 4E 4E B2 | KURSER...B..NN.|
000004A0: 30 A7 99 50 24 22 49 4E 47 45 4E 20 44 41 54 41 |0..P$"INGEN DATA|
000004B0: 20 3F 3F 3F 22 3A 45 B2 38 3A 64 33 20 42 45 45 | ???":E.8:d3 BEE|
000004C0: 50 00 AE 1E 4C 0E 8B 4E 4E B2 30 A7 64 66 33 3A |P...L..NN.0.df3:|
000004D0: 64 34 00 D4 1E 56 0E 99 50 24 22 44 41 54 4F 3A |d4...V..P$"DATO:|
000004E0: 22 3B 44 41 24 28 30 29 3B 22 20 4F 4B 3F 20 2D |";DA$(0);" OK? -|
000004F0: 3E 20 52 45 54 55 52 4E 00 F6 1E 60 0E 99 50 24 |> RETURN...`..P$|
00000500: 22 4F 50 47 49 56 20 4E 59 54 20 44 41 54 4F 20 |"OPGIV NYT DATO |
00000510: 3C 41 41 4D 4D 3E 20 3A 22 3B 00 10 1F 6A 0E 85 |<AAMM> :";...j..|
00000520: 44 24 3A 8B 44 24 B3 B1 22 22 A7 44 41 24 28 30 |D$:.D$.."".DA$(0|
00000530: 29 B2 44 24 00 1D 1F 74 0E 51 B2 30 3A 51 46 B2 |).D$...t.Q.0:QF.|
00000540: 30 00 24 1F 7E 0E 64 3A 00 2E 1F 88 0E 51 B2 51 |0.$.~.d:.....Q.Q|
00000550: AA 31 00 49 1F 92 0E 8B 51 46 B3 B1 30 AF 51 B2 |.1.I....QF..0.Q.|
00000560: 47 AA 31 A7 51 B2 51 46 3A 51 46 B2 30 00 5C 1F |G.1.Q.QF:QF.0.\.|
00000570: 97 0E 99 4B 24 22 4E 55 4D 4D 45 52 3A 22 3B 51 |...K$"NUMMER:";Q|
00000580: 00 77 1F 9C 0E 99 50 24 48 24 22 41 4B 54 49 45 |.w....P$H$"AKTIE|
00000590: 4E 3A 22 4D 24 3B 42 24 28 51 29 00 A5 1F A6 0E |N:"M$;B$(Q).....|
000005A0: 99 50 24 22 53 49 44 53 54 45 20 52 45 47 2E 20 |.P$"SIDSTE REG. |
000005B0: 4B 55 52 53 3A 22 4C 28 51 29 22 20 20 44 41 54 |KURS:"L(Q)" DAT|
000005C0: 4F 3A 22 44 41 24 28 51 29 00 C4 1F B0 0E 99 50 |O:"DA$(Q)......P|
000005D0: 24 22 53 49 44 53 54 45 20 44 41 47 53 2D 4B 55 |$"SIDSTE DAGS-KU|
000005E0: 52 53 3A 22 4B 28 51 29 00 D8 1F BA 0E 53 B2 30 |RS:"K(Q).....S.0|
000005F0: 3A 48 24 B2 22 22 3A 4C 24 B2 22 22 00 DF 1F C4 |:H$."":L$.""....|
00000600: 0E 64 3A 00 E9 1F CE 0E 53 B2 53 AA 31 00 1D 20 |.d:.....S.S.1.. |
00000610: D8 0E 8B 20 53 B2 31 A7 99 50 24 4D 24 22 52 45 |... S.1..P$M$"RE|
00000620: 54 20 2D 3E 20 40 20 20 20 20 20 20 49 4E 47 45 |T -> @ INGE|
00000630: 4E 20 4B 55 52 53 20 2D 3E 20 52 45 54 55 52 4E |N KURS -> RETURN|
00000640: 22 00 3D 20 E2 0E 99 50 24 22 4F 50 47 49 56 22 |".= ...P$"OPGIV"|
00000650: 3B 53 22 2E 20 4E 59 45 20 4B 55 52 53 20 3A 22 |;S". NYE KURS :"|
00000660: 3B 00 4C 20 EC 0E 46 24 28 51 2C 53 29 B2 22 22 |;.L ..F$(Q,S).""|
00000670: 00 59 20 F6 0E 85 46 24 28 51 2C 53 29 00 68 20 |.Y ...F$(Q,S).h |
00000680: 00 0F 54 24 B2 46 24 28 51 2C 53 29 00 83 20 0A |..T$.F$(Q,S).. .|
00000690: 0F 64 35 20 8B 28 53 B2 32 B0 54 24 B2 22 40 22 |.d5 .(S.2.T$."@"|
000006A0: B0 54 24 B2 22 22 29 00 8A 20 14 0F 64 36 00 9E |.T$."").. ..d6..|
000006B0: 20 1E 0F 8B 20 54 24 B2 22 22 AF 53 B2 31 A7 20 | ... T$."".S.1. |
000006C0: 64 36 00 AB 20 28 0F 53 28 51 29 B2 53 AB 31 00 |d6.. (.S(Q).S.1.|
000006D0: DE 20 32 0F 8B 20 54 24 B2 22 40 22 A7 99 4B 24 |. 2.. T$."@"..K$|
000006E0: 22 52 45 54 54 45 4C 53 45 20 41 46 20 41 4B 54 |"RETTELSE AF AKT|
000006F0: 49 45 4E 3A 22 3B 3A 85 4C 24 3A 64 33 20 52 45 |IEN:";:.L$:d3 RE|
00000700: 54 4C 00 EC 20 3C 0F 64 35 20 8B 20 51 B2 4E 4E |TL.. <.d5 . Q.NN|
00000710: 00 F3 20 46 0F 64 36 00 FA 20 50 0F 64 34 00 06 |.. F.d6.. P.d4..|
00000720: 21 5A 0F 64 31 20 52 45 54 4C 00 14 21 64 0F 47 |!Z.d1 RETL..!d.G|
00000730: B2 30 3A 54 24 B2 22 22 00 1B 21 6E 0F 64 3A 00 |.0:T$.""..!n.d:.|
00000740: 25 21 78 0F 47 B2 47 AA 31 00 62 21 82 0F 8B 47 |%!x.G.G.1.b!...G|
00000750: B1 4E 4E A7 99 4B 24 22 41 4B 54 49 45 4E 3A 22 |.NN..K$"AKTIEN:"|
00000760: 4C 24 22 20 49 4B 4B 45 20 4B 45 4E 44 54 20 2D |L$" IKKE KENDT -|
00000770: 3E 20 46 22 3A 64 20 3A 49 B2 64 56 3A 64 29 49 |> F":d :I.dV:d)I|
00000780: B3 B1 30 3A 64 34 00 74 21 8C 0F 64 35 20 8B 20 |..0:d4.t!..d5 . |
00000790: 4C 24 B2 42 24 28 47 29 00 7B 21 96 0F 64 36 00 |L$.B$(G).{!..d6.|
000007A0: A0 21 A0 0F 51 46 B2 51 3A 51 B2 47 AB 31 3A 48 |.!..QF.Q:Q.G.1:H|
000007B0: 24 B2 4D 24 AA 22 20 52 45 54 54 45 4C 53 45 20 |$.M$." RETTELSE |
000007C0: 41 46 20 22 00 A7 21 AA 0F 64 34 00 CB 21 B4 0F |AF "..!..d4..!..|
000007D0: 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.***************|
000007E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
000007F0: DD 21 BE 0F 8F 20 20 20 49 4E 49 54 2D 48 45 4E |.!... INIT-HEN|
00000800: 54 00 01 22 C8 0F 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |T.."...*********|
00000810: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000820: 2A 2A 2A 2A 2A 00 12 22 D2 0F 64 31 20 49 4E 49 |*****.."..d1 INI|
00000830: 54 AB 48 45 4E 54 00 2C 22 DC 0F 9F 32 2C 38 2C |T.HENT.,"...2,8,|
00000840: 32 2C 22 2D 2D 49 4E 49 54 2D 2D 2C 53 2C 52 22 |2,"--INIT--,S,R"|
00000850: 00 36 22 E6 0F 84 32 2C 4E 4E 00 49 22 F0 0F 99 |.6"...2,NN.I"...|
00000860: 50 24 4E 4E 22 20 41 4B 54 49 45 52 22 00 55 22 |P$NN" AKTIER".U"|
00000870: FA 0F 81 51 B2 30 A4 4E 4E 00 62 22 04 10 84 32 |...Q.0.NN.b"...2|
00000880: 2C 42 24 28 51 29 00 69 22 0E 10 82 51 00 75 22 |,B$(Q).i"...Q.u"|
00000890: 10 10 81 51 B2 30 A4 4E 4E 00 81 22 12 10 84 32 |...Q.0.NN.."...2|
000008A0: 2C 4C 28 51 29 00 88 22 14 10 82 51 00 94 22 18 |,L(Q).."...Q..".|
000008B0: 10 81 51 B2 30 A4 4E 4E 00 A0 22 22 10 84 32 2C |..Q.0.NN..""..2,|
000008C0: 4B 28 51 29 00 A7 22 2C 10 82 51 00 B8 22 2E 10 |K(Q)..",..Q.."..|
000008D0: 8F 3A 46 4F 52 51 3D 30 54 4F 4E 4E 00 CD 22 30 |.:FORQ=0TONN.."0|
000008E0: 10 8F 3A 49 4E 50 55 54 23 32 2C 44 41 24 28 51 |..:INPUT#2,DA$(Q|
000008F0: 29 00 D9 22 32 10 8F 3A 4E 45 58 54 51 00 E0 22 |).."2..:NEXTQ.."|
00000900: 36 10 A0 32 00 E7 22 40 10 64 34 00 0B 23 4A 10 |6..2.."@.d4..#J.|
00000910: 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.***************|
00000920: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00000930: 1D 23 54 10 8F 20 20 20 49 4E 49 54 20 44 41 54 |.#T.. INIT DAT|
00000940: 41 00 41 23 5E 10 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |A.A#^..*********|
00000950: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000960: 2A 2A 2A 2A 2A 00 4E 23 68 10 64 31 20 49 4E 49 |*****.N#h.d1 INI|
00000970: 54 83 00 6B 23 72 10 99 4B 24 22 4E 59 20 41 4B |T..k#r..K$"NY AK|
00000980: 54 49 45 52 20 20 20 20 20 20 20 20 20 46 31 00 |TIER F1.|
00000990: 8B 23 7C 10 99 50 24 22 46 4F 52 54 52 59 44 45 |.#|..P$"FORTRYDE|
000009A0: 52 20 20 20 20 20 20 20 20 20 46 33 2F 46 35 00 |R F3/F5.|
000009B0: A8 23 86 10 99 50 24 22 41 45 4E 44 52 45 20 41 |.#...P$"AENDRE A|
000009C0: 4B 54 49 45 20 20 20 20 20 20 46 37 00 BB 23 90 |KTIE F7..#.|
000009D0: 10 64 20 3A 51 B2 64 56 3A 64 29 51 B3 B1 30 00 |.d :Q.dV:d)Q..0.|
000009E0: CE 23 9A 10 8B 51 B3 B1 31 AF 51 B3 B1 37 A7 20 |.#...Q..1.Q..7. |
000009F0: 64 34 00 E4 23 A4 10 8B 51 B2 31 A7 20 51 B2 4E |d4..#...Q.1. Q.N|
00000A00: 4E 3A 64 47 3A 51 B2 30 00 F1 23 AE 10 51 46 B2 |N:dG:Q.0..#..QF.|
00000A10: 30 3A 4B B2 30 00 06 24 B8 10 99 4B 24 22 4F 50 |0:K.0..$...K$"OP|
00000A20: 47 49 56 20 41 4B 54 49 45 52 00 27 24 C2 10 99 |GIV AKTIER.'$...|
00000A30: 50 24 4D 24 22 3C 52 45 54 55 52 4E 3E 20 46 4F |P$M$"<RETURN> FO|
00000A40: 52 20 41 54 20 53 4C 55 54 54 45 00 42 24 CC 10 |R AT SLUTTE.B$..|
00000A50: 99 50 24 4D 24 22 3C 40 3E 20 46 4F 52 20 41 54 |.P$M$"<@> FOR AT|
00000A60: 20 52 45 54 54 45 00 49 24 D6 10 64 3A 00 53 24 | RETTE.I$..d:.S$|
00000A70: E0 10 51 B2 51 AA 31 00 7F 24 EA 10 99 50 24 22 |..Q.Q.1..$...P$"|
00000A80: 4F 50 4C 59 53 20 22 3B 51 3B 22 2E 20 41 4B 54 |OPLYS ";Q;". AKT|
00000A90: 49 45 20 4E 41 56 4E 3A 22 3B 42 24 28 51 29 3A |IE NAVN:";B$(Q):|
00000AA0: 85 42 24 00 8E 24 F4 10 64 35 20 8B 20 42 24 B2 |.B$..$..d5 . B$.|
00000AB0: 22 22 00 9B 24 FE 10 42 24 28 51 29 B2 42 24 00 |""..$..B$(Q).B$.|
00000AC0: B4 24 08 11 8B 4B B3 B1 30 A7 51 B2 51 46 AB 31 |.$...K..0.Q.QF.1|
00000AD0: 3A 4B B2 30 3A 99 4B 24 00 F6 24 12 11 8B 42 24 |:K.0:.K$..$...B$|
00000AE0: B2 22 40 22 A7 99 4B 24 4D 24 22 52 45 54 54 45 |."@"..K$M$"RETTE|
00000AF0: 4C 53 45 20 2D 3E 20 4F 50 4C 59 53 20 41 4B 54 |LSE -> OPLYS AKT|
00000B00: 49 45 2D 4E 55 4D 4D 45 52 3A 22 3B 3A 85 4B 3A |IE-NUMMER:";:.K:|
00000B10: 51 46 B2 51 3A 51 B2 4B AB 31 00 00 25 1C 11 42 |QF.Q:Q.K.1..%..B|
00000B20: 24 B2 22 22 00 07 25 26 11 64 36 00 2A 25 30 11 |$.""..%&.d6.*%0.|
00000B30: 8B 51 B1 4E 4E A7 42 24 28 30 29 B2 C4 28 51 AB |.Q.NN.B$(0)..(Q.|
00000B40: 31 29 3A 4E 4E B2 C5 28 42 24 28 30 29 29 00 31 |1):NN..(B$(0)).1|
00000B50: 25 3A 11 64 34 00 55 25 D0 11 8F 2A 2A 2A 2A 2A |%:.d4.U%...*****|
00000B60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000B70: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 6D 25 DA 11 8F 20 |*********.m%... |
00000B80: 20 20 4B 55 52 53 20 54 49 4C 20 53 50 52 49 4E | KURS TIL SPRIN|
00000B90: 47 00 91 25 E4 11 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |G..%...*********|
00000BA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000BB0: 2A 2A 2A 2A 2A 00 A8 25 EE 11 64 31 20 4B 55 52 |*****..%..d1 KUR|
00000BC0: 53 20 54 49 4C 20 53 50 52 49 4E 47 00 BF 25 F8 |S TIL SPRING..%.|
00000BD0: 11 8B 4B B3 B2 4B 31 20 20 20 20 20 20 20 A7 53 |..K..K1 .S|
00000BE0: B2 53 31 00 D4 25 02 12 8B 4B B1 4B 31 AF 4B B3 |.S1..%...K.K1.K.|
00000BF0: B2 4B 32 A7 53 B2 53 32 00 E9 25 0C 12 8B 4B B1 |.K2.S.S2..%...K.|
00000C00: 4B 32 AF 4B B3 B2 4B 33 A7 53 B2 53 33 00 00 26 |K2.K..K3.S.S3..&|
00000C10: 16 12 8B 4B B1 4B 33 20 20 20 20 20 20 20 20 A7 |...K.K3 .|
00000C20: 53 B2 53 34 00 10 26 20 12 4B 4F B2 53 AC B5 28 |S.S4..& .KO.S..(|
00000C30: 4B AD 53 29 00 23 26 2A 12 8B 53 B2 53 31 A7 53 |K.S).#&*..S.S1.S|
00000C40: 4F B2 4B 4F AD 53 31 00 41 26 34 12 8B 53 B2 53 |O.KO.S1.A&4..S.S|
00000C50: 32 A7 53 4F B2 4B 31 AD 53 31 AA 28 4B 4F AB 4B |2.SO.K1.S1.(KO.K|
00000C60: 31 29 AD 53 32 00 6A 26 3E 12 8B 53 B2 53 33 A7 |1).S2.j&>..S.S3.|
00000C70: 53 4F B2 4B 31 AD 53 31 AA 28 4B 32 AB 4B 31 29 |SO.K1.S1.(K2.K1)|
00000C80: AD 53 32 AA 28 4B 4F AB 4B 32 29 AD 53 33 00 9E |.S2.(KO.K2).S3..|
00000C90: 26 48 12 8B 53 B2 53 34 A7 53 4F B2 4B 31 AD 53 |&H..S.S4.SO.K1.S|
00000CA0: 31 AA 28 4B 32 AB 4B 31 29 AD 53 32 AA 28 4B 33 |1.(K2.K1).S2.(K3|
00000CB0: AB 4B 32 29 AD 53 33 AA 28 4B 4F AB 4B 33 29 AD |.K2).S3.(KO.K3).|
00000CC0: 53 34 00 A5 26 52 12 64 34 00 C9 26 5C 12 8F 2A |S4..&R.d4..&\..*|
00000CD0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000CE0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 E1 26 |*************..&|
00000CF0: 66 12 8F 20 20 20 53 50 52 49 4E 47 20 54 49 4C |f.. SPRING TIL|
00000D00: 20 4B 55 52 53 00 05 27 70 12 8F 2A 2A 2A 2A 2A | KURS..'p..*****|
00000D10: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000D20: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 1C 27 7A 12 64 31 |*********..'z.d1|
00000D30: 20 53 50 52 49 4E 47 20 54 49 4C 20 4B 55 52 53 | SPRING TIL KURS|
00000D40: 00 3B 27 84 12 8B 53 4F B3 B2 34 30 20 20 20 20 |.;'...SO..40 |
00000D50: 20 20 20 20 20 20 A7 4B 4F B2 53 4F AC 53 31 00 | .KO.SO.S1.|
00000D60: 63 27 8E 12 8B 53 4F B1 34 30 AF 53 4F B3 B2 31 |c'...SO.40.SO..1|
00000D70: 32 30 20 A7 4B 4F B2 28 53 4F AB 4B 31 AD 53 31 |20 .KO.(SO.K1.S1|
00000D80: 29 AC 53 32 AA 4B 31 00 96 27 98 12 8B 53 4F B1 |).S2.K1..'...SO.|
00000D90: 31 32 30 AF 53 4F B3 B2 32 32 30 A7 4B 4F B2 28 |120.SO..220.KO.(|
00000DA0: 53 4F AB 4B 31 AD 53 31 AB 28 4B 32 AB 4B 31 29 |SO.K1.S1.(K2.K1)|
00000DB0: AD 53 32 29 AC 53 33 AA 4B 32 00 D6 27 A2 12 8B |.S2).S3.K2..'...|
00000DC0: 53 4F B1 32 32 30 20 20 20 20 20 20 20 20 20 20 |SO.220 |
00000DD0: A7 4B 4F B2 28 53 4F AB 4B 31 AD 53 31 AB 28 4B |.KO.(SO.K1.S1.(K|
00000DE0: 32 AB 4B 31 29 AD 53 32 AB 28 4B 33 AB 4B 32 29 |2.K1).S2.(K3.K2)|
00000DF0: AD 53 33 29 AC 53 34 AA 4B 33 00 DD 27 AC 12 64 |.S3).S4.K3..'..d|
00000E00: 34 00 01 28 B6 12 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |4..(...*********|
00000E10: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000E20: 2A 2A 2A 2A 2A 00 11 28 C0 12 8F 20 20 20 64 72 |*****..(... dr|
00000E30: 20 64 7E 4F 52 00 35 28 CA 12 8F 2A 2A 2A 2A 2A | d~OR.5(...*****|
00000E40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000E50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 43 28 D4 12 64 31 |*********.C(..d1|
00000E60: 20 64 72 20 64 7E B0 00 54 28 DE 12 9F 31 35 2C | dr d~..T(...15,|
00000E70: 38 2C 35 2C 22 49 30 22 00 69 28 E8 12 84 31 35 |8,5,"I0".i(...15|
00000E80: 2C 45 4E 2C 45 4D 24 2C 45 54 2C 45 53 00 77 28 |,EN,EM$,ET,ES.w(|
00000E90: F2 12 8B 45 4E B2 30 A7 20 64 34 00 88 28 FC 12 |...EN.0. d4..(..|
00000EA0: 45 B2 31 30 3A 64 33 20 42 45 45 50 00 9C 28 06 |E.10:d3 BEEP..(.|
00000EB0: 13 99 50 24 22 44 49 53 4B 20 45 52 52 4F 52 22 |..P$"DISK ERROR"|
00000EC0: 00 AB 28 10 13 99 50 24 22 46 2D 54 41 53 54 00 |..(...P$"F-TAST.|
00000ED0: BD 28 1A 13 99 45 4E 3B 45 4D 24 3B 45 54 3B 45 |.(...EN;EM$;ET;E|
00000EE0: 53 00 D0 28 24 13 64 20 3A 51 B2 64 56 3A 64 29 |S..($.d :Q.dV:d)|
00000EF0: 51 B3 B1 30 00 D7 28 2E 13 64 34 00 FB 28 38 13 |Q..0..(..d4..(8.|
00000F00: 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.***************|
00000F10: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00000F20: 0C 29 42 13 8F 20 20 20 47 45 4D 20 47 52 49 44 |.)B.. GEM GRID|
00000F30: 00 30 29 4C 13 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.0)L..**********|
00000F40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000F50: 2A 2A 2A 2A 00 40 29 56 13 64 31 20 47 45 4D 20 |****.@)V.d1 GEM |
00000F60: 47 52 49 44 00 5C 29 60 13 99 4B 24 22 47 52 49 |GRID.\)`..K$"GRI|
00000F70: 44 20 47 45 4D 4D 45 53 20 46 4F 52 20 22 41 24 |D GEMMES FOR "A$|
00000F80: 00 73 29 6A 13 99 50 24 22 4F 4B 3F 20 20 20 20 |.s)j..P$"OK? |
00000F90: 20 2D 3E 20 20 46 37 00 8A 29 74 13 99 50 24 22 | -> F7..)t..P$"|
00000FA0: 45 4C 4C 45 52 53 20 20 2D 3E 20 20 46 31 00 9D |ELLERS -> F1..|
00000FB0: 29 7E 13 64 20 3A 51 B2 64 56 3A 64 29 51 B3 B1 |)~.d :Q.dV:d)Q..|
00000FC0: 30 00 AB 29 88 13 8B 51 B3 B1 37 A7 20 64 34 00 |0..)...Q..7. d4.|
00000FD0: C7 29 92 13 9F 32 2C 38 2C 32 2C 22 40 3A 47 2E |.)...2,8,2,"@:G.|
00000FE0: 22 AA 41 24 AA 22 2C 53 2C 57 22 00 D0 29 9C 13 |".A$.",S,W"..)..|
00000FF0: 98 32 2C 58 00 D9 29 A6 13 98 32 2C 59 00 E3 29 |.2,X..)...2,Y..)|
00001000: B0 13 98 32 2C 59 4E 00 ED 29 BA 13 98 32 2C 59 |...2,YN..)...2,Y|
00001010: 58 00 FC 29 C4 13 99 58 2C 59 2C 59 4E 2C 59 58 |X..)...X,Y,YN,YX|
00001020: 00 07 2A CE 13 81 49 B2 30 A4 58 00 14 2A D8 13 |..*...I.0.X..*..|
00001030: 81 4A B2 59 4E A4 59 58 00 23 2A E2 13 98 32 2C |.J.YN.YX.#*...2,|
00001040: 41 25 28 49 2C 4A 29 00 2A 2A EC 13 82 4A 00 31 |A%(I,J).**...J.1|
00001050: 2A F6 13 82 49 00 38 2A 00 14 A0 32 00 3F 2A 0A |*...I.8*...2.?*.|
00001060: 14 64 34 00 63 2A 14 14 8F 2A 2A 2A 2A 2A 2A 2A |.d4.c*...*******|
00001070: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001080: 2A 2A 2A 2A 2A 2A 2A 00 75 2A 1E 14 8F 20 20 20 |*******.u*... |
00001090: 48 45 4E 54 20 47 52 49 44 00 99 2A 28 14 8F 2A |HENT GRID..*(..*|
000010A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000010B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 AA 2A |*************..*|
000010C0: 32 14 64 31 20 48 45 4E 54 20 47 52 49 44 00 CC |2.d1 HENT GRID..|
000010D0: 2A 3C 14 99 4B 24 22 47 52 49 44 20 48 45 4E 54 |*<..K$"GRID HENT|
000010E0: 45 53 20 20 41 4B 54 49 45 3A 22 3B 3A 85 41 24 |ES AKTIE:";:.A$|
000010F0: 00 E8 2A 46 14 99 4B 24 22 47 52 49 44 20 4C 4F |..*F..K$"GRID LO|
00001100: 41 44 45 53 20 46 4F 52 20 22 41 24 00 FF 2A 50 |ADES FOR "A$..*P|
00001110: 14 99 50 24 22 4F 4B 3F 20 20 20 20 20 2D 3E 20 |..P$"OK? -> |
00001120: 20 46 37 00 16 2B 5A 14 99 50 24 22 45 4C 4C 45 | F7..+Z..P$"ELLE|
00001130: 52 53 20 20 2D 3E 20 20 46 31 00 29 2B 64 14 64 |RS -> F1.)+d.d|
00001140: 20 3A 51 B2 64 56 3A 64 29 51 B3 B1 30 00 37 2B | :Q.dV:d)Q..0.7+|
00001150: 6E 14 8B 51 B3 B1 37 A7 20 64 34 00 51 2B 78 14 |n..Q..7. d4.Q+x.|
00001160: 9F 32 2C 38 2C 32 2C 22 47 2E 22 AA 41 24 AA 22 |.2,8,2,"G.".A$."|
00001170: 2C 53 2C 52 22 00 5A 2B 82 14 84 32 2C 58 00 63 |,S,R".Z+...2,X.c|
00001180: 2B 8C 14 84 32 2C 59 00 6D 2B 96 14 84 32 2C 59 |+...2,Y.m+...2,Y|
00001190: 4E 00 77 2B A0 14 84 32 2C 59 58 00 86 2B AA 14 |N.w+...2,YX..+..|
000011A0: 99 58 2C 59 2C 59 4E 2C 59 58 00 91 2B B4 14 81 |.X,Y,YN,YX..+...|
000011B0: 49 B2 30 A4 58 00 9E 2B BE 14 81 4A B2 59 4E A4 |I.0.X..+...J.YN.|
000011C0: 59 58 00 AD 2B C8 14 84 32 2C 41 25 28 49 2C 4A |YX..+...2,A%(I,J|
000011D0: 29 00 B4 2B D2 14 82 4A 00 BB 2B DC 14 82 49 00 |)..+...J..+...I.|
000011E0: C2 2B E6 14 A0 32 00 C9 2B F0 14 64 34 00 ED 2B |.+...2..+..d4..+|
000011F0: 84 17 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |...*************|
00001200: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001210: 2A 00 FE 2B 8E 17 8F 20 20 20 49 4E 49 54 2D 47 |*..+... INIT-G|
00001220: 45 4D 00 22 2C 98 17 8F 2A 2A 2A 2A 2A 2A 2A 2A |EM.",...********|
00001230: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001240: 2A 2A 2A 2A 2A 2A 00 32 2C A2 17 64 31 20 49 4E |******.2,..d1 IN|
00001250: 49 54 AB 47 45 4D 00 4E 2C AC 17 9F 32 2C 38 2C |IT.GEM.N,...2,8,|
00001260: 32 2C 22 40 3A 2D 2D 49 4E 49 54 2D 2D 2C 53 2C |2,"@:--INIT--,S,|
00001270: 57 22 00 61 2C C0 17 99 50 24 4E 4E 22 20 41 4B |W".a,...P$NN" AK|
00001280: 54 49 45 52 22 00 6B 2C C5 17 98 32 2C 4E 4E 00 |TIER".k,...2,NN.|
00001290: 77 2C CA 17 81 51 B2 30 A4 4E 4E 00 84 2C D4 17 |w,...Q.0.NN..,..|
000012A0: 98 32 2C 42 24 28 51 29 00 8B 2C DE 17 82 51 00 |.2,B$(Q)..,...Q.|
000012B0: 97 2C E0 17 81 51 B2 30 A4 4E 4E 00 A3 2C E2 17 |.,...Q.0.NN..,..|
000012C0: 98 32 2C 4C 28 51 29 00 AA 2C E4 17 82 51 00 B6 |.2,L(Q)..,...Q..|
000012D0: 2C E8 17 81 51 B2 30 A4 4E 4E 00 C2 2C F2 17 98 |,...Q.0.NN..,...|
000012E0: 32 2C 4B 28 51 29 00 C9 2C FC 17 82 51 00 DA 2C |2,K(Q)..,...Q..,|
000012F0: FE 17 8F 3A 46 4F 52 51 3D 30 54 4F 4E 4E 00 EF |...:FORQ=0TONN..|
00001300: 2C 00 18 8F 3A 50 52 49 4E 54 23 32 2C 44 41 24 |,...:PRINT#2,DA$|
00001310: 28 51 29 00 FB 2C 02 18 8F 3A 4E 45 58 54 51 00 |(Q)..,...:NEXTQ.|
00001320: 02 2D 06 18 A0 32 00 09 2D 10 18 64 34 00 00 00 |.-...2..-..d4...|
TAEL......N.....D4.....D1 TAEL...&.L.Y.D
...0.D:...:.Y.Y.T:Z.Z.1.-.D.C(Z).C(Z.1).
T.9.N.SO.C(Z).P.X.D3 SPRING TIL KURS.A.B
.A%(X,Y).KO.T.P.L..Y.YN.YN.Y..V..Y.YX.Y
X.Y.....D5 . Y.L.....D6.....C(0).KO.....
.N.....D4.Q....*************************
*****...... SCRATCH FIL...F..*********
*********************...P.D1 SCRATCH...Z
..K$"FIL SLETTES!".H...."AKTIENS NAVN :"
;AA$.X...E.3:D3 BEEP......P$M$AA$" SLETT
ES! ER DU SIKKER? SAA F1"......P$"
ELLERS F7".....D :Q.DV:D)Q..0
......Q.1. .15,8,15,"S:+AA$ :CLOSE15..
. .D4...*..*****************************
*...4.. BEEP.>.>..********************
**********.J.H.D1 BEEP.\.R.D& 1,00010000
.Q.\.D$ 1,15,15,13,13...F.D.1,".1A5."...
P.Q.0:D :D! 1:Q.Q.1:D)Q.E...Z.E.1.....D4
.P....******************************....
.. STOP......*************************
*****.....D1 ..!....K$"AFSLUT PROGRAM.B.
...P$"FORTRYDER F1.C.J..P$"S
LUT F5...T..P$"SLUT (DA
TA SAVES!) F7.....D :Q.DV:D)Q..0.....
.Q.1. D2 HOVEDMENUE.Y....Q.7..Q.0.NN:K(Q
).L(Q):.Q:D3 INIT.GEM......K$:.......***
***************************...... OPDA
TER.;....******************************.
J.$.D1 OPDATER.V...D.13,13.S.8..K$"OPDAT
ERING AF KURSER...B..NN.0..P$"INGEN DATA
???":E.8:D3 BEEP...L..NN.0.DF3:D4.T.V..
P$"DATO:";DA$(0);" OK? -> RETURN...`..P$
"OPGIV NYT DATO <AAMM> :";...J..D$:.D$..
"".DA$(0).D$...T.Q.0:QF.0.$.~.D:.....Q.Q
.1.I....QF..0.Q.G.1.Q.QF:QF.0.\....K$"NU
MMER:";Q.W....P$H$"AKTIEN:"M$;B$(Q).....
.P$"SIDSTE REG. KURS:"L(Q)" DATO:"DA$(Q
).D....P$"SIDSTE DAGS-KURS:"K(Q).X...S.0
:H$."":L$.""...D.D:...N.S.S.1.. X.. S.1.
.P$M$"RET -> @ INGEN KURS -> RETURN
".= ...P$"OPGIV";S". NYE KURS :";.L ..F$
(Q,S)."".Y ...F$(Q,S).H ..T$.F$(Q,S).. .
.D5 .(S.2.T$."@".T$."").. ..D6.. ... T$.
"".S.1. D6.. (.S(Q).S.1.. 2.. T$."@"..K$
"RETTELSE AF AKTIEN:";:.L$:D3 RETL.. <.D
5 . Q.NN.. F.D6.. P.D4..!Z.D1 RETL..!D.G
.0:T$.""..!N.D:.%!X.G.G.1.B!...G.NN..K$"
AKTIEN:"L$" IKKE KENDT -> F":D :I.DV:D)I
..0:D4.T!..D5 . L$.B$(G).{!..D6. ! .QF.Q
:Q.G.1:H$.M$." RETTELSE AF "..!..D4.K!..
.******************************..!...
INIT-HENT.."H..*************************
*****.."R.D1 INIT.HENT.,"...2,8,2,"--INI
T--,S,R".6"...2,NN.I"...P$NN" AKTIER".U"
...Q.0.NN.B"...2,B$(Q).I"...Q.U"...Q.0.N
N.."...2,L(Q).."...Q.."...Q.0.NN. ""..2,
K(Q)..",..Q.."...:FORQ=0TONN.M"0..:INPUT
#2,DA$(Q).Y"2..:NEXTQ.."6. 2.."@.D4..#J.
.******************************..#T..
INIT DATA.A#^..*************************
*****.N#H.D1 INIT..K#R..K$"NY AKTIER
F1..#|..P$"FORTRYDER F3/F5.
.#...P$"AENDRE AKTIE F7..#..D :Q.DV
:D)Q..0.N#...Q..1.Q..7. D4..#...Q.1. Q.N
N:DG:Q.0..#..QF.0:K.0..$...K$"OPGIV AKTI
ER.'$B..P$M$"<RETURN> FOR AT SLUTTE.B$L.
.P$M$"<@> FOR AT RETTE.I$V.D:.S$..Q.Q.1.
$...P$"OPLYS ";Q;". AKTIE NAVN:";B$(Q):
.B$..$..D5 . B$.""..$..B$(Q).B$..$...K..
0.Q.QF.1:K.0:.K$..$...B$."@"..K$M$"RETTE
LSE -> OPLYS AKTIE-NUMMER:";:.K:QF.Q:Q.K
.1..%..B$.""..%&.D6.*%0..Q.NN.B$(0).D(Q.
1):NN.E(B$(0)).1%:.D4.U%P..*************
*****************.M%Z.. KURS TIL SPRIN
G..%...******************************..%
..D1 KURS TIL SPRING..%...K..K1 .S
.S1.T%...K.K1.K..K2.S.S2..%...K.K2.K..K3
.S.S3..&...K.K3 .S.S4..& .KO.S..(
K.S).#&*..S.S1.SO.KO.S1.A&4..S.S2.SO.K1.
S1.(KO.K1).S2.J&>..S.S3.SO.K1.S1.(K2.K1)
.S2.(KO.K2).S3..&H..S.S4.SO.K1.S1.(K2.K1
).S2.(K3.K2).S3.(KO.K3).S4..&R.D4.I&\..*
*****************************..&F.. SP
RING TIL KURS..'P..*********************
*********..'Z.D1 SPRING TIL KURS.;'...SO
..40 .KO.SO.S1.C'...SO.40.SO..1
20 .KO.(SO.K1.S1).S2.K1..'...SO.120.SO..
220.KO.(SO.K1.S1.(K2.K1).S2).S3.K2.V'...
SO.220 .KO.(SO.K1.S1.(K2.K1).S2
.(K3.K2).S3).S4.K3..'..D4..(...*********
*********************..(... DR D~OR.5(
J..******************************.C(T.D1
DR D~..T(...15,8,5,"I0".I(...15,EN,EM$,
ET,ES.W(...EN.0. D4..(..E.10:D3 BEEP..(.
..P$"DISK ERROR"..(...P$"F-TAST..(...EN;
EM$;ET;ES.P($.D :Q.DV:D)Q..0.W(..D4..(8.
.******************************..)B..
GEM GRID.0)L..**************************
****.@)V.D1 GEM GRID.\)`..K$"GRID GEMMES
FOR "A$.S)J..P$"OK? -> F7..)T..P$"
ELLERS -> F1..)~.D :Q.DV:D)Q..0..)...Q
..7. D4.G)...2,8,2,"@:G.".A$.",S,W".P)..
.2,X.Y)...2,Y..)...2,YN..)...2,YX..)D..X
,Y,YN,YX..*N..I.0.X..*X..J.YN.YX.#*...2,
A%(I,J).**...J.1*...I.8*.. 2.?*..D4.C*..
.******************************.U*...
HENT GRID..*(..*************************
*****..*2.D1 HENT GRID.L*<..K$"GRID HENT
ES AKTIE:";:.A$..*F..K$"GRID LOADES FOR
"A$..*P..P$"OK? -> F7..+Z..P$"ELLE
RS -> F1.)+D.D :Q.DV:D)Q..0.7+N..Q..7.
D4.Q+X..2,8,2,"G.".A$.",S,R".Z+...2,X.C
+...2,Y.M+...2,YN.W+ ..2,YX..+...X,Y,YN,
YX..+...I.0.X..+...J.YN.YX..+H..2,A%(I,J
)..+R..J..+...I.B+.. 2.I+..D4..+...*****
*************************..+... INIT-G
EM.",...******************************.2
,..D1 INIT.GEM.N,...2,8,2,"@:--INIT--,S,
W".A,...P$NN" AKTIER".K,E..2,NN.W,J..Q.0
.NN..,T..2,B$(Q)..,...Q..,...Q.0.NN..,..
.2,L(Q)..,...Q..,...Q.0.NN.B,...2,K(Q).I
,...Q.Z,...:FORQ=0TONN..,...:PRINT#2,DA$
(Q)..,...:NEXTQ..-.. 2..-..D4...
> CLICK IMAGE PREVIEW FOR FULL MODAL