PROB1

FILE INFORMATION

FILENAME(S): PROB1

FILE TYPE(S): PRG

FILE SIZE: 1.7K

FIRST SEEN: 2025-11-30 17:31:23

APPEARS ON: 1 disk(s)

FILE HASH

4fe16f5b5d23a23b4d705f061b4386fa3427f1c150d70083a2dca41e4390f1ed

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
CDU VOL3 NO7 MAY	PROB1	PRG	UK CD	17	0	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 29 08 01 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 2A  2A 00 51 08 02 00 8F 20  |*********.Q.... |
00000030: 2A 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |*               |
00000040: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000050: 2A 00 79 08 03 00 8F 20  2A 20 28 43 29 20 43 4F  |*.y.... * (C) CO|
00000060: 4D 4D 4F 44 4F 52 45 20  44 49 53 4B 20 55 53 45  |MMODORE DISK USE|
00000070: 52 20 31 39 39 30 20 20  2A 00 A1 08 04 00 8F 20  |R 1990  *...... |
00000080: 2A 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 20 20 20 20 20 20 20  |                |
000000A0: 2A 00 C9 08 05 00 8F 20  2A 20 20 20 54 45 43 48  |*...... *   TECH|
000000B0: 4E 4F 20 49 4E 46 4F 20  2D 20 50 52 4F 42 4C 45  |NO INFO - PROBLE|
000000C0: 4D 20 4F 4E 45 20 20 20  2A 00 F1 08 06 00 8F 20  |M ONE   *...... |
000000D0: 2A 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |*               |
000000E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000000F0: 2A 00 19 09 07 00 8F 20  2A 2A 2A 2A 2A 2A 2A 2A  |*...... ********|
00000100: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000110: 2A 2A 2A 2A 2A 2A 2A 2A  2A 00 1F 09 08 00 3A 00  |*********.....:.|
00000120: 25 09 09 00 3A 00 6A 09  0A 00 97 35 33 32 38 30  |%...:.j....53280|
00000130: 2C 31 34 3A 97 35 33 32  38 31 2C 36 3A 99 22 93  |,14:.53281,6:.".|
00000140: 05 09 8E 54 48 49 53 20  50 52 4F 47 52 41 4D 20  |...THIS PROGRAM |
00000150: 43 52 45 41 54 45 53 20  41 4E 44 20 53 41 56 45  |CREATES AND SAVE|
00000160: 53 20 41 20 53 4D 41 4C  4C 22 00 B6 09 0F 00 99  |S A SMALL"......|
00000170: 22 43 48 55 4E 4B 20 4F  46 20 4D 41 43 48 49 4E  |"CHUNK OF MACHIN|
00000180: 45 20 43 4F 44 45 20 54  48 41 54 20 57 49 4C 4C  |E CODE THAT WILL|
00000190: 22 2C 22 41 55 54 4F 4D  41 54 49 43 41 4C 4C 59  |","AUTOMATICALLY|
000001A0: 20 4C 4F 41 44 20 41 4E  44 20 52 55 4E 20 41 20  | LOAD AND RUN A |
000001B0: 42 41 53 49 43 22 00 07  0A 14 00 99 22 50 52 4F  |BASIC"......"PRO|
000001C0: 47 52 41 4D 20 57 49 54  48 20 41 20 46 4C 41 53  |GRAM WITH A FLAS|
000001D0: 48 49 4E 47 20 42 4F 52  44 45 52 2E 20 4E 4F 57  |HING BORDER. NOW|
000001E0: 2C 20 54 4F 20 4C 4F 41  44 20 59 4F 55 52 20 50  |, TO LOAD YOUR P|
000001F0: 52 4F 47 52 41 4D 20 59  4F 55 20 53 48 4F 55 4C  |ROGRAM YOU SHOUL|
00000200: 44 20 54 59 50 45 3A 00  2E 0A 19 00 99 2C 22 11  |D TYPE:......,".|
00000210: 20 20 4C 4F 41 44 22 C7  28 33 34 29 22 4C 4F 41  |  LOAD".(34)"LOA|
00000220: 44 45 52 22 C7 28 33 34  29 22 2C 38 2C 31 00 7E  |DER".(34)",8,1.~|
00000230: 0A 1E 00 99 22 11 11 50  4C 45 41 53 45 20 53 55  |...."..PLEASE SU|
00000240: 50 50 4C 59 20 54 48 45  20 4E 41 4D 45 20 4F 46  |PPLY THE NAME OF|
00000250: 20 54 48 45 20 42 41 53  49 43 22 2C 22 50 52 4F  | THE BASIC","PRO|
00000260: 47 52 41 4D 20 54 4F 20  42 45 20 4C 4F 41 44 45  |GRAM TO BE LOADE|
00000270: 44 20 42 59 20 54 48 45  20 43 4F 44 45 22 00 A7  |D BY THE CODE"..|
00000280: 0A 23 00 99 22 11 3A 22  3B 3A 9F 31 2C 30 3A 84  |.#..".:";:.1,0:.|
00000290: 31 2C 41 24 3A A0 31 3A  4C B2 C3 28 41 24 29 3A  |1,A$:.1:L..(A$):|
000002A0: 8B 4C B1 31 36 A7 8A 00  F6 0A 28 00 99 3A 99 22  |.L.16.....(..:."|
000002B0: 11 11 11 11 4F 4B 2E 20  50 4C 45 41 53 45 20 49  |....OK. PLEASE I|
000002C0: 4E 53 45 52 54 20 44 49  53 4B 20 4F 4E 54 4F 20  |NSERT DISK ONTO |
000002D0: 57 48 49 43 48 20 4C 4F  41 44 45 52 49 53 20 54  |WHICH LOADERIS T|
000002E0: 4F 20 42 45 20 53 41 56  45 44 20 28 44 45 56 49  |O BE SAVED (DEVI|
000002F0: 43 45 20 38 29 22 00 33  0B 2D 00 81 49 B2 30 A4  |CE 8)".3.-..I.0.|
00000300: 31 31 33 3A 87 41 3A 97  34 39 31 35 32 AA 49 2C  |113:.A:.49152.I,|
00000310: 41 3A 82 3A 42 24 B2 22  14 08 C6 07 93 22 AA C7  |A:.:B$."....."..|
00000320: 28 33 34 29 AA 22 4C 4F  41 44 45 52 22 AA C7 28  |(34)."LOADER"..(|
00000330: 33 34 29 00 62 0B 32 00  42 24 B2 42 24 AA 22 2C  |34).b.2.B$.B$.",|
00000340: 38 2C 31 22 3A 81 49 B2  30 A4 31 32 3A 42 24 B2  |8,1":.I.0.12:B$.|
00000350: 42 24 AA C7 28 30 29 3A  82 3A 97 34 39 32 31 30  |B$..(0):.:.49210|
00000360: 2C 4C 00 9D 0B 37 00 81  49 B2 31 A4 4C 3A 97 34  |,L...7..I.1.L:.4|
00000370: 39 32 36 35 AA 49 2C C6  28 CA 28 41 24 2C 49 2C  |9265.I,.(.(A$,I,|
00000380: 31 29 29 3A 82 3A 99 22  11 11 54 48 45 4E 20 50  |1)):.:."..THEN P|
00000390: 52 45 53 53 20 41 4E 59  20 4B 45 59 22 00 CD 0B  |RESS ANY KEY"...|
000003A0: 3C 00 97 31 39 38 2C 30  3A 92 31 39 38 2C 31 3A  |<..198,0:.198,1:|
000003B0: 97 31 39 38 2C 30 3A 9F  31 35 2C 38 2C 31 35 2C  |.198,0:.15,8,15,|
000003C0: 22 49 22 3A 84 31 35 2C  5A 3A A0 31 35 00 0A 0C  |"I":.15,Z:.15...|
000003D0: 41 00 8B 5A B3 B1 30 A7  99 22 93 44 49 53 4B 20  |A..Z..0..".DISK |
000003E0: 45 52 52 4F 52 2E 20 50  52 45 53 53 20 41 20 4B  |ERROR. PRESS A K|
000003F0: 45 59 22 3A 97 31 39 38  2C 30 3A 92 31 39 38 2C  |EY":.198,0:.198,|
00000400: 31 3A 97 31 39 38 2C 30  3A 8A 00 2F 0C 43 00 99  |1:.198,0:../.C..|
00000410: 22 91 53 41 56 49 4E 47  20 4C 4F 41 44 45 52 2E  |".SAVING LOADER.|
00000420: 2E 2E 20 50 4C 45 41 53  45 20 57 41 49 54 22 00  |.. PLEASE WAIT".|
00000430: 5A 0C 46 00 9F 32 2C 38  2C 31 2C 22 40 3A 4C 4F  |Z.F..2,8,1,"@:LO|
00000440: 41 44 45 52 2C 50 2C 57  22 3A 98 32 2C 22 10 01  |ADER,P,W":.2,"..|
00000450: 22 3B 3A 81 49 B2 31 A4  34 36 00 8B 0C 4B 00 98  |";:.I.1.46...K..|
00000460: 32 2C CA 28 42 24 2C 49  2C 31 29 3B 3A 82 3A 81  |2,.(B$,I,1);:.:.|
00000470: 49 B2 30 A4 31 32 39 3A  98 32 2C C7 28 C2 28 34  |I.0.129:.2,.(.(4|
00000480: 39 31 35 32 AA 49 29 29  3B 3A 82 00 BD 0C 50 00  |9152.I));:....P.|
00000490: 81 49 B2 30 A4 38 32 3A  98 32 2C 22 02 22 3B 3A  |.I.0.82:.2,".";:|
000004A0: 82 3A 98 32 2C 22 4C 2E  01 22 3B 3A A0 32 3A 9F  |.:.2,"L..";:.2:.|
000004B0: 31 35 2C 38 2C 31 35 3A  84 31 35 2C 5A 00 FE 0C  |15,8,15:.15,Z...|
000004C0: 55 00 A0 31 35 3A 8B 5A  B3 B1 30 A7 99 22 93 44  |U..15:.Z..0..".D|
000004D0: 49 53 4B 20 45 52 52 4F  52 2E 20 50 52 45 53 53  |ISK ERROR. PRESS|
000004E0: 20 41 20 4B 45 59 22 3A  97 31 39 38 2C 30 3A 92  | A KEY":.198,0:.|
000004F0: 31 39 38 2C 31 3A 97 31  39 38 2C 30 3A 8A 00 2F  |198,1:.198,0:../|
00000500: 0D 5A 00 99 22 93 11 1D  4C 4F 41 44 45 52 20 53  |.Z.."...LOADER S|
00000510: 55 43 43 45 53 53 46 55  4C 4C 59 20 53 41 56 45  |UCCESSFULLY SAVE|
00000520: 44 20 54 4F 20 44 49 53  4B 2E 2E 2E 22 3A 80 00  |D TO DISK...":..|
00000530: 7C 0D 5F 00 83 31 36 32  2C 30 2C 31 36 39 2C 33  ||._..162,0,169,3|
00000540: 32 2C 31 35 37 2C 30 2C  34 2C 31 35 37 2C 30 2C  |2,157,0,4,157,0,|
00000550: 35 2C 31 35 37 2C 30 2C  36 2C 31 35 37 2C 32 33  |5,157,0,6,157,23|
00000560: 32 2C 36 2C 32 33 32 2C  32 30 38 2C 32 34 31 2C  |2,6,232,208,241,|
00000570: 31 36 39 2C 30 2C 33 32  2C 31 34 34 00 C8 0D 64  |169,0,32,144...d|
00000580: 00 83 32 35 35 2C 31 36  32 2C 36 2C 31 34 32 2C  |..255,162,6,142,|
00000590: 33 33 2C 32 30 38 2C 31  38 39 2C 31 35 33 2C 31  |33,208,189,153,1|
000005A0: 2C 31 35 37 2C 31 36 36  2C 32 2C 32 30 32 2C 32  |,157,166,2,202,2|
000005B0: 30 38 2C 32 34 37 2C 31  36 32 2C 31 36 37 2C 31  |08,247,162,167,1|
000005C0: 36 30 2C 32 2C 31 34 32  00 12 0E 69 00 83 34 30  |60,2,142...i..40|
000005D0: 2C 33 2C 31 34 30 2C 34  31 2C 33 2C 31 36 39 2C  |,3,140,41,3,169,|
000005E0: 38 2C 31 36 32 2C 38 2C  31 36 30 2C 31 2C 33 32  |8,162,8,160,1,32|
000005F0: 2C 31 38 36 2C 32 35 35  2C 31 36 39 2C 2C 31 36  |,186,255,169,,16|
00000600: 32 2C 31 36 30 2C 31 36  30 2C 31 2C 33 32 2C 31  |2,160,160,1,32,1|
00000610: 38 39 00 5C 0E 6E 00 83  32 35 35 2C 31 36 39 2C  |89.\.n..255,169,|
00000620: 2C 31 36 32 2C 32 35 35  2C 31 36 30 2C 32 35 35  |,162,255,160,255|
00000630: 2C 33 32 2C 32 31 33 2C  32 35 35 2C 31 33 34 2C  |,32,213,255,134,|
00000640: 34 35 2C 31 33 32 2C 34  36 2C 31 36 39 2C 31 39  |45,132,46,169,19|
00000650: 32 2C 33 32 2C 31 34 34  2C 32 35 35 00 A7 0E 73  |2,32,144,255...s|
00000660: 00 83 31 36 32 2C 32 33  37 2C 31 36 30 2C 32 34  |..162,237,160,24|
00000670: 36 2C 31 34 32 2C 34 30  2C 33 2C 31 34 30 2C 34  |6,142,40,3,140,4|
00000680: 31 2C 33 2C 32 33 32 2C  31 34 32 2C 33 32 2C 32  |1,3,232,142,32,2|
00000690: 30 38 2C 33 32 2C 39 34  2C 31 36 36 2C 33 32 2C  |08,32,94,166,32,|
000006A0: 31 34 32 2C 31 36 36 00  D0 0E 78 00 83 33 32 2C  |142,166...x..32,|
000006B0: 31 37 34 2C 31 36 37 2C  39 36 2C 32 33 38 2C 33  |174,167,96,238,3|
000006C0: 32 2C 32 30 38 2C 37 36  2C 32 33 37 2C 32 34 36  |2,208,76,237,246|
000006D0: 00 00 00                                          |...             |

..).... ********************************
*.Q.... *                               
*.Y.... * (C) COMMODORE DISK USER 1990  
*...... *                               
*.I.... *   TECHNO INFO - PROBLEM ONE   
*...... *                               
*...... ********************************
*.....:.%...:.J....53280,14:.53281,6:.".
...THIS PROGRAM CREATES AND SAVES A SMAL
L"......"CHUNK OF MACHINE CODE THAT WILL
","AUTOMATICALLY LOAD AND RUN A BASIC"..
...."PROGRAM WITH A FLASHING BORDER. NOW
, TO LOAD YOUR PROGRAM YOU SHOULD TYPE:.
.....,".  LOAD"G(34)"LOADER"G(34)",8,1.~
...."..PLEASE SUPPLY THE NAME OF THE BAS
IC","PROGRAM TO BE LOADED BY THE CODE"..
.#..".:";:.1,0:.1,A$: 1:L.C(A$):.L.16...
..(..:."....OK. PLEASE INSERT DISK ONTO 
WHICH LOADERIS TO BE SAVED (DEVICE 8)".3
.-..I.0.113:.A:.49152.I,A:.:B$."..F..".G
(34)."LOADER".G(34).B.2.B$.B$.",8,1":.I.
0.12:B$.B$.G(0):.:.49210,L...7..I.1.L:.4
9265.I,F(J(A$,I,1)):.:."..THEN PRESS ANY
 KEY".M.<..198,0:.198,1:.198,0:.15,8,15,
"I":.15,Z: 15...A..Z..0..".DISK ERROR. P
RESS A KEY":.198,0:.198,1:.198,0:../.C..
".SAVING LOADER... PLEASE WAIT".Z.F..2,8
,1,"@:LOADER,P,W":.2,"..";:.I.1.46...K..
2,J(B$,I,1);:.:.I.0.129:.2,G(B(49152.I))
;:....P..I.0.82:.2,".";:.:.2,"L..";: 2:.
15,8,15:.15,Z...U. 15:.Z..0..".DISK ERRO
R. PRESS A KEY":.198,0:.198,1:.198,0:../
.Z.."...LOADER SUCCESSFULLY SAVED TO DIS
K...":..|._..162,0,169,32,157,0,4,157,0,
5,157,0,6,157,232,6,232,208,241,169,0,32
,144.H.D..255,162,6,142,33,208,189,153,1
,157,166,2,202,208,247,162,167,160,2,142
...I..40,3,140,41,3,169,8,162,8,160,1,32
,186,255,169,,162,160,160,1,32,189.\.N..
255,169,,162,255,160,255,32,213,255,134,
45,132,46,169,192,32,144,255...S..162,23
7,160,246,142,40,3,140,41,3,232,142,32,2
08,32,94,166,32,142,166.P.X..32,174,167,
96,238,32,208,76,237,246...

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL