_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

NUMBER PICKER

FILE INFORMATION

FILENAME(S): NUMBER PICKER

FILE TYPE(S): PRG

FILE SIZE: 692b

FIRST SEEN: 2025-11-30 18:12:04

APPEARS ON: 1 disk(s)

FILE HASH

31e08c8aec3b4f4583ebbfed59f8dbc374e814ccaf4ba6da8485773b5102560f

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
LOADSTAR 28 S 2 NUMBER PICKER PRG Sailor, Ganheden 28 1 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 0E 08 01 00 99 C7  28 31 34 37 29 3B 00 31  |........(147);.1|
00000010: 08 E8 03 8F 20 50 49 43  4B 20 57 49 54 48 4F 55  |.... PICK WITHOU|
00000020: 54 20 52 45 50 45 41 54  49 4E 47 20 2D 20 4C 46  |T REPEATING - LF|
00000030: 53 00 37 08 F2 03 3A 00  5C 08 FC 03 8F 20 49 4E  |S.7...:.\.... IN|
00000040: 49 54 49 41 4C 49 5A 41  54 49 4F 4E 20 2D 20 52  |ITIALIZATION - R|
00000050: 55 4E 20 4F 4E 43 45 20  4F 4E 4C 59 00 7F 08 06  |UN ONCE ONLY....|
00000060: 04 41 B2 34 30 3A 8F 20  23 20 4F 46 20 49 54 45  |.A.40:. # OF ITE|
00000070: 4D 53 20 54 4F 20 50 49  43 4B 20 46 52 4F 4D 00  |MS TO PICK FROM.|
00000080: 9D 08 10 04 42 B2 20 36  3A 8F 20 23 20 4F 46 20  |....B. 6:. # OF |
00000090: 49 54 45 4D 53 20 54 4F  20 50 49 43 4B 00 C0 08  |ITEMS TO PICK...|
000000A0: 1A 04 86 41 28 41 29 2C  42 28 42 29 3A 97 35 33  |...A(A),B(B):.53|
000000B0: 32 38 31 2C 31 35 3A 97  35 33 32 38 30 2C 31 35  |281,15:.53280,15|
000000C0: 00 C6 08 24 04 3A 00 DF  08 29 04 99 22 11 90 D4  |...$.:...).."...|
000000D0: 48 45 20 CE 55 4D 42 45  52 53 20 2D 3E 22 3B 00  |HE .UMBERS ->";.|
000000E0: 01 09 2E 04 8F 20 50 49  43 4B 20 49 54 45 4D 53  |..... PICK ITEMS|
000000F0: 20 2D 20 52 45 50 45 41  54 20 41 54 20 57 49 4C  | - REPEAT AT WIL|
00000100: 4C 00 15 09 38 04 81 4A  B2 31 A4 41 3A 41 28 4A  |L...8..J.1.A:A(J|
00000110: 29 B2 4A 3A 82 00 2D 09  42 04 43 B2 41 3A 4A B2  |).J:..-.B.C.A:J.|
00000120: BB 28 AB 54 49 29 3A 8B  42 B1 41 A7 90 00 46 09  |.(.TI):.B.A...F.|
00000130: 4C 04 81 4A B2 31 A4 42  3A 4B B2 B5 28 43 AC BB  |L..J.1.B:K..(C..|
00000140: 28 31 29 AA 31 29 00 66  09 56 04 42 28 4A 29 B2  |(1).1).f.V.B(J).|
00000150: 41 28 4B 29 3A 41 28 4B  29 B2 41 28 43 29 3A 43  |A(K):A(K).A(C):C|
00000160: B2 43 AB 31 3A 82 00 6C  09 60 04 3A 00 89 09 D0  |.C.1:..l.`.:....|
00000170: 07 8F 20 44 45 4D 4F 4E  53 54 52 41 54 45 53 20  |.. DEMONSTRATES |
00000180: 54 48 45 20 50 49 43 4B  53 00 9F 09 DA 07 81 4A  |THE PICKS......J|
00000190: B2 31 A4 42 3A 99 42 28  4A 29 3B 3A 82 3A 99 00  |.1.B:.B(J);:.:..|
000001A0: C2 09 E4 07 99 22 C3 48  4F 4F 53 45 20 4D 4F 52  |.....".HOOSE MOR|
000001B0: 45 20 4E 55 4D 42 45 52  53 3F 20 20 5B D9 2F CE  |E NUMBERS?  [./.|
000001C0: 5D 22 00 D6 09 EE 07 A1  41 24 3A 8B 41 24 B2 22  |]"......A$:.A$."|
000001D0: 22 A7 32 30 33 30 00 EE  09 F8 07 8B 41 24 B2 22  |".2030......A$."|
000001E0: 59 22 B0 41 24 B2 22 D9  22 A7 31 30 36 35 00 06  |Y".A$.".".1065..|
000001F0: 0A 02 08 8B 41 24 B2 22  4E 22 B0 41 24 B2 22 CE  |....A$."N".A$.".|
00000200: 22 A7 36 30 30 30 00 10  0A 0C 08 89 32 30 33 30  |".6000......2030|
00000210: 00 4A 0A 70 17 99 22 93  11 11 11 11 11 11 11 11  |.J.p..".........|
00000220: 11 11 11 11 11 20 20 20  20 D2 45 54 55 52 4E 49  |.....    .ETURNI|
00000230: 4E 47 20 54 4F 20 D4 49  50 53 20 26 20 D4 52 49  |NG TO .IPS & .RI|
00000240: 43 4B 53 20 CD 45 4E 55  2E 22 00 7B 0A 75 17 99  |CKS .ENU.".{.u..|
00000250: 22 13 11 11 11 9B 4C CF  22 3B C7 28 33 34 29 3B  |".....L.";.(34);|
00000260: 22 54 49 50 53 20 26 20  54 52 49 43 4B 53 22 3B  |"TIPS & TRICKS";|
00000270: C7 28 33 34 29 3B 22 2C  38 13 22 00 B1 0A 7A 17  |.(34);",8."...z.|
00000280: 97 36 33 31 2C 31 33 3A  97 36 33 32 2C 31 33 3A  |.631,13:.632,13:|
00000290: 97 36 33 33 2C 38 32 3A  97 36 33 34 2C 32 31 33  |.633,82:.634,213|
000002A0: 3A 97 36 33 35 2C 31 33  3A 97 31 39 38 2C 35 3A  |:.635,13:.198,5:|
000002B0: A2 00 00 00                                       |....            |
.......G(147);.1.... PICK WITHOUT REPEAT
ING - LFS.7...:.\.... INITIALIZATION - R
UN ONCE ONLY....A.40:. # OF ITEMS TO PI
CK FROM.....B. 6:. # OF ITEMS TO PICK...
...A(A),B(B):.53281,15:.53280,15.F.$.:..
.).."..THE NUMBERS ->";...... PICK ITEMS
 - REPEAT AT WILL...8..J.1.A:A(J).J:..-.
B.C.A:J..(.TI):.B.A...F.L..J.1.B:K..(C..
(1).1).F.V.B(J).A(K):A(K).A(C):C.C.1:..L
.`.:...P.. DEMONSTRATES THE PICKS...Z..J
.1.B:.B(J);:.:..B...."CHOOSE MORE NUMBER
S?  [Y/N]".V....A$:.A$."".2030......A$."
Y".A$."Y".1065......A$."N".A$."N".6000..
....2030.J.P.."..............    RETURNI
NG TO TIPS & TRICKS MENU.".{.U..".....LO
";G(34);"TIPS & TRICKS";G(34);",8."...Z.
.631,13:.632,13:.633,82:.634,213:.635,13
:.198,5:....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL