USR(PEEK)DEMO
FILE INFORMATION
FILENAME(S): USR(PEEK)DEMO
FILE TYPE(S): PRG
FILE SIZE: 2.2K
FIRST SEEN: 2025-11-30 21:23:21
APPEARS ON: 1 disk(s)
FILE HASH
dfe0a2db87dee0a41126dbb4f5b014ef8ed1b47d3b3f52d6320a58066120f6d6
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 HULP 13 2 | USR(PEEK)DEMO | PRG | DuncanTwain | 2 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1E 08 01 00 8D 31 30 30 30 3A 8F 12 53 45 |.......1000:..SE| 00000010: 54 20 55 50 20 55 53 52 28 50 45 45 4B 29 00 2F |T UP USR(PEEK)./| 00000020: 08 0A 00 99 20 B7 28 36 32 34 34 30 29 3A 99 00 |.... .(62440):..| 00000030: 52 08 14 00 56 24 B2 22 13 11 11 11 11 11 11 11 |R...V$."........| 00000040: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 00000050: 11 22 00 86 08 1E 00 48 24 B2 22 22 AA 22 1D 1D |.".....H$.""."..| 00000060: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................| 00000070: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................| 00000080: 1D 1D 1D 1D 1D 22 00 A5 08 28 00 55 43 B2 35 33 |....."...(.UC.53| 00000090: 32 34 38 3A 4C 43 B2 35 35 32 39 36 3A 47 43 B2 |248:LC.55296:GC.| 000000A0: 35 33 37 36 30 00 C1 08 32 00 48 B2 30 3A 56 B2 |53760...2.H.0:V.| 000000B0: 31 30 3A 4C B2 38 33 AC 38 AA 55 43 3A 8D 35 30 |10:L.83.8.UC:.50| 000000C0: 30 00 DC 08 3C 00 48 B2 38 3A 56 B2 31 30 3A 4C |0...<.H.8:V.10:L| 000000D0: B2 33 AC 38 AA 55 43 3A 8D 35 30 30 00 11 09 46 |.3.8.UC:.500...F| 000000E0: 00 48 B2 31 34 3A 56 B2 35 3A 4C B2 38 35 AC 38 |.H.14:V.5:L.85.8| 000000F0: AA 55 43 3A 8D 35 30 30 3A 48 B2 31 34 3A 56 B2 |.UC:.500:H.14:V.| 00000100: 31 34 3A 4C B2 37 34 AC 38 AA 55 43 3A 8D 35 30 |14:L.74.8.UC:.50| 00000110: 30 00 2E 09 50 00 48 B2 32 32 3A 56 B2 31 30 3A |0...P.H.22:V.10:| 00000120: 4C B2 35 34 AC 38 AA 55 43 3A 8D 35 30 30 00 4B |L.54.8.UC:.500.K| 00000130: 09 5A 00 48 B2 33 30 3A 56 B2 31 30 3A 4C B2 35 |.Z.H.30:V.10:L.5| 00000140: 32 AC 38 AA 55 43 3A 8D 35 30 30 00 78 09 64 00 |2.8.UC:.500.x.d.| 00000150: 99 C8 28 56 24 2C 35 29 3B C8 28 48 24 2C 31 38 |..(V$,5);.(H$,18| 00000160: 29 3B 22 D3 43 91 D5 11 11 9D CA 91 36 34 22 3B |);".C.......64";| 00000170: C8 28 56 24 2C 32 32 29 00 93 09 6E 00 99 22 44 |.(V$,22)...n.."D| 00000180: 52 55 45 43 4B 45 20 45 49 4E 45 20 54 41 53 54 |RUECKE EINE TAST| 00000190: 45 22 3B 00 A6 09 78 00 A1 41 24 3A 8B 41 24 B2 |E";...x..A$:.A$.| 000001A0: 22 22 A7 31 32 30 00 CE 09 82 00 99 22 93 55 53 |"".120......".US| 000001B0: 52 28 50 45 45 4B 29 20 49 4E 54 4F 20 42 41 53 |R(PEEK) INTO BAS| 000001C0: 49 43 20 48 49 44 44 45 4E 20 52 41 4D 22 00 18 |IC HIDDEN RAM"..| 000001D0: 0A 8C 00 99 C8 28 56 24 2C 35 29 3B 22 47 45 42 |.....(V$,5);"GEB| 000001E0: 45 20 31 30 20 4E 55 4D 4D 45 52 4E 20 28 30 2D |E 10 NUMMERN (0-| 000001F0: 32 35 35 29 20 5A 55 4D 20 53 50 45 49 43 48 45 |255) ZUM SPEICHE| 00000200: 52 4E 20 49 4E 20 24 41 30 30 30 20 42 49 53 20 |RN IN $A000 BIS | 00000210: 24 41 30 30 41 20 3A 22 00 24 0A 96 00 81 49 B2 |$A00A :".$....I.| 00000220: 31 A4 31 30 00 41 0A A0 00 99 22 4E 55 4D 4D 45 |1.10.A...."NUMME| 00000230: 52 20 22 3B 49 3B 22 3A 20 22 3B 3A 85 22 22 3B |R ";I;": ";:."";| 00000240: 58 00 73 0A AA 00 8B B5 28 58 29 B3 B1 58 B0 58 |X.s.....(X)..X.X| 00000250: B3 30 B0 58 B1 32 35 35 A7 99 22 46 41 4C 53 43 |.0.X.255.."FALSC| 00000260: 48 45 20 45 49 4E 47 41 42 45 2E 2E 2E 22 3A 89 |HE EINGABE...":.| 00000270: 31 36 30 00 84 0A B4 00 97 34 30 39 35 39 AA 49 |160......40959.I| 00000280: 2C 58 3A 82 00 AC 0A BE 00 99 22 93 55 53 52 28 |,X:.......".USR(| 00000290: 50 45 45 4B 29 20 49 4E 54 4F 20 48 49 44 44 45 |PEEK) INTO HIDDE| 000002A0: 4E 20 42 41 53 49 43 20 52 41 4D 22 00 D3 0A C8 |N BASIC RAM"....| 000002B0: 00 99 3A 99 3A 99 22 20 4C 41 47 45 20 20 20 20 |..:.:." LAGE | 000002C0: 20 20 50 45 45 4B 20 20 20 55 53 52 28 50 45 45 | PEEK USR(PEE| 000002D0: 4B 29 22 00 F6 0A CD 00 99 22 2D 2D 2D 2D 2D 2D |K)"......"------| 000002E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000002F0: 2D 2D 2D 2D 2D 22 00 23 0B D2 00 81 49 B2 31 A4 |-----".#....I.1.| 00000300: 31 30 3A 99 49 AA 34 30 39 35 39 2C C2 28 49 AA |10:.I.40959,.(I.| 00000310: 34 30 39 35 39 29 2C B7 28 49 AA 34 30 39 35 39 |40959),.(I.40959| 00000320: 29 3A 82 00 47 0B DC 00 99 C8 28 56 24 2C 32 32 |):..G.....(V$,22| 00000330: 29 3B 22 44 52 55 45 43 4B 45 20 45 49 4E 45 20 |);"DRUECKE EINE | 00000340: 54 41 53 54 45 22 3B 00 5A 0B E6 00 A1 41 24 3A |TASTE";.Z....A$:| 00000350: 8B 41 24 B2 22 22 A7 32 33 30 00 83 0B F0 00 99 |.A$."".230......| 00000360: 22 93 55 53 52 28 50 45 45 4B 29 20 49 4E 54 4F |".USR(PEEK) INTO| 00000370: 20 4B 45 52 4E 41 4C 20 48 49 44 44 45 4E 20 52 | KERNAL HIDDEN R| 00000380: 41 4D 22 00 CD 0B FA 00 99 C8 28 56 24 2C 35 29 |AM".......(V$,5)| 00000390: 3B 22 47 45 42 45 20 31 30 20 4E 55 4D 4D 45 52 |;"GEBE 10 NUMMER| 000003A0: 4E A0 28 30 2D 32 35 35 29 20 5A 55 4D 20 53 50 |N.(0-255) ZUM SP| 000003B0: 45 49 43 48 45 52 4E 20 49 4E 20 24 46 30 30 30 |EICHERN IN $F000| 000003C0: 20 42 49 53 20 24 46 30 30 41 20 3A 22 00 D9 0B | BIS $F00A :"...| 000003D0: 04 01 81 49 B2 31 A4 31 30 00 F6 0B 0E 01 99 22 |...I.1.10......"| 000003E0: 4E 55 4D 4D 45 52 20 22 3B 49 3B 22 3A 20 22 3B |NUMMER ";I;": ";| 000003F0: 3A 85 22 22 3B 58 00 2A 0C 18 01 8B 20 B5 28 58 |:."";X.*.... .(X| 00000400: 29 B3 B1 58 B0 58 B3 30 B0 58 B1 32 35 35 A7 99 |)..X.X.0.X.255..| 00000410: 22 46 41 4C 53 43 48 45 20 45 49 4E 47 41 42 45 |"FALSCHE EINGABE| 00000420: 2E 2E 2E 2E 22 3A 89 31 36 30 00 3B 0C 22 01 97 |....":.160.;."..| 00000430: 36 31 34 33 39 AA 49 2C 58 3A 82 00 64 0C 2C 01 |61439.I,X:..d.,.| 00000440: 99 22 93 55 53 52 28 50 45 45 4B 29 20 49 4E 54 |.".USR(PEEK) INT| 00000450: 4F 20 48 49 44 44 45 4E 20 4B 45 52 4E 41 4C 20 |O HIDDEN KERNAL | 00000460: 52 41 4D 22 00 8B 0C 36 01 99 3A 99 3A 99 22 20 |RAM"...6..:.:." | 00000470: 4C 41 47 45 20 20 20 20 20 20 50 45 45 4B 20 20 |LAGE PEEK | 00000480: 20 55 53 52 28 50 45 45 4B 29 22 00 AE 0C 40 01 | USR(PEEK)"...@.| 00000490: 99 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |."--------------| 000004A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 DB |-------------"..| 000004B0: 0C 4A 01 81 49 B2 31 A4 31 30 3A 99 49 AA 36 31 |.J..I.1.10:.I.61| 000004C0: 34 33 39 2C C2 28 49 AA 36 31 34 33 39 29 2C B7 |439,.(I.61439),.| 000004D0: 28 49 AA 36 31 34 33 39 29 3A 82 00 E1 0C 54 01 |(I.61439):....T.| 000004E0: 80 00 FB 0C F4 01 81 4A B2 4C A4 4C AA 37 3A 58 |.......J.L.L.7:X| 000004F0: 24 B2 22 22 3A 58 B2 B7 28 4A 29 00 2B 0D FE 01 |$."":X..(J).+...| 00000500: 81 49 B2 37 A4 30 A9 AB 31 3A 8B 58 B2 B1 32 AE |.I.7.0..1:.X..2.| 00000510: 49 A7 58 B2 58 AB 32 AE 49 3A 58 24 B2 58 24 AA |I.X.X.2.I:X$.X$.| 00000520: 22 05 12 20 92 22 3A 89 35 33 30 00 39 0D 08 02 |".. .":.530.9...| 00000530: 58 24 B2 58 24 AA 22 1D 22 00 4F 0D 12 02 82 49 |X$.X$.".".O....I| 00000540: 3A 8B 4A B2 4C A7 99 C8 28 56 24 2C 56 29 3B 00 |:.J.L...(V$,V);.| 00000550: 63 0D 1C 02 99 C8 28 48 24 2C 48 29 3B 58 24 3A |c.....(H$,H);X$:| 00000560: 82 3A 8E 00 85 0D E8 03 97 37 38 35 2C 31 3A 97 |.:.......785,1:.| 00000570: 37 38 36 2C 31 39 32 3A 20 8F 12 55 53 52 20 56 |786,192: ..USR V| 00000580: 45 4B 54 4F 52 00 A2 0D F2 03 81 49 B2 34 39 31 |EKTOR......I.491| 00000590: 35 33 A4 34 39 33 38 30 3A 87 58 3A 97 49 2C 58 |53.49380:.X:.I,X| 000005A0: 3A 82 00 A8 0D F7 03 8E 00 F3 0D FC 03 83 31 37 |:.............17| 000005B0: 33 2C 39 37 2C 30 2C 32 30 31 2C 31 34 34 2C 32 |3,97,0,201,144,2| 000005C0: 30 38 2C 33 2C 37 36 2C 31 38 38 2C 31 39 32 2C |08,3,76,188,192,| 000005D0: 35 36 2C 32 30 31 2C 31 32 38 2C 31 37 36 2C 33 |56,201,128,176,3| 000005E0: 2C 37 36 2C 31 36 33 2C 31 39 32 2C 32 30 31 2C |,76,163,192,201,| 000005F0: 31 34 35 00 3A 0E 06 04 83 31 34 34 2C 33 2C 37 |145.:....144,3,7| 00000600: 36 2C 31 36 33 2C 31 39 32 2C 37 33 2C 31 32 38 |6,163,192,73,128| 00000610: 2C 31 34 31 2C 39 37 2C 30 2C 35 36 2C 31 36 39 |,141,97,0,56,169| 00000620: 2C 31 36 2C 32 33 37 2C 39 37 2C 30 2C 32 34 30 |,16,237,97,0,240| 00000630: 2C 31 33 2C 31 37 30 2C 32 34 00 7F 0E 10 04 83 |,13,170,24......| 00000640: 37 38 2C 39 38 2C 30 2C 31 31 30 2C 39 39 2C 30 |78,98,0,110,99,0| 00000650: 2C 32 30 32 2C 32 32 34 2C 30 2C 32 30 38 2C 32 |,202,224,0,208,2| 00000660: 34 34 2C 31 37 33 2C 39 38 2C 30 2C 31 34 31 2C |44,173,98,0,141,| 00000670: 37 38 2C 31 39 32 2C 31 37 33 2C 39 39 2C 30 00 |78,192,173,99,0.| 00000680: C7 0E 1A 04 83 31 34 31 2C 37 37 2C 31 39 32 2C |.....141,77,192,| 00000690: 31 37 33 2C 31 2C 30 2C 31 34 31 2C 30 2C 31 39 |173,1,0,141,0,19| 000006A0: 32 2C 31 32 30 2C 37 33 2C 37 2C 31 34 31 2C 31 |2,120,73,7,141,1| 000006B0: 2C 30 2C 31 37 33 2C 32 35 35 2C 32 35 35 2C 31 |,0,173,255,255,1| 000006C0: 34 31 2C 39 38 2C 30 00 10 0F 24 04 83 31 37 33 |41,98,0...$..173| 000006D0: 2C 30 2C 31 39 32 2C 31 34 31 2C 31 2C 30 2C 38 |,0,192,141,1,0,8| 000006E0: 38 2C 31 37 33 2C 39 38 2C 30 2C 32 30 31 2C 30 |8,173,98,0,201,0| 000006F0: 2C 32 30 38 2C 33 2C 37 36 2C 31 34 30 2C 31 39 |,208,3,76,140,19| 00000700: 32 2C 31 36 32 2C 38 2C 31 37 33 2C 39 38 2C 30 |2,162,8,173,98,0| 00000710: 00 55 0F 2E 04 83 32 34 2C 34 32 2C 31 37 36 2C |.U....24,42,176,| 00000720: 35 2C 32 30 32 2C 32 32 34 2C 30 2C 32 30 38 2C |5,202,224,0,208,| 00000730: 32 34 37 2C 31 30 36 2C 31 34 31 2C 39 38 2C 30 |247,106,141,98,0| 00000740: 2C 37 33 2C 31 32 38 2C 31 34 31 2C 31 30 32 2C |,73,128,141,102,| 00000750: 30 2C 31 33 38 00 9E 0F 38 04 83 39 2C 31 32 38 |0,138...8..9,128| 00000760: 2C 31 34 31 2C 39 37 2C 30 2C 31 36 39 2C 30 2C |,141,97,0,169,0,| 00000770: 31 34 31 2C 39 39 2C 30 2C 31 34 31 2C 31 30 30 |141,99,0,141,100| 00000780: 2C 30 2C 31 34 31 2C 31 30 31 2C 30 2C 39 36 2C |,0,141,101,0,96,| 00000790: 31 36 39 2C 30 2C 31 34 31 2C 39 37 2C 30 00 E6 |169,0,141,97,0..| 000007A0: 0F 42 04 83 31 34 31 2C 39 39 2C 30 2C 31 34 31 |.B..141,99,0,141| 000007B0: 2C 31 30 30 2C 30 2C 31 34 31 2C 31 30 31 2C 30 |,100,0,141,101,0| 000007C0: 2C 31 34 31 2C 31 30 32 2C 30 2C 31 36 39 2C 31 |,141,102,0,169,1| 000007D0: 32 38 2C 31 34 31 2C 39 38 2C 30 2C 39 36 2C 31 |28,141,98,0,96,1| 000007E0: 36 39 2C 31 32 39 00 32 10 4C 04 83 31 34 31 2C |69,129.2.L..141,| 000007F0: 39 37 2C 30 2C 31 36 39 2C 31 32 38 2C 31 34 31 |97,0,169,128,141| 00000800: 2C 39 38 2C 30 2C 31 34 31 2C 31 30 32 2C 30 2C |,98,0,141,102,0,| 00000810: 31 36 39 2C 30 2C 31 34 31 2C 39 39 2C 30 2C 31 |169,0,141,99,0,1| 00000820: 34 31 2C 31 30 30 2C 30 2C 31 34 31 2C 31 30 31 |41,100,0,141,101| 00000830: 2C 30 00 7E 10 56 04 83 39 36 2C 35 36 2C 31 37 |,0.~.V..96,56,17| 00000840: 33 2C 39 38 2C 30 2C 32 30 31 2C 32 32 34 2C 31 |3,98,0,201,224,1| 00000850: 34 34 2C 33 2C 37 36 2C 32 32 33 2C 31 39 32 2C |44,3,76,223,192,| 00000860: 32 30 31 2C 32 30 38 2C 31 37 36 2C 33 2C 37 36 |201,208,176,3,76| 00000870: 2C 32 32 33 2C 31 39 32 2C 31 36 39 2C 34 00 C8 |,223,192,169,4..| 00000880: 10 60 04 83 31 34 31 2C 37 32 2C 31 39 32 2C 31 |.`..141,72,192,1| 00000890: 37 33 2C 39 37 2C 30 2C 33 32 2C 32 36 2C 31 39 |73,97,0,32,26,19| 000008A0: 32 2C 31 36 39 2C 37 2C 31 34 31 2C 37 32 2C 31 |2,169,7,141,72,1| 000008B0: 39 32 2C 39 36 2C 31 37 33 2C 39 37 2C 30 2C 37 |92,96,173,97,0,7| 000008C0: 36 2C 31 31 2C 31 39 32 00 00 00 |6,11,192... |
.......1000:..SET UP USR(PEEK)./.... .(6 2440):..R...V$."........................ .".....H$."".".......................... ............."...(.UC.53248:LC.55296:GC. 53760.A.2.H.0:V.10:L.83.8.UC:.500...<.H. 8:V.10:L.3.8.UC:.500...F.H.14:V.5:L.85.8 .UC:.500:H.14:V.14:L.74.8.UC:.500...P.H. 22:V.10:L.54.8.UC:.500.K.Z.H.30:V.10:L.5 2.8.UC:.500.X.D..H(V$,5);H(H$,18);"SC.U. ..J.64";H(V$,22)...N.."DRUECKE EINE TAST E";...X..A$:.A$."".120.N....".USR(PEEK) INTO BASIC HIDDEN RAM"......H(V$,5);"GEB E 10 NUMMERN (0-255) ZUM SPEICHERN IN $A 000 BIS $A00A :".$....I.1.10.A. .."NUMME R ";I;": ";:."";X.S.....(X)..X.X.0.X.255 .."FALSCHE EINGABE...":.160......40959.I ,X:.......".USR(PEEK) INTO HIDDEN BASIC RAM".S.H..:.:." LAGE PEEK USR(PEE K)"...M.."---------------------------".# .R..I.1.10:.I.40959,B(I.40959),.(I.40959 ):..G....H(V$,22);"DRUECKE EINE TASTE";. Z....A$:.A$."".230......".USR(PEEK) INTO KERNAL HIDDEN RAM".M....H(V$,5);"GEBE 1 0 NUMMERN (0-255) ZUM SPEICHERN IN $F000 BIS $F00A :".Y....I.1.10......"NUMMER " ;I;": ";:."";X.*.... .(X)..X.X.0.X.255.. "FALSCHE EINGABE....":.160.;."..61439.I, X:..D.,..".USR(PEEK) INTO HIDDEN KERNAL RAM"...6..:.:." LAGE PEEK USR(PEE K)"...@.."---------------------------".. .J..I.1.10:.I.61439,B(I.61439),.(I.61439 ):....T........J.L.L.7:X$."":X..(J).+... .I.7.0..1:.X..2.I.X.X.2.I:X$.X$.".. .":. 530.9...X$.X$.".".O....I:.J.L..H(V$,V);. C....H(H$,H);X$:.:.......785,1:.786,192: ..USR VEKTOR......I.49153.49380:.X:.I,X :.............173,97,0,201,144,208,3,76, 188,192,56,201,128,176,3,76,163,192,201, 145.:....144,3,76,163,192,73,128,141,97, 0,56,169,16,237,97,0,240,13,170,24..... 78,98,0,110,99,0,202,224,0,208,244,173,9 8,0,141,78,192,173,99,0.G....141,77,192, 173,1,0,141,0,192,120,73,7,141,1,0,173,2 55,255,141,98,0...$..173,0,192,141,1,0,8 8,173,98,0,201,0,208,3,76,140,192,162,8, 173,98,0.U....24,42,176,5,202,224,0,208, 247,106,141,98,0,73,128,141,102,0,138... 8..9,128,141,97,0,169,0,141,99,0,141,100 ,0,141,101,0,96,169,0,141,97,0...B..141, 99,0,141,100,0,141,101,0,141,102,0,169,1 28,141,98,0,96,169,129.2.L..141,97,0,169 ,128,141,98,0,141,102,0,169,0,141,99,0,1 41,100,0,141,101,0.~.V..96,56,173,98,0,2 01,224,144,3,76,223,192,201,208,176,3,76 ,223,192,169,4.H.`..141,72,192,173,97,0, 32,26,192,169,7,141,72,192,96,173,97,0,7 6,11,192...
> CLICK IMAGE PREVIEW FOR FULL MODAL