GLOS F£RH£R

FILE INFORMATION

FILENAME(S): GLOS F£RH£R

FILE TYPE(S): PRG

FILE SIZE: 2.2K

FIRST SEEN: 2025-12-01 01:10:14

APPEARS ON: 1 disk(s)

FILE HASH

1fa4530c3617c0273c915034d4ec95087e1ad1b3671537791b03c33bcac61986

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
NYTTO	GLOS F£RH£R	PRG	hedning, Martin L0fgren	13	1	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 2C 1B 52 1B 04 00 8F 20  2A 20 47 4C 4F 53 2D 46  |,.R.... * GLOS-F|
00000010: 5C 52 48 5C 52 20 2A 20  41 56 20 4E 49 4C 53 20  |\RH\R * AV NILS |
00000020: 4F 4C 49 56 49 55 53 00  79 1B 05 00 86 53 56 24  |OLIVIUS.y....SV$|
00000030: 28 34 30 30 30 29 2C 45  4E 24 28 34 30 30 30 29  |(4000),EN$(4000)|
00000040: 3A 4E B2 30 3A 43 52 24  B2 C7 28 31 33 29 00 A9  |:N.0:CR$..(13)..|
00000050: 1B 0A 00 99 22 93 11 2A  20 4D 45 4E 59 20 2A 11  |...."..* MENY *.|
00000060: 22 3A 99 22 31 2E 49 4E  4D 41 54 4E 49 4E 47 20  |":."1.INMATNING |
00000070: 41 56 20 47 4C 4F 53 4F  52 22 3A 46 B2 30 00 C9  |AV GLOSOR":F.0..|
00000080: 1B 0F 00 99 22 11 32 2E  4C 49 53 54 41 20 49 4E  |....".2.LISTA IN|
00000090: 4D 41 54 41 44 45 20 47  4C 4F 53 4F 52 22 00 09  |MATADE GLOSOR"..|
000000A0: 1C 14 00 99 22 11 33 2E  46 5C 52 48 5C 52 20 53  |....".3.F\RH\R S|
000000B0: 56 45 4E 53 4B 41 2F 45  4E 47 45 4C 53 4B 41 22  |VENSKA/ENGELSKA"|
000000C0: 3A 99 22 11 34 2E 46 5C  52 48 5C 52 20 45 4E 47  |:.".4.F\RH\R ENG|
000000D0: 45 4C 53 4B 41 2F 53 56  45 4E 53 4B 41 22 00 46  |ELSKA/SVENSKA".F|
000000E0: 1C 1E 00 99 22 11 35 2E  54 49 4C 4C 2F 46 52 5D  |....".5.TILL/FR]|
000000F0: 4E 20 44 41 54 41 46 49  4C 22 3A 99 22 11 11 11  |N DATAFIL":."...|
00000100: 11 41 4E 54 41 4C 20 49  4E 4D 41 54 41 44 45 20  |.ANTAL INMATADE |
00000110: 47 4C 4F 53 4F 52 3A 20  22 3B 4E 00 7D 1C 28 00  |GLOSOR: ";N.}.(.|
00000120: 99 22 11 4E 55 4D 4D 45  52 56 41 4C 22 3B 3A 4E  |.".NUMMERVAL";:N|
00000130: 52 24 B2 22 22 3A 85 4E  52 24 3A 4E 52 B2 C5 28  |R$."":.NR$:NR..(|
00000140: 4E 52 24 29 3A 8B 4E 52  B2 30 B0 4E 52 B1 35 A7  |NR$):.NR.0.NR.5.|
00000150: 34 30 00 98 1C 32 00 91  4E 52 89 36 30 2C 31 33  |40...2..NR.60,13|
00000160: 30 2C 31 35 30 2C 33 30  30 2C 35 30 30 00 BA 1C  |0,150,300,500...|
00000170: 3C 00 99 22 93 11 2A 20  49 4E 4D 41 54 4E 49 4E  |<.."..* INMATNIN|
00000180: 47 20 41 56 20 47 4C 4F  53 4F 52 20 2A 11 22 00  |G AV GLOSOR *.".|
00000190: F0 1C 46 00 4E B2 4E AA  31 3A 99 22 11 4E 52 20  |..F.N.N.1:.".NR |
000001A0: 22 3B 4E 3B 3A 85 22 53  56 45 4E 53 4B 41 22 3B  |";N;:."SVENSKA";|
000001B0: 53 56 24 28 4E 29 3A 8B  53 56 24 28 4E 29 B2 22  |SV$(N):.SV$(N)."|
000001C0: 22 A7 31 31 30 00 29 1D  4B 00 85 22 45 4E 47 45  |".110.).K.."ENGE|
000001D0: 4C 53 4B 41 22 3B 45 4E  24 28 4E 29 3A 99 22 4E  |LSKA";EN$(N):."N|
000001E0: 52 20 22 3B 4E 3B 22 3A  20 22 3B 53 56 24 28 4E  |R ";N;": ";SV$(N|
000001F0: 29 3B 22 20 2D 20 22 3B  45 4E 24 28 4E 29 00 54  |);" - ";EN$(N).T|
00000200: 1D 50 00 99 22 4B 4F 52  52 52 4B 54 20 49 4E 4D  |.P.."KORRRKT INM|
00000210: 41 54 41 54 22 3B 3A 4A  24 B2 22 22 3A 85 22 28  |ATAT";:J$."":."(|
00000220: 4A 3D 4A 41 29 22 3B 4A  24 00 89 1D 5A 00 8B 4A  |J=JA)";J$...Z..J|
00000230: 24 B3 B1 22 4A 22 A7 4E  B2 4E AB 31 3A 99 22 4D  |$.."J".N.N.1:."M|
00000240: 41 54 41 20 49 4E 20 53  49 53 54 41 20 47 4C 4F  |ATA IN SISTA GLO|
00000250: 53 2D 50 41 52 45 54 20  49 47 45 4E 21 22 00 91  |S-PARET IGEN!"..|
00000260: 1D 64 00 89 37 30 00 C6  1D 6E 00 4E B2 4E AB 31  |.d..70...n.N.N.1|
00000270: 3A 4A 24 B2 22 22 3A 99  22 53 4C 55 54 20 47 4C  |:J$."":."SLUT GL|
00000280: 4F 53 4F 52 20 28 4A 3D  4A 41 29 22 3A 85 4A 24  |OSOR (J=JA)":.J$|
00000290: 3A 8B 4A 24 B2 22 4A 22  A7 31 30 00 CE 1D 78 00  |:.J$."J".10...x.|
000002A0: 89 37 30 00 FD 1D 82 00  53 B2 30 3A 81 49 B2 31  |.70.....S.0:.I.1|
000002B0: A4 4E 3A 8B 53 B2 30 A7  99 22 93 11 2A 20 49 4E  |.N:.S.0.."..* IN|
000002C0: 4D 41 54 41 44 45 20 47  4C 4F 53 4F 52 20 2A 11  |MATADE GLOSOR *.|
000002D0: 11 22 00 1C 1E 8C 00 99  49 3B 22 3A 22 3B 53 56  |."......I;":";SV|
000002E0: 24 28 49 29 3B 22 20 2D  20 22 3B 45 4E 24 28 49  |$(I);" - ";EN$(I|
000002F0: 29 00 48 1E 91 00 53 B2  53 AA 31 3A 8B 53 B2 31  |).H...S.S.1:.S.1|
00000300: 30 A7 53 B2 30 3A 85 22  11 11 54 52 59 43 4B 20  |0.S.0:."..TRYCK |
00000310: 3C 52 45 54 55 52 4E 3E  22 3B 52 45 24 00 7A 1E  |<RETURN>";RE$.z.|
00000320: 94 00 82 3A 85 20 22 11  11 5D 54 45 52 20 54 49  |...:. "..]TER TI|
00000330: 4C 4C 20 4D 45 4E 59 20  54 52 59 43 4B 20 3C 52  |LL MENY TRYCK <R|
00000340: 45 54 55 52 4E 3E 22 3B  52 45 24 3A 89 31 30 00  |ETURN>";RE$:.10.|
00000350: A0 1E 96 00 99 22 93 11  2A 20 46 5C 52 48 5C 52  |....."..* F\RH\R|
00000360: 20 53 56 45 4E 53 4B 41  2F 45 4E 47 45 4C 53 4B  | SVENSKA/ENGELSK|
00000370: 41 20 2A 11 22 00 D1 1E  A0 00 81 49 B2 31 A4 4E  |A *."......I.1.N|
00000380: 3A 99 22 56 41 44 20 48  45 54 45 52 20 50 5D 20  |:."VAD HETER P] |
00000390: 45 4E 47 45 4C 53 4B 41  3A 20 22 3B 53 56 24 28  |ENGELSKA: ";SV$(|
000003A0: 49 29 3A 85 41 24 00 FC  1E AA 00 8B 41 24 B2 45  |I):.A$......A$.E|
000003B0: 4E 24 28 49 29 A7 99 22  4B 4F 52 52 45 4B 54 20  |N$(I).."KORREKT |
000003C0: 53 56 41 52 20 2D 20 42  52 41 21 22 3A 89 32 35  |SVAR - BRA!":.25|
000003D0: 30 00 3B 1F B4 00 99 22  44 55 20 5B 52 20 46 5C  |0.;...."DU [R F\|
000003E0: 52 20 44 5D 4C 49 47 2C  44 45 54 20 42 5C 52 47  |R D]LIG,DET B\RG|
000003F0: 41 52 20 4A 55 20 50 5D  20 22 3B C8 28 45 4E 24  |AR JU P] ";.(EN$|
00000400: 28 49 29 2C 31 29 3B 22  2E 22 3B 3A 8D 32 36 30  |(I),1);".";:.260|
00000410: 00 6F 1F BE 00 99 22 46  5C 52 53 5C 4B 20 49 47  |.o...."F\RS\K IG|
00000420: 45 4E 21 22 3A 85 41 24  3A 8B 41 24 B2 45 4E 24  |EN!":.A$:.A$.EN$|
00000430: 28 49 29 A7 99 22 4B 4F  52 52 45 4B 54 2E 22 3A  |(I).."KORREKT.":|
00000440: 89 32 35 30 00 B0 1F C8  00 99 22 53 55 43 4B 20  |.250......"SUCK |
00000450: 4E 55 20 5B 52 20 44 45  54 20 46 45 4C 20 49 47  |NU [R DET FEL IG|
00000460: 45 4E 21 20 44 45 54 20  42 5C 52 47 41 52 20 50  |EN! DET B\RGAR P|
00000470: 5D 20 22 3B C8 28 45 4E  24 28 49 29 2C 32 29 3B  |] ";.(EN$(I),2);|
00000480: 3A 8D 32 36 30 00 E4 1F  D2 00 99 22 46 5C 52 53  |:.260......"F\RS|
00000490: 5C 4B 20 49 47 45 4E 21  22 3A 85 41 24 3A 8B 41  |\K IGEN!":.A$:.A|
000004A0: 24 B2 45 4E 24 28 49 29  A7 99 22 4B 4F 52 52 45  |$.EN$(I).."KORRE|
000004B0: 4B 54 2E 22 3A 89 32 35  30 00 29 20 DC 00 99 22  |KT.":.250.) ..."|
000004C0: 5B 56 45 4E 20 45 4E 20  44 41 54 4F 52 20 4B 41  |[VEN EN DATOR KA|
000004D0: 4E 20 54 52 5C 54 54 4E  41 22 3A 99 22 48 5B 52  |N TR\TTNA":."H[R|
000004E0: 20 46 5D 52 20 44 55 20  53 56 41 52 45 54 3A 20  | F]R DU SVARET: |
000004F0: 22 3B 45 4E 24 28 49 29  3A 46 B2 46 AA 31 00 4D  |";EN$(I):F.F.1.M|
00000500: 20 FA 00 82 3A 99 22 11  54 52 59 43 4B 20 3C 52  | ...:.".TRYCK <R|
00000510: 45 54 55 52 4E 3E 22 3B  3A 85 52 45 24 3A 89 34  |ETURN>";:.RE$:.4|
00000520: 30 30 00 6E 20 04 01 81  4C B2 33 A4 28 C3 28 45  |00.n ...L.3.(.(E|
00000530: 4E 24 28 49 29 29 29 3A  99 22 2E 22 3B 3A 82 3A  |N$(I))):.".";:.:|
00000540: 99 3A 8E 00 94 20 2C 01  99 22 93 11 2A 20 46 5C  |.:... ,.."..* F\|
00000550: 52 48 5C 52 20 45 4E 47  45 4C 53 4B 41 2F 53 56  |RH\R ENGELSKA/SV|
00000560: 45 4E 53 4B 41 20 2A 11  22 00 C4 20 36 01 81 49  |ENSKA *.".. 6..I|
00000570: B2 31 A4 4E 3A 99 22 56  41 44 20 48 45 54 45 52  |.1.N:."VAD HETER|
00000580: 20 50 5D 20 53 56 45 4E  53 4B 41 3A 20 22 3B 45  | P] SVENSKA: ";E|
00000590: 4E 24 28 49 29 3A 85 41  24 00 03 21 40 01 8B 41  |N$(I):.A$..!@..A|
000005A0: 24 B2 53 56 24 28 49 29  A7 99 22 4B 4F 52 52 45  |$.SV$(I).."KORRE|
000005B0: 4B 54 20 53 56 41 52 20  2D 20 42 52 41 56 4F 2C  |KT SVAR - BRAVO,|
000005C0: 44 55 20 4B 41 4E 20 4F  4D 20 44 55 20 56 49 4C  |DU KAN OM DU VIL|
000005D0: 4C 21 22 3A 89 33 37 30  00 3D 21 4A 01 99 22 4C  |L!":.370.=!J.."L|
000005E0: 45 44 53 45 4E 20 2D 20  46 45 4C 21 20 44 45 54  |EDSEN - FEL! DET|
000005F0: 20 42 5C 52 4A 41 52 20  50 5D 20 22 3B C8 28 53  | B\RJAR P] ";.(S|
00000600: 56 24 28 49 29 2C 31 29  3B 22 2E 22 3B 3A 8D 33  |V$(I),1);".";:.3|
00000610: 38 30 00 70 21 54 01 99  22 46 5C 53 5C 4B 20 49  |80.p!T.."F\S\K I|
00000620: 47 45 4E 21 22 3A 85 41  24 3A 8B 41 24 B2 53 56  |GEN!":.A$:.A$.SV|
00000630: 24 28 49 29 A7 99 22 4B  4F 52 52 45 4B 54 2E 22  |$(I).."KORREKT."|
00000640: 3A 89 33 37 30 00 A9 21  5E 01 99 22 46 45 4C 20  |:.370..!^.."FEL |
00000650: 53 4F 4D 20 56 41 4E 4C  49 47 54 21 20 44 45 54  |SOM VANLIGT! DET|
00000660: 20 42 5C 52 4A 41 52 20  50 5D 20 22 3B C8 28 53  | B\RJAR P] ";.(S|
00000670: 56 24 28 49 29 2C 32 29  3B 3A 8D 33 38 30 00 D0  |V$(I),2);:.380..|
00000680: 21 68 01 99 22 44 5D 4C  49 47 54 2D 53 56 41 52  |!h.."D]LIGT-SVAR|
00000690: 45 54 20 5B 52 3A 20 22  3B 53 56 24 28 49 29 3A  |ET [R: ";SV$(I):|
000006A0: 46 B2 46 AA 31 00 F4 21  72 01 82 3A 99 22 11 54  |F.F.1..!r..:.".T|
000006B0: 52 59 43 4B 20 3C 52 45  54 55 52 4E 3E 22 3B 3A  |RYCK <RETURN>";:|
000006C0: 85 52 45 24 3A 89 34 30  30 00 15 22 7C 01 81 4C  |.RE$:.400.."|..L|
000006D0: B2 33 A4 28 C3 28 53 56  24 28 49 29 29 29 3A 99  |.3.(.(SV$(I))):.|
000006E0: 22 2E 22 3B 3A 82 3A 99  3A 8E 00 42 22 90 01 99  |".";:.:.:..B"...|
000006F0: 22 93 11 41 56 20 22 3B  4E 3B 22 20 47 4C 4F 53  |"..AV ";N;" GLOS|
00000700: 4F 52 2C 20 48 41 44 45  20 44 55 20 22 3B 46 3B  |OR, HADE DU ";F;|
00000710: 22 20 46 45 4C 2E 22 00  5F 22 9A 01 8B 46 B2 30  |" FEL."._"...F.0|
00000720: A7 99 22 11 2A 20 42 20  52 20 41 20 56 20 4F 20  |..".* B R A V O |
00000730: 21 20 2A 22 00 93 22 A4  01 8B 46 B1 32 A7 99 22  |! *".."...F.2.."|
00000740: 11 47 5D 20 4F 43 48 20  4C 5B 47 47 20 44 49 47  |.G] OCH L[GG DIG|
00000750: 20 54 49 44 49 47 41 52  45 20 4F 4D 20 4B 56 5B  | TIDIGARE OM KV[|
00000760: 4C 4C 41 52 4E 41 21 22  00 C6 22 AE 01 99 22 11  |LLARNA!".."...".|
00000770: 11 11 5D 54 45 52 20 54  49 4C 4C 20 4D 45 4E 59  |..]TER TILL MENY|
00000780: 2C 20 54 52 59 43 4B 20  3C 52 45 54 55 52 4E 3E  |, TRYCK <RETURN>|
00000790: 22 3B 3A 85 52 45 24 3A  89 31 30 00 07 23 F4 01  |";:.RE$:.10..#..|
000007A0: 99 22 93 11 44 41 54 41  46 49 4C 20 54 49 4C 4C  |."..DATAFIL TILL|
000007B0: 2F 46 52 5D 4E 20 42 41  4E 44 22 3A 99 22 11 42  |/FR]N BAND":.".B|
000007C0: 41 4E 44 20 49 20 52 5B  54 54 20 50 4F 53 49 54  |AND I R[TT POSIT|
000007D0: 49 4F 4E 20 28 4A 3D 4A  41 29 11 22 00 22 23 FE  |ION (J=JA)."."#.|
000007E0: 01 4A 24 B2 22 22 3A 85  4A 24 3A 8B 4A 24 B3 B1  |.J$."":.J$:.J$..|
000007F0: 22 4A 22 A7 35 30 30 00  5F 23 08 02 99 22 11 56  |"J".500._#...".V|
00000800: 49 4C 4C 20 44 55 20 4C  41 47 52 41 20 47 4C 4F  |ILL DU LAGRA GLO|
00000810: 53 4F 52 20 28 4C 29 22  3A 99 22 11 45 4C 4C 45  |SOR (L)":.".ELLE|
00000820: 52 20 48 5B 4D 54 41 20  47 4C 4F 53 4F 52 20 28  |R H[MTA GLOSOR (|
00000830: 48 29 11 22 00 74 23 12  02 85 4A 24 3A 8B 4A 24  |H).".t#...J$:.J$|
00000840: B2 22 4C 22 A7 8D 35 36  30 00 85 23 1C 02 8B 4A  |."L"..560..#...J|
00000850: 24 B2 22 48 22 A7 8D 35  38 30 00 8D 23 26 02 89  |$."H"..580..#&..|
00000860: 31 30 00 9D 23 30 02 9F  31 2C 31 2C 31 3A 98 31  |10..#0..1,1,1:.1|
00000870: 2C 4E 00 C9 23 3A 02 81  49 B2 31 A4 4E 3A 98 31  |,N..#:..I.1.N:.1|
00000880: 2C 53 56 24 28 49 29 3B  43 52 24 3B 45 4E 24 28  |,SV$(I);CR$;EN$(|
00000890: 49 29 3B 43 52 24 3B 3A  82 3A A0 31 3A 8E 00 D9  |I);CR$;:.:.1:...|
000008A0: 23 44 02 9F 31 2C 31 2C  30 3A 84 31 2C 4E 00 EE  |#D..1,1,0:.1,N..|
000008B0: 23 4E 02 81 49 B2 31 A4  4E 3A 84 31 2C 53 56 24  |#N..I.1.N:.1,SV$|
000008C0: 28 49 29 00 03 24 53 02  84 31 2C 45 4E 24 28 49  |(I)..$S..1,EN$(I|
000008D0: 29 3A 82 3A A0 31 3A 8E  00 00 00                 |):.:.1:....     |

,.R.... * GLOS-F\RH\R * AV NILS OLIVIUS.
Y....SV$(4000),EN$(4000):N.0:CR$.G(13)..
...."..* MENY *.":."1.INMATNING AV GLOSO
R":F.0.I....".2.LISTA INMATADE GLOSOR"..
....".3.F\RH\R SVENSKA/ENGELSKA":.".4.F\
RH\R ENGELSKA/SVENSKA".F....".5.TILL/FR]
N DATAFIL":."....ANTAL INMATADE GLOSOR: 
";N.}.(..".NUMMERVAL";:NR$."":.NR$:NR.E(
NR$):.NR.0.NR.5.40...2..NR.60,130,150,30
0,500...<.."..* INMATNING AV GLOSOR *.".
..F.N.N.1:.".NR ";N;:."SVENSKA";SV$(N):.
SV$(N)."".110.).K.."ENGELSKA";EN$(N):."N
R ";N;": ";SV$(N);" - ";EN$(N).T.P.."KOR
RRKT INMATAT";:J$."":."(J=JA)";J$...Z..J
$.."J".N.N.1:."MATA IN SISTA GLOS-PARET 
IGEN!"...D..70.F.N.N.N.1:J$."":."SLUT GL
OSOR (J=JA)":.J$:.J$."J".10.N.X..70.....
S.0:.I.1.N:.S.0.."..* INMATADE GLOSOR *.
."......I;":";SV$(I);" - ";EN$(I).H...S.
S.1:.S.10.S.0:."..TRYCK <RETURN>";RE$.Z.
...:. "..]TER TILL MENY TRYCK <RETURN>";
RE$:.10. ...."..* F\RH\R SVENSKA/ENGELSK
A *.".Q. ..I.1.N:."VAD HETER P] ENGELSKA
: ";SV$(I):.A$......A$.EN$(I).."KORREKT 
SVAR - BRA!":.250.;...."DU [R F\R D]LIG,
DET B\RGAR JU P] ";H(EN$(I),1);".";:.260
.O...."F\RS\K IGEN!":.A$:.A$.EN$(I).."KO
RREKT.":.250...H.."SUCK NU [R DET FEL IG
EN! DET B\RGAR P] ";H(EN$(I),2);:.260...
R.."F\RS\K IGEN!":.A$:.A$.EN$(I).."KORRE
KT.":.250.) ..."[VEN EN DATOR KAN TR\TTN
A":."H[R F]R DU SVARET: ";EN$(I):F.F.1.M
 ...:.".TRYCK <RETURN>";:.RE$:.400.N ...
L.3.(C(EN$(I))):.".";:.:.:... ,.."..* F\
RH\R ENGELSKA/SVENSKA *.".D 6..I.1.N:."V
AD HETER P] SVENSKA: ";EN$(I):.A$..!@..A
$.SV$(I).."KORREKT SVAR - BRAVO,DU KAN O
M DU VILL!":.370.=!J.."LEDSEN - FEL! DET
 B\RJAR P] ";H(SV$(I),1);".";:.380.P!T..
"F\S\K IGEN!":.A$:.A$.SV$(I).."KORREKT."
:.370..!^.."FEL SOM VANLIGT! DET B\RJAR 
P] ";H(SV$(I),2);:.380.P!H.."D]LIGT-SVAR
ET [R: ";SV$(I):F.F.1..!R..:.".TRYCK <RE
TURN>";:.RE$:.400.."|..L.3.(C(SV$(I))):.
".";:.:.:..B"..."..AV ";N;" GLOSOR, HADE
 DU ";F;" FEL."._"...F.0..".* B R A V O 
! *".."...F.2..".G] OCH L[GG DIG TIDIGAR
E OM KV[LLARNA!".F"..."...]TER TILL MENY
, TRYCK <RETURN>";:.RE$:.10..#..."..DATA
FIL TILL/FR]N BAND":.".BAND I R[TT POSIT
ION (J=JA)."."#..J$."":.J$:.J$.."J".500.
_#...".VILL DU LAGRA GLOSOR (L)":.".ELLE
R H[MTA GLOSOR (H).".T#...J$:.J$."L"..56
0..#...J$."H"..580..#&..10..#0..1,1,1:.1
,N.I#:..I.1.N:.1,SV$(I);CR$;EN$(I);CR$;:
.: 1:..Y#D..1,1,0:.1,N..#N..I.1.N:.1,SV$
(I)..$S..1,EN$(I):.: 1:....

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL