MINNE-KOPI
FILE INFORMATION
FILENAME(S): MINNE-KOPI
FILE TYPE(S): PRG
FILE SIZE: 1.9K
FIRST SEEN: 2025-11-30 19:35:19
APPEARS ON: 1 disk(s)
FILE HASH
920594dca38ac2e14e38a0c52cfbb95cafe777992cfb2b02fbbdebd7b3ee89c8
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| KIMSA S TEAM | MINNE-KOPI | PRG | Curtcool, bitbear | 2 | 19 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 34 08 EC 13 8F 22 14 14 14 14 14 14 14 14 |..4...."........| 00000010: 14 20 20 20 20 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |. **********| 00000020: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000030: 2A 2A 2A 2A 00 67 08 F6 13 8F 22 14 14 14 14 14 |****.g....".....| 00000040: 14 14 14 14 20 20 20 20 20 2A 20 20 20 20 4D 20 |.... * M | 00000050: 49 20 4E 20 4E 20 45 20 20 20 4B 20 4F 20 50 20 |I N N E K O P | 00000060: 49 20 20 20 20 20 2A 00 9A 08 FB 13 8F 22 14 14 |I *......"..| 00000070: 14 14 14 14 14 14 14 20 20 20 20 20 2A 20 20 20 |....... * | 00000080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000090: 20 20 20 20 20 20 20 20 20 2A 00 CD 08 00 14 8F | *......| 000000A0: 22 14 14 14 14 14 14 14 14 14 20 20 20 20 20 2A |"......... *| 000000B0: 20 20 4B 4F 50 49 45 52 45 52 20 4D 49 4E 4E 45 | KOPIERER MINNE| 000000C0: 20 54 49 4C 20 44 41 54 41 20 20 20 2A 00 00 09 | TIL DATA *...| 000000D0: 14 14 8F 22 14 14 14 14 14 14 14 14 14 20 20 20 |..."......... | 000000E0: 20 20 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 | * | 000000F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A | *| 00000100: 00 33 09 28 14 8F 22 14 14 14 14 14 14 14 14 14 |.3.(..".........| 00000110: 20 20 20 20 20 2A 20 20 20 43 4F 50 59 52 49 47 | * COPYRIG| 00000120: 48 54 20 31 38 2F 31 32 2D 31 39 38 33 20 20 20 |HT 18/12-1983 | 00000130: 20 20 2A 00 66 09 2D 14 8F 22 14 14 14 14 14 14 | *.f.-.."......| 00000140: 14 14 14 20 20 20 20 20 2A 20 20 20 20 20 20 20 |... * | 00000150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000160: 20 20 20 20 20 2A 00 99 09 3C 14 8F 22 14 14 14 | *...<.."...| 00000170: 14 14 14 14 14 14 20 20 20 20 20 2A 20 20 20 C6 |...... * .| 00000180: C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 |................| 00000190: C6 C6 C6 C6 20 20 20 20 2A 00 CC 09 46 14 8F 22 |.... *...F.."| 000001A0: 14 14 14 14 14 14 14 14 14 20 20 20 20 20 2A 20 |......... * | 000001B0: 20 20 44 20 41 20 54 20 41 20 2D 20 54 20 52 20 | D A T A - T R | 000001C0: 4F 20 4E 20 49 20 43 20 20 20 20 2A 00 FF 09 4B |O N I C *...K| 000001D0: 14 8F 22 14 14 14 14 14 14 14 14 14 20 20 20 20 |.."......... | 000001E0: 20 2A 20 20 20 A6 A6 20 56 49 44 41 52 20 4D 41 | * .. VIDAR MA| 000001F0: 52 54 49 4E 53 45 4E 20 A6 A6 20 20 20 20 2A 00 |RTINSEN .. *.| 00000200: 32 0A 4D 14 8F 22 14 14 14 14 14 14 14 14 14 20 |2.M.."......... | 00000210: 20 20 20 20 2A 20 20 20 C4 C4 C4 C4 C4 C4 C4 C4 | * ........| 00000220: C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 20 20 20 |............. | 00000230: 20 2A 00 65 0A 50 14 8F 22 14 14 14 14 14 14 14 | *.e.P..".......| 00000240: 14 14 20 20 20 20 20 2A 20 20 20 20 20 20 20 20 |.. * | 00000250: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000260: 20 20 20 20 2A 00 98 0A 64 14 8F 22 14 14 14 14 | *...d.."....| 00000270: 14 14 14 14 14 20 20 20 20 20 2A 2A 2A 2A 2A 2A |..... ******| 00000280: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000290: 2A 2A 2A 2A 2A 2A 2A 2A 00 A8 0A 65 14 8F 22 14 |********...e..".| 000002A0: 14 14 14 14 14 14 14 14 00 B8 0A 66 14 8F 22 14 |...........f..".| 000002B0: 14 14 14 14 14 14 14 14 00 E6 0A 9B 14 8F 22 14 |..............".| 000002C0: 14 14 14 14 14 14 14 14 20 20 20 20 20 20 20 43 |........ C| 000002D0: 20 4F 20 4D 20 4D 20 4F 20 44 20 4F 20 52 20 45 | O M M O D O R E| 000002E0: 20 20 20 36 20 34 00 F6 0A 9C 14 8F 22 14 14 14 | 6 4......"...| 000002F0: 14 14 14 14 14 14 00 00 0B A0 14 99 22 93 22 3A |............".":| 00000300: 00 18 0B A5 14 8F 20 20 4F 4D 47 4A 4F 52 54 20 |...... OMGJORT | 00000310: 20 32 30 2F 38 2D 38 35 00 3D 0B C8 14 99 22 11 | 20/8-85.=....".| 00000320: 11 4B 4F 50 49 45 52 20 4D 49 4E 4E 45 20 54 49 |.KOPIER MINNE TI| 00000330: 4C 20 42 41 53 49 43 20 44 41 54 41 22 00 53 0B |L BASIC DATA".S.| 00000340: 18 15 8F 20 2A 2A 2A 20 2A 2A 2A 20 2A 2A 2A 20 |... *** *** *** | 00000350: 2A 2A 2A 00 64 0B 2C 15 99 22 11 11 48 56 49 4C |***.d.,.."..HVIL| 00000360: 4B 45 4E 22 00 7C 0B 68 15 99 22 11 53 54 41 52 |KEN".|.h..".STAR| 00000370: 54 20 41 44 52 45 53 53 45 20 3F 22 00 8C 0B 7C |T ADRESSE ?"...|| 00000380: 15 85 22 11 11 46 52 41 20 22 3B 41 00 A1 0B 90 |.."..FRA ";A....| 00000390: 15 85 22 11 54 49 4C 20 22 3B 42 3A 42 B2 42 AA |..".TIL ";B:B.B.| 000003A0: 31 00 A7 0B B8 15 8F 00 C3 0B CC 15 8F 20 20 20 |1............ | 000003B0: 20 50 52 49 4E 54 22 11 4C 49 4E 4A 45 4E 52 2E | PRINT".LINJENR.| 000003C0: 20 3F 22 00 DC 0B E0 15 8F 20 20 20 20 49 4E 50 | ?"...... INP| 000003D0: 55 54 22 11 11 46 52 41 20 22 3B 44 00 FB 0B 08 |UT"..FRA ";D....| 000003E0: 16 8F 20 20 20 20 49 46 44 3C 30 4F 52 44 3E 39 |.. IFD<0ORD>9| 000003F0: 30 30 30 54 48 45 4E 35 36 30 30 00 20 0C 1C 16 |000THEN5600. ...| 00000400: 8F 20 20 20 20 50 52 49 4E 54 22 11 4C 49 4E 4A |. PRINT".LINJ| 00000410: 45 41 56 53 54 41 4E 44 20 28 31 2D 31 30 29 22 |EAVSTAND (1-10)"| 00000420: 00 34 0C 30 16 8F 20 20 20 20 49 4E 50 55 54 22 |.4.0.. INPUT"| 00000430: 11 22 3B 46 00 52 0C 44 16 8F 20 20 20 20 49 46 |.";F.R.D.. IF| 00000440: 20 46 3C 30 4F 52 46 3E 31 30 54 48 45 4E 35 36 | F<0ORF>10THEN56| 00000450: 38 30 00 58 0C 70 17 8F 00 66 0C 75 17 44 B2 31 |80.X.p...f.u.D.1| 00000460: 30 30 3A 46 B2 32 00 73 0C 7A 17 41 31 B2 41 3A |00:F.2.s.z.A1.A:| 00000470: 54 B2 44 00 83 0C 7F 17 99 22 93 11 11 4E 45 57 |T.D......"...NEW| 00000480: 11 11 22 00 A8 0C 58 1B 99 22 31 33 3F 22 C7 28 |.."...X.."13?".(| 00000490: 33 34 29 22 93 11 11 11 22 C7 28 33 34 29 22 54 |34)"....".(34)"T| 000004A0: 3B 3A 54 3D 54 2B 22 46 00 D7 0C 76 1B 99 22 31 |;:T=T+"F...v.."1| 000004B0: 34 49 46 41 31 3E 22 42 22 54 48 45 4E 3F 22 C7 |4IFA1>"B"THEN?".| 000004C0: 28 33 34 29 22 11 11 11 11 11 22 C7 28 33 34 29 |(34)".....".(34)| 000004D0: 22 3A 47 CF 32 31 22 00 10 0D 80 1B 99 22 31 35 |":G.21"......"15| 000004E0: 3F 22 C7 28 33 34 29 22 44 C1 22 C7 28 33 34 29 |?".(34)"D.".(34)| 000004F0: 22 3B 3A 46 4F 52 55 3D 30 54 4F 37 3A 47 3D 50 |";:FORU=0TO7:G=P| 00000500: 45 45 4B 28 41 31 2B 55 29 3A 53 3D 53 2B 47 22 |EEK(A1+U):S=S+G"| 00000510: 00 55 0D 8A 1B 99 22 31 36 47 24 3D 53 54 52 24 |.U...."16G$=STR$| 00000520: 28 47 29 3A 47 24 3D 52 49 47 48 54 24 28 47 24 |(G):G$=RIGHT$(G$| 00000530: 2C 4C 45 4E 28 47 24 29 2D 31 29 3A 3F 47 24 22 |,LEN(G$)-1):?G$"| 00000540: C7 28 33 34 29 22 2C 22 C7 28 33 34 29 22 3B 3A |.(34)",".(34)";:| 00000550: 4E 45 58 54 22 00 6D 0D 9E 1B 99 22 31 37 3F 53 |NEXT".m...."17?S| 00000560: 3A 41 31 3D 41 31 2B 38 3A 53 3D 30 22 00 B0 0D |:A1=A1+8:S=0"...| 00000570: A8 1B 99 22 31 38 3F 22 C7 28 33 34 29 22 41 31 |..."18?".(34)"A1| 00000580: 3D 22 C7 28 33 34 29 22 41 31 22 C7 28 33 34 29 |=".(34)"A1".(34)| 00000590: 22 3A 54 3D 22 C7 28 33 34 29 22 54 22 C7 28 33 |":T=".(34)"T".(3| 000005A0: 34 29 22 3A 47 4F 54 4F 31 33 22 C7 28 33 34 29 |4)":GOTO13".(34)| 000005B0: 00 DF 0D B2 1B 99 22 31 39 46 4F 52 56 3D 30 54 |......"19FORV=0T| 000005C0: 4F 32 3A 50 4F 4B 45 36 33 31 2B 56 2C 31 33 3A |O2:POKE631+V,13:| 000005D0: 4E 45 58 54 3A 50 4F 4B 45 31 39 38 2C 33 22 00 |NEXT:POKE198,3".| 000005E0: FD 0D 16 1C 99 22 32 30 3F 22 C7 28 33 34 29 22 |....."20?".(34)"| 000005F0: 13 22 C7 28 33 34 29 22 3A 45 4E 44 22 00 28 0E |.".(34)":END".(.| 00000600: 17 1C 99 22 46 4F 52 57 3D 30 54 4F 35 3A 50 CF |..."FORW=0TO5:P.| 00000610: 36 33 31 2B 57 2C 31 33 3A 4E 45 58 54 3A 50 CF |631+W,13:NEXT:P.| 00000620: 31 39 38 2C 35 11 11 22 00 74 0E 18 1C 99 22 32 |198,5..".t...."2| 00000630: 31 46 4F 52 56 3D 31 33 54 4F 32 31 3A 3F 56 3A |1FORV=13TO21:?V:| 00000640: 50 CF 36 31 38 2B 56 2C 31 33 3A 4E 45 58 54 3A |P.618+V,13:NEXT:| 00000650: 50 CF 31 39 38 2C 31 30 3A 3F 22 C7 28 33 34 29 |P.198,10:?".(34)| 00000660: 22 13 11 11 11 11 11 11 22 C7 28 33 34 29 22 3A |".......".(34)":| 00000670: 45 4E 44 22 00 B5 0E 19 1C 99 22 35 30 46 4F 52 |END"......"50FOR| 00000680: 54 3D 22 41 22 54 4F 22 42 AB 31 22 53 54 45 50 |T="A"TO"B.1"STEP| 00000690: 38 3A 46 4F 52 55 3D 30 54 4F 37 3A 52 45 41 44 |8:FORU=0TO7:READ| 000006A0: 43 3A 50 CF 54 2B 55 2C 43 3A 53 3D 53 2B 43 3A |C:P.T+U,C:S=S+C:| 000006B0: 4E 45 58 54 22 00 01 0F 1A 1C 99 22 35 35 52 45 |NEXT"......"55RE| 000006C0: 41 44 53 31 3A 49 46 53 31 3C 3E 53 54 48 45 4E |ADS1:IFS1<>STHEN| 000006D0: 3F 22 C7 28 33 34 29 22 46 45 49 4C 20 49 20 4C |?".(34)"FEIL I L| 000006E0: 49 4E 4A 45 22 C7 28 33 34 29 22 50 C5 28 36 33 |INJE".(34)"P.(63| 000006F0: 29 2B 32 35 36 2A 50 C5 28 36 34 29 3A 45 4E 44 |)+256*P.(64):END| 00000700: 22 00 19 0F 1B 1C 99 22 36 30 53 3D 30 3A 4E 45 |"......"60S=0:NE| 00000710: 58 54 20 54 3A 45 4E 44 22 00 3A 0F 1C 1C 99 22 |XT T:END".:...."| 00000720: 41 31 3D 22 41 31 22 3A 54 3D 22 54 22 3A 42 3D |A1="A1":T="T":B=| 00000730: 22 42 22 3A 47 CF 31 33 13 22 00 51 0F 20 1C 81 |"B":G.13.".Q. ..| 00000740: 54 B2 30 A4 39 3A 97 36 33 31 AA 54 2C 31 33 3A |T.0.9:.631.T,13:| 00000750: 82 00 5D 0F 2A 1C 97 31 39 38 2C 31 30 00 69 0F |..].*..198,10.i.| 00000760: 34 1C 99 22 13 22 3B 3A 80 00 00 00 |4..".";:.... |
..4...."......... ******************
************.G...."......... * M
I N N E K O P I *......".........
* *.M....
"......... * KOPIERER MINNE TIL DAT
A *......"......... *
*.3.(.."......... *
COPYRIGHT 18/12-1983 *.F.-.."......
... * *..
.<.."......... * FFFFFFFFFFFFFFFFF
FFFF *.L.F.."......... * D A T
A - T R O N I C *...K..".........
* .. VIDAR MARTINSEN .. *.2.M.."..
....... * DDDDDDDDDDDDDDDDDDDDD
*.E.P.."......... *
*...D.."......... ******
************************...E..".........
...F.."..............."......... C
O M M O D O R E 6 4......"...........
. ..".":...... OMGJORT 20/8-85.=.H..".
.KOPIER MINNE TIL BASIC DATA".S.... ***
*** *** ***.D.,.."..HVILKEN".|.H..".STAR
T ADRESSE ?"...|.."..FRA ";A......".TIL
";B:B.B.1.......C.L.. PRINT".LINJENR.
?"...... INPUT"..FRA ";D...... IF
D<0ORD>9000THEN5600. .... PRINT".LINJ
EAVSTAND (1-10)".4.0.. INPUT".";F.R.D
.. IF F<0ORF>10THEN5680.X.P...F.U.D.1
00:F.2.S.Z.A1.A:T.D....."...NEW.."...X.
."13?"G(34)"...."G(34)"T;:T=T+"F.W.V.."1
4IFA1>"B"THEN?"G(34)"....."G(34)":GO21".
....."15?"G(34)"DA"G(34)";:FORU=0TO7:G=P
EEK(A1+U):S=S+G".U...."16G$=STR$(G):G$=R
IGHT$(G$,LEN(G$)-1):?G$"G(34)","G(34)";:
NEXT".M...."17?S:A1=A1+8:S=0"......"18?"
G(34)"A1="G(34)"A1"G(34)":T="G(34)"T"G(3
4)":GOTO13"G(34)......"19FORV=0TO2:POKE6
31+V,13:NEXT:POKE198,3"......"20?"G(34)"
."G(34)":END".(...."FORW=0TO5:PO631+W,13
:NEXT:PO198,5..".T...."21FORV=13TO21:?V:
PO618+V,13:NEXT:PO198,10:?"G(34)".......
"G(34)":END"......"50FORT="A"TO"B.1"STEP
8:FORU=0TO7:READC:POT+U,C:S=S+C:NEXT"...
..."55READS1:IFS1<>STHEN?"G(34)"FEIL I L
INJE"G(34)"PE(63)+256*PE(64):END"......"
60S=0:NEXT T:END".:...."A1="A1":T="T":B=
"B":GO13.".Q. ..T.0.9:.631.T,13:..].*..1
98,10.I.4..".";:....
> CLICK IMAGE PREVIEW FOR FULL MODAL