PRG4<2>
FILE INFORMATION
FILENAME(S): PRG4<2>
FILE TYPE(S): PRG
FILE SIZE: 2.3K
FIRST SEEN: 2025-11-30 20:18:58
APPEARS ON: 1 disk(s)
FILE HASH
62121cc2bf7535e983ff3219b59874670a0aad91179b440083752c715a24d136
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DISK 30 SIDE 1 | PRG4<2> | PRG | Curtcool, Malcom | 16 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 27 08 0A 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |..'.... ********| 00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000020: 2A 2A 2A 2A 2A 2A 2A 00 4D 08 14 00 8F 20 2A 20 |*******.M.... * | 00000030: 20 20 20 20 20 20 31 33 20 52 49 47 54 49 47 45 | 13 RIGTIGE| 00000040: 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 73 08 | *.s.| 00000050: 1F 00 8F 20 2A 20 44 45 54 54 45 20 50 52 4F 47 |... * DETTE PROG| 00000060: 52 41 4D 20 47 45 4E 4E 45 4D 53 30 47 45 52 20 |RAM GENNEMS0GER | 00000070: 20 20 2A 00 99 08 20 00 8F 20 2A 20 45 4E 20 45 | *... .. * EN E| 00000080: 4B 53 49 53 54 45 52 45 4E 44 45 20 46 49 4C 20 |KSISTERENDE FIL | 00000090: 4D 45 44 20 20 20 20 20 2A 00 BF 08 21 00 8F 20 |MED *...!.. | 000000A0: 2A 20 54 49 50 53 54 45 47 4E 20 47 45 4E 45 52 |* TIPSTEGN GENER| 000000B0: 45 52 45 54 20 41 46 20 55 4C 54 52 41 2D 2A 00 |ERET AF ULTRA-*.| 000000C0: E5 08 22 00 8F 20 2A 20 54 49 50 53 2C 20 53 41 |..".. * TIPS, SA| 000000D0: 4D 54 49 44 49 47 54 20 4D 45 44 20 41 54 20 44 |MTIDIGT MED AT D| 000000E0: 45 4E 20 20 2A 00 0B 09 23 00 8F 20 2A 20 53 41 |EN *...#.. * SA| 000000F0: 4D 4D 45 4E 4C 49 47 4E 45 52 20 4D 45 44 20 44 |MMENLIGNER MED D| 00000100: 45 20 31 33 20 52 49 47 2D 20 2A 00 31 09 24 00 |E 13 RIG- *.1.$.| 00000110: 8F 20 2A 20 54 49 47 45 20 54 49 50 53 54 45 47 |. * TIGE TIPSTEG| 00000120: 4E 20 46 52 41 20 53 49 44 53 54 45 20 55 47 45 |N FRA SIDSTE UGE| 00000130: 2A 00 57 09 25 00 8F 20 2A 20 52 45 53 55 4C 54 |*.W.%.. * RESULT| 00000140: 41 54 45 54 20 42 4C 49 56 45 52 20 45 4E 20 55 |ATET BLIVER EN U| 00000150: 44 2D 20 20 20 20 2A 00 7D 09 26 00 8F 20 2A 20 |D- *.}.&.. * | 00000160: 53 4B 52 49 46 54 20 41 46 20 45 56 54 2E 20 47 |SKRIFT AF EVT. G| 00000170: 45 56 49 4E 53 54 45 52 2E 20 20 20 2A 00 A3 09 |EVINSTER. *...| 00000180: 27 00 8F 20 2A 20 20 20 20 20 20 20 20 20 20 20 |'.. * | 00000190: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000001A0: 20 20 2A 00 C9 09 28 00 8F 20 2A 20 4A 2E 4B 2E | *...(.. * J.K.| 000001B0: 20 4C 41 53 45 52 20 26 20 53 43 45 4E 45 2D 54 | LASER & SCENE-T| 000001C0: 45 4B 4E 49 4B 2E 20 20 2A 00 EF 09 29 00 8F 20 |EKNIK. *...).. | 000001D0: 2A 20 20 20 3C 43 3E 20 43 4F 50 59 52 49 47 48 |* <C> COPYRIGH| 000001E0: 54 20 31 39 38 39 20 20 20 20 20 20 20 20 2A 00 |T 1989 *.| 000001F0: 15 0A 2A 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..*.. **********| 00000200: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000210: 2A 2A 2A 2A 2A 00 33 0A 64 00 8F 20 2A 20 49 4E |*****.3.d.. * IN| 00000220: 44 4C 41 45 53 4E 49 4E 47 20 41 46 20 44 41 54 |DLAESNING AF DAT| 00000230: 41 20 2A 00 3F 0A 6E 00 86 20 41 28 31 34 29 00 |A *.?.n.. A(14).| 00000240: 4A 0A 78 00 8D 20 32 30 30 30 00 6D 0A 82 00 99 |J.x.. 2000.m....| 00000250: 20 A3 39 29 3B 22 11 55 47 45 2E 2E 2E 2E 2E 2E | .9);".UGE......| 00000260: 2E 2E 2E 2E 2E 2E 2E 2E 2E 3A 20 20 22 00 80 0A |.........: "...| 00000270: 8C 00 99 20 A3 32 37 29 3A 85 20 22 91 22 3B 55 |... .27):. ".";U| 00000280: 00 97 0A 96 00 8B 20 55 B3 31 20 B0 20 55 B1 35 |...... U.1 . U.5| 00000290: 32 20 A7 20 31 34 30 00 BE 0A A0 00 8F 20 2A 20 |2 . 140...... * | 000002A0: 49 4E 44 54 41 53 54 4E 49 4E 47 20 41 46 20 44 |INDTASTNING AF D| 000002B0: 45 20 31 33 20 52 49 47 54 49 47 45 20 2A 00 DD |E 13 RIGTIGE *..| 000002C0: 0A AA 00 99 20 A3 39 29 3B 22 49 4E 44 54 41 53 |.... .9);"INDTAS| 000002D0: 54 20 55 47 45 4E 20 31 33 27 45 52 22 00 E3 0A |T UGEN 13'ER"...| 000002E0: AF 00 99 00 F8 0A B4 00 41 24 B2 22 22 3A 81 20 |........A$."":. | 000002F0: 49 B2 31 20 A4 20 31 33 00 12 0B BE 00 3A 20 20 |I.1 . 13.....: | 00000300: A1 20 57 24 3A 8B 20 57 24 B2 22 22 20 A7 20 31 |. W$:. W$."" . 1| 00000310: 39 30 00 2B 0B C3 00 3A 20 20 8B 20 57 24 B2 22 |90.+...: . W$."| 00000320: 33 22 20 A7 20 57 24 B2 22 58 22 00 51 0B C8 00 |3" . W$."X".Q...| 00000330: 3A 20 20 8B 20 57 24 B2 22 31 22 B0 20 57 24 B2 |: . W$."1". W$.| 00000340: 22 58 22 B0 20 57 24 B2 22 32 22 20 A7 20 32 32 |"X". W$."2" . 22| 00000350: 30 00 5E 0B D2 00 3A 20 20 89 20 31 39 30 00 78 |0.^...: . 190.x| 00000360: 0B DC 00 3A 20 20 41 24 B2 41 24 AA 57 24 3A 99 |...: A$.A$.W$:.| 00000370: 20 A3 32 30 29 3B 57 24 00 AC 0B E6 00 3A 20 20 | .20);W$.....: | 00000380: 8B 20 C3 28 41 24 29 B2 33 20 B0 20 C3 28 41 24 |. .(A$).3 . .(A$| 00000390: 29 B2 36 20 B0 20 C3 28 41 24 29 B2 39 20 A7 20 |).6 . .(A$).9 . | 000003A0: 99 20 A3 31 39 29 3B 22 C0 C0 C0 22 00 B2 0B F0 |. .19);"..."....| 000003B0: 00 82 00 C8 0B FA 00 99 20 A3 32 35 29 3B 22 91 |........ .25);".| 000003C0: 99 4F 2E 4B 2E 20 3F 22 00 DE 0B 04 01 A1 20 57 |.O.K. ?"...... W| 000003D0: 24 3A 8B 20 57 24 B2 22 22 A7 20 32 36 30 00 F1 |$:. W$."". 260..| 000003E0: 0B 0E 01 8B 20 57 24 B2 22 4A 22 20 A7 20 32 38 |.... W$."J" . 28| 000003F0: 30 00 0D 0C 13 01 8B 20 57 24 B2 22 4E 22 20 A7 |0...... W$."N" .| 00000400: 20 8D 20 32 30 30 30 3A 89 20 31 37 30 00 17 0C | . 2000:. 170...| 00000410: 16 01 89 20 32 36 30 00 31 0C 18 01 8F 20 2A 20 |... 260.1.... * | 00000420: 53 45 4C 56 45 20 53 30 47 4E 49 4E 47 45 4E 20 |SELVE S0GNINGEN | 00000430: 2A 00 3F 0C 2C 01 9F 20 31 35 2C 38 2C 31 35 00 |*.?.,.. 15,8,15.| 00000440: 4A 0C 36 01 8D 20 32 30 30 30 00 68 0C 5E 01 9F |J.6.. 2000.h.^..| 00000450: 20 35 2C 38 2C 35 2C 22 30 3A 4B 22 AA C4 28 55 | 5,8,5,"0:K"..(U| 00000460: 29 AA 22 2C 53 2C 52 22 00 7C 0C 90 01 84 31 35 |).",S,R".|....15| 00000470: 2C 46 24 2C 47 24 2C 48 24 2C 49 24 00 8C 0C C2 |,F$,G$,H$,I$....| 00000480: 01 8B 20 C5 28 46 24 29 B1 30 20 A7 00 9E 0C F4 |.. .(F$).0 .....| 00000490: 01 84 35 2C 42 24 3A 52 4B B2 52 4B AA 31 00 B5 |..5,B$:RK.RK.1..| 000004A0: 0C 26 02 54 B2 30 3A 45 25 B2 30 3A 4B 25 B2 30 |.&.T.0:E%.0:K%.0| 000004B0: 3A 54 25 B2 30 00 C4 0C 58 02 81 20 49 B2 31 20 |:T%.0...X.. I.1 | 000004C0: A4 20 31 33 00 D7 0C 8A 02 3A 20 43 24 B2 CA 28 |. 13.....: C$..(| 000004D0: 41 24 2C 49 2C 31 29 00 EA 0C BC 02 3A 20 44 24 |A$,I,1).....: D$| 000004E0: B2 CA 28 42 24 2C 49 2C 31 29 00 05 0D BD 02 3A |..(B$,I,1).....:| 000004F0: 20 20 20 8B 20 44 24 B2 22 31 22 20 A7 20 45 25 | . D$."1" . E%| 00000500: B2 45 25 AA 31 00 20 0D BE 02 3A 20 20 20 8B 20 |.E%.1. ...: . | 00000510: 44 24 B2 22 58 22 20 A7 20 4B 25 B2 4B 25 AA 31 |D$."X" . K%.K%.1| 00000520: 00 3B 0D BF 02 3A 20 20 20 8B 20 44 24 B2 22 32 |.;...: . D$."2| 00000530: 22 20 A7 20 54 25 B2 54 25 AA 31 00 51 0D EE 02 |" . T%.T%.1.Q...| 00000540: 3A 20 8B 20 43 24 B2 44 24 20 A7 20 54 B2 54 AA |: . C$.D$ . T.T.| 00000550: 31 00 59 0D 20 03 82 20 49 00 69 0D 52 03 41 28 |1.Y. .. I.i.R.A(| 00000560: 54 29 B2 41 28 54 29 AA 31 00 7F 0D 53 03 8B 20 |T).A(T).1...S.. | 00000570: 54 45 25 B3 45 25 20 A7 20 54 45 25 B2 45 25 00 |TE%.E% . TE%.E%.| 00000580: 95 0D 54 03 8B 20 54 4B 25 B3 4B 25 20 A7 20 54 |..T.. TK%.K% . T| 00000590: 4B 25 B2 4B 25 00 AB 0D 55 03 8B 20 54 54 25 B3 |K%.K%...U.. TT%.| 000005A0: 54 25 20 A7 20 54 54 25 B2 54 25 00 B6 0D 5C 03 |T% . TT%.T%...\.| 000005B0: 8D 20 33 30 30 30 00 C7 0D 84 03 8B 20 53 54 B2 |. 3000...... ST.| 000005C0: 30 20 89 20 35 30 30 00 DD 0D 8E 03 A1 20 53 24 |0 . 500...... S$| 000005D0: 3A 8B 20 53 24 B2 22 22 A7 20 39 31 30 00 E8 0D |:. S$."". 910...| 000005E0: B6 03 8D 20 32 30 30 30 00 18 0E BB 03 99 20 A3 |... 2000...... .| 000005F0: 39 29 3B 22 11 96 55 47 45 20 3A 22 3B 55 3A 99 |9);"..UGE :";U:.| 00000600: 20 A3 31 39 29 3B 22 91 96 22 3B 52 4B 3B 22 52 | .19);"..";RK;"R| 00000610: 41 45 4B 4B 45 52 2E 22 00 38 0E C0 03 99 20 A3 |AEKKER.".8.... .| 00000620: 39 29 3B 22 11 96 41 4E 54 41 4C 20 52 49 47 54 |9);"..ANTAL RIGT| 00000630: 49 47 45 20 3A 22 3A 99 00 47 0E E8 03 81 20 49 |IGE :":..G.... I| 00000640: B2 31 20 A4 20 31 34 00 6A 0E 1A 04 3A 20 99 20 |.1 . 14.j...: . | 00000650: 41 28 49 AB 31 29 2C 22 4D 45 44 22 2C 49 AB 31 |A(I.1),"MED",I.1| 00000660: 2C 22 52 49 47 54 49 47 45 22 00 72 0E 4C 04 82 |,"RIGTIGE".r.L..| 00000670: 20 49 00 9E 0E 4D 04 99 20 A3 35 29 3B 22 11 99 | I...M.. .5);"..| 00000680: 53 54 30 52 53 54 45 20 41 4E 54 41 4C 20 31 20 |ST0RSTE ANTAL 1 | 00000690: 49 20 45 4E 20 52 4B 2E 20 22 3B 54 45 25 00 C9 |I EN RK. ";TE%..| 000006A0: 0E 4E 04 99 20 A3 35 29 3B 22 96 53 54 30 52 53 |.N.. .5);".ST0RS| 000006B0: 54 45 20 41 4E 54 41 4C 20 58 20 49 20 45 4E 20 |TE ANTAL X I EN | 000006C0: 52 4B 2E 20 22 3B 54 4B 25 00 F4 0E 4F 04 99 20 |RK. ";TK%...O.. | 000006D0: A3 35 29 3B 22 98 53 54 30 52 53 54 45 20 41 4E |.5);".ST0RSTE AN| 000006E0: 54 41 4C 20 32 20 49 20 45 4E 20 52 4B 2E 20 22 |TAL 2 I EN RK. "| 000006F0: 3B 54 54 25 00 FC 0E 7E 04 A0 20 35 00 05 0F B0 |;TT%...~.. 5....| 00000700: 04 A0 20 31 35 00 0B 0F E2 04 80 00 1D 0F D0 07 |.. 15...........| 00000710: 8F 20 2A 2A 20 48 4F 56 45 44 20 2A 2A 00 23 0F |. ** HOVED **.#.| 00000720: D1 07 8F 00 2D 0F D2 07 99 20 22 93 22 00 50 0F |....-.... ".".P.| 00000730: D3 07 99 20 A3 38 29 3B 22 D5 C0 C0 C0 C0 C0 C0 |... .8);".......| 00000740: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C9 22 |..............."| 00000750: 00 76 0F D4 07 99 20 A3 38 29 3B 22 C7 12 31 20 |.v.... .8);"..1 | 00000760: 33 20 20 52 20 49 20 47 20 54 20 49 20 47 20 45 |3 R I G T I G E| 00000770: 20 92 20 92 C8 22 00 99 0F D5 07 99 20 A3 38 29 | . .."...... .8)| 00000780: 3B 22 CA C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |;"..............| 00000790: C0 C0 C0 C0 C0 C0 C0 CB 22 00 9F 0F DA 07 8E 00 |........".......| 000007A0: BC 0F B8 0B 8F 20 2A 2A 20 4B 4F 4E 54 52 4F 4C |..... ** KONTROL| 000007B0: 2D 55 44 53 4B 52 49 46 54 20 2A 2A 00 CF 0F C2 |-UDSKRIFT **....| 000007C0: 0B 46 4C B2 46 4C AA 31 3A 8D 20 33 31 30 30 00 |.FL.FL.1:. 3100.| 000007D0: D5 0F C7 0B 99 00 EA 0F CC 0B 99 20 A3 39 29 3B |........... .9);| 000007E0: 52 4B 3B A3 31 33 29 3B 42 24 00 F5 0F DB 0B 8D |RK;.13);B$......| 000007F0: 20 33 32 30 30 00 FB 0F E0 0B 8E 00 1C 10 1C 0C | 3200...........| 00000800: 4B B2 4B AA 31 3A 8B 20 46 4C B2 31 31 20 B0 20 |K.K.1:. FL.11 . | 00000810: 4B B2 31 20 A7 20 89 20 33 31 31 30 00 22 10 21 |K.1 . . 3110.".!| 00000820: 0C 8E 00 5C 10 26 0C A1 20 53 24 3A 8B 20 53 24 |...\.&.. S$:. S$| 00000830: B2 22 22 A7 20 33 31 31 30 3A 8D 20 32 30 30 30 |."". 3110:. 2000| 00000840: 3A 99 20 A3 39 29 3B 22 4B 55 50 4F 4E 20 3A 20 |:. .9);"KUPON : | 00000850: 22 3B B5 28 52 4B AD 31 30 29 AA 31 00 62 10 30 |";.(RK.10).1.b.0| 00000860: 0C 8E 00 7E 10 80 0C 8B 20 54 B3 31 30 20 A7 20 |...~.... T.10 . | 00000870: 99 20 A3 32 38 29 3B 22 91 22 3B 54 3A 8E 00 90 |. .28);".";T:...| 00000880: 10 8A 0C 8B 20 54 B2 31 33 20 A7 20 33 33 30 30 |.... T.13 . 3300| 00000890: 00 AE 10 94 0C 99 20 A3 32 38 29 3B 22 91 12 05 |...... .28);"...| 000008A0: 22 3B 54 3B 22 92 48 55 52 52 41 21 21 22 00 B4 |";T;".HURRA!!"..| 000008B0: 10 9E 0C 8E 00 EB 10 E4 0C 99 20 A3 32 38 29 3B |.......... .28);| 000008C0: 22 91 12 99 22 3B 54 3B 22 4A 55 42 49 49 21 21 |"...";T;"JUBII!!| 000008D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 | 1| 000008E0: 33 20 52 49 47 54 49 47 45 92 22 00 FB 10 E7 0C |3 RIGTIGE.".....| 000008F0: 81 20 49 B2 31 20 A4 20 31 30 30 00 0C 11 E9 0C |. I.1 . 100.....| 00000900: 3A 20 20 97 20 35 33 32 38 30 2C 32 00 1D 11 F8 |: . 53280,2....| 00000910: 0C 3A 20 20 97 20 35 33 32 38 30 2C 31 00 23 11 |.: . 53280,1.#.| 00000920: 02 0D 82 00 29 11 0C 0D 8E 00 00 00 49 |....).......I |
..'.... *******************************.
M.... * 13 RIGTIGE *.S.
... * DETTE PROGRAM GENNEMS0GER *... .
. * EN EKSISTERENDE FIL MED *...!..
* TIPSTEGN GENERERET AF ULTRA-*...".. *
TIPS, SAMTIDIGT MED AT DEN *...#.. * SA
MMENLIGNER MED DE 13 RIG- *.1.$.. * TIGE
TIPSTEGN FRA SIDSTE UGE*.W.%.. * RESULT
ATET BLIVER EN UD- *.}.&.. * SKRIFT A
F EVT. GEVINSTER. *...'.. *
*.I.(.. * J.K. LASER &
SCENE-TEKNIK. *...).. * <C> COPYRIGH
T 1989 *...*.. ******************
*************.3.D.. * INDLAESNING AF DAT
A *.?.N.. A(14).J.X.. 2000.M.... .9);".U
GE...............: "...... .27):. ".";U
...... U.1 . U.52 . 140... .. * INDTASTN
ING AF DE 13 RIGTIGE *...... .9);"INDTAS
T UGEN 13'ER"...........A$."":. I.1 . 13
.....: . W$:. W$."" . 190.+.C.: . W$."
3" . W$."X".Q.H.: . W$."1". W$."X". W$.
"2" . 220.^.R.: . 190.X...: A$.A$.W$:.
.20);W$.....: . C(A$).3 . C(A$).6 . C(
A$).9 . . .19);"...".......H.... .25);".
.O.K. ?"...... W$:. W$."". 260...... W$.
"J" . 280...... W$."N" . . 2000:. 170...
... 260.1.... * SELVE S0GNINGEN *.?.,..
15,8,15.J.6.. 2000.H.^.. 5,8,5,"0:K".D(U
).",S,R".|....15,F$,G$,H$,I$...B.. E(F$)
.0 .......5,B$:RK.RK.1...&.T.0:E%.0:K%.0
:T%.0.D.X.. I.1 . 13.W...: C$.J(A$,I,1).
....: D$.J(B$,I,1).....: . D$."1" . E%
.E%.1. ...: . D$."X" . K%.K%.1.;...:
. D$."2" . T%.T%.1.Q...: . C$.D$ . T.T.
1.Y. .. I.I.R.A(T).A(T).1..S.. TE%.E% .
TE%.E%...T.. TK%.K% . TK%.K%...U.. TT%.
T% . TT%.T%...\.. 3000.G.... ST.0 . 500.
..... S$:. S$."". 910...... 2000...... .
9);"..UGE :";U:. .19);"..";RK;"RAEKKER."
.8.... .9);"..ANTAL RIGTIGE :":..G.... I
.1 . 14.J...: . A(I.1),"MED",I.1,"RIGTIG
E".R.L.. I...M.. .5);"..ST0RSTE ANTAL 1
I EN RK. ";TE%.I.N.. .5);".ST0RSTE ANTAL
X I EN RK. ";TK%...O.. .5);".ST0RSTE AN
TAL 2 I EN RK. ";TT%...~. 5..... 15...
......P.. ** HOVED **.#.Q...-.R.. ".".P.
S.. .8);"U....................I".V.T.. .
8);"G.1 3 R I G T I G E . .H"...U.. .8)
;"J....................K"...Z........ **
KONTROL-UDSKRIFT **.O.B.FL.FL.1:. 3100.
U.G.....L.. .9);RK;.13);B$...... 3200...
........K.K.1:. FL.11 . K.1 . . 3110.".!
...\.&.. S$:. S$."". 3110:. 2000:. .9);"
KUPON : ";.(RK.10).1.B.0...~.... T.10 .
. .28);".";T:....... T.13 . 3300...... .
28);"...";T;".HURRA!!"............ .28);
"...";T;"JUBII!! 13 RIGTIG
E."...... I.1 . 100.....: . 53280,2....
.: . 53280,1.#.....).......I
> CLICK IMAGE PREVIEW FOR FULL MODAL