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