NAME 4 OK !
FILE INFORMATION
FILENAME(S): NAME 4 OK !
FILE TYPE(S): PRG
FILE SIZE: 1.5K
FIRST SEEN: 2025-12-01 02:25:21
APPEARS ON: 1 disk(s)
FILE HASH
703dd20f80e4468211bdbc0c09c432628a0c8f885c17fba7ac6d24eeb067e331
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| STEFAN | NAME 4 OK ! | PRG | Shine | 20 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1E 08 0A 00 8F 20 5B 20 50 52 4F 47 52 41 |....... [ PROGRA| 00000010: 4D 4D 20 3A 20 20 20 20 20 20 20 20 20 5D 00 3B |MM : ].;| 00000020: 08 0B 00 8F 20 5B 20 45 49 4E 47 41 42 45 20 4E |.... [ EINGABE N| 00000030: 41 4D 45 4E 20 28 4C 31 36 29 5D 00 58 08 0C 00 |AMEN (L16)].X...| 00000040: 8F 20 5B 20 56 45 52 53 55 43 48 20 31 20 20 20 |. [ VERSUCH 1 | 00000050: 20 20 20 20 20 20 20 5D 00 5E 08 14 00 3A 00 64 | ].^...:.d| 00000060: 08 1E 00 3A 00 70 08 28 00 9E 20 33 36 38 36 34 |...:.p.(.. 36864| 00000070: 00 7E 08 32 00 2E 4F 50 54 20 4F 4F 2C 50 00 8A |.~.2..OPT OO,P..| 00000080: 08 34 00 AC B2 24 43 30 30 30 00 90 08 35 00 3A |.4...$C000...5.:| 00000090: 00 A1 08 3C 00 49 4E 20 20 20 20 B2 24 46 46 45 |...<.IN .$FFE| 000000A0: 34 00 B2 08 3D 00 4F 55 54 20 20 20 B2 24 46 46 |4...=.OUT .$FF| 000000B0: 44 32 00 C3 08 3E 00 50 41 52 20 20 20 B2 24 46 |D2...>.PAR .$F| 000000C0: 46 42 41 00 D4 08 3F 00 4E 41 4D 45 20 20 B2 24 |FBA...?.NAME .$| 000000D0: 46 46 42 44 00 E2 08 40 00 93 20 20 B2 24 46 46 |FFBD...@.. .$FF| 000000E0: 44 35 00 F0 08 41 00 87 59 20 B2 24 41 34 37 34 |D5...A..Y .$A474| 000000F0: 00 FD 08 42 00 99 20 B2 24 41 42 31 45 00 03 09 |...B.. .$AB1E...| 00000100: 46 00 3A 00 09 09 50 00 3A 00 32 09 5A 00 3B 20 |F.:...P.:.2.Z.; | 00000110: B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 |................| 00000120: B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 |................| 00000130: B2 B2 00 48 09 5C 00 3A 20 20 20 20 20 20 20 20 |...H.\.: | 00000140: 4C 44 41 20 23 24 30 30 00 5F 09 5D 00 3A 20 20 |LDA #$00._.].: | 00000150: 20 20 20 20 20 20 53 54 41 20 24 43 43 30 37 00 | STA $CC07.| 00000160: 88 09 5E 00 3B 20 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 |..^.; ..........| 00000170: B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 |................| 00000180: B2 B2 B2 B2 B2 B2 B2 B2 00 9C 09 E8 03 4C 30 30 |.............L00| 00000190: 31 20 20 20 4C 44 41 20 23 24 39 33 00 BA 09 F2 |1 LDA #$93....| 000001A0: 03 3A 20 20 20 20 20 20 4A 53 52 20 4F 55 54 20 |.: JSR OUT | 000001B0: 20 20 3B 20 43 48 52 4F 55 54 00 CE 09 FC 03 3A | ; CHROUT.....:| 000001C0: 20 20 20 20 20 20 4C 44 41 20 23 24 30 30 00 E2 | LDA #$00..| 000001D0: 09 06 04 3A 20 20 20 20 20 20 4C 44 59 20 23 24 |...: LDY #$| 000001E0: 43 43 00 04 0A 10 04 3A 20 20 20 20 20 20 4A 53 |CC.....: JS| 000001F0: 52 20 99 20 3B 20 54 45 58 54 20 22 4E 41 4D 45 |R . ; TEXT "NAME| 00000200: 20 3A 20 22 00 17 0A 11 04 3A 20 20 20 20 20 20 | : ".....: | 00000210: 4C 44 58 20 23 30 30 00 2C 0A 12 04 3A 20 20 20 |LDX #00.,...: | 00000220: 20 20 20 53 54 58 20 24 43 43 30 46 00 40 0A 13 | STX $CC0F.@..| 00000230: 04 4C 30 30 32 20 20 20 4C 44 41 20 23 22 AF 22 |.L002 LDA #"."| 00000240: 00 53 0A 14 04 3A 20 20 20 20 20 20 4A 53 52 20 |.S...: JSR | 00000250: 4F 55 54 00 67 0A 15 04 3A 20 20 20 20 20 20 4C |OUT.g...: L| 00000260: 44 41 20 23 22 9D 22 00 7C 0A 16 04 3A 20 20 20 |DA #".".|...: | 00000270: 20 20 20 53 54 58 20 24 43 43 30 46 00 8F 0A 17 | STX $CC0F....| 00000280: 04 3A 20 20 20 20 20 20 4A 53 52 20 4F 55 54 00 |.: JSR OUT.| 00000290: AC 0A 1A 04 3A 20 20 20 20 20 20 4A 53 52 20 49 |....: JSR I| 000002A0: 4E 20 20 20 20 3B 20 43 48 52 49 4E 00 BF 0A 1B |N ; CHRIN....| 000002B0: 04 3A 20 20 20 20 20 20 43 4D 50 20 23 30 30 00 |.: CMP #00.| 000002C0: D3 0A 1C 04 3A 20 20 20 20 20 20 42 45 51 20 4C |....: BEQ L| 000002D0: 30 30 32 00 ED 0A 24 04 3A 20 20 20 20 20 20 43 |002...$.: C| 000002E0: 4D 50 20 23 24 30 44 20 20 3B 5B 8E 5D 00 01 0B |MP #$0D ;[.]...| 000002F0: 2E 04 3A 20 20 20 20 20 20 42 45 51 20 4C 30 31 |..: BEQ L01| 00000300: 30 00 1E 0B 38 04 3A 20 20 20 20 20 20 43 4D 50 |0...8.: CMP| 00000310: 20 23 24 31 34 20 20 3B 5B 44 45 88 45 5D 00 32 | #$14 ;[DE.E].2| 00000320: 0B 42 04 3A 20 20 20 20 20 20 42 45 51 20 4C 30 |.B.: BEQ L0| 00000330: 32 30 00 50 0B 43 04 3A 20 20 20 20 20 20 4A 53 |20.P.C.: JS| 00000340: 52 20 4F 55 54 20 20 20 3B 20 43 48 52 4F 55 54 |R OUT ; CHROUT| 00000350: 00 65 0B 56 04 3A 20 20 20 20 20 20 4C 44 58 20 |.e.V.: LDX | 00000360: 24 43 43 30 46 00 86 0B 60 04 3A 20 20 20 20 20 |$CC0F...`.: | 00000370: 20 43 50 58 20 23 24 30 46 20 20 3B 5B 4D 41 58 | CPX #$0F ;[MAX| 00000380: 20 B2 20 31 35 5D 00 9A 0B 6A 04 3A 20 20 20 20 | . 15]...j.: | 00000390: 20 20 42 45 51 20 4C 30 31 30 00 C1 0B 74 04 3A | BEQ L010...t.:| 000003A0: 20 20 20 20 20 20 53 54 41 20 24 43 43 31 30 2C | STA $CC10,| 000003B0: 58 20 3B 20 53 50 45 49 43 48 45 52 20 4E 41 4D |X ; SPEICHER NAM| 000003C0: 45 00 D0 0B 7E 04 3A 20 20 20 20 20 20 49 4E 58 |E...~.: INX| 000003D0: 00 E5 0B 88 04 3A 20 20 20 20 20 20 53 54 58 20 |.....: STX | 000003E0: 24 43 43 30 46 00 F9 0B 92 04 3A 20 20 20 20 20 |$CC0F.....: | 000003F0: 20 4A 4D 50 20 4C 30 30 32 00 20 0C 9C 04 3B B2 | JMP L002. ...;.| 00000400: B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 |................| 00000410: B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 |................| 00000420: 00 35 0C A6 04 4C 30 32 30 20 20 20 4C 44 58 20 |.5...L020 LDX | 00000430: 24 43 43 30 46 00 49 0C B0 04 3A 20 20 20 20 20 |$CC0F.I...: | 00000440: 20 43 50 58 20 23 24 30 30 00 69 0C BA 04 3A 20 | CPX #$00.i...: | 00000450: 20 20 20 20 20 42 45 51 20 4C 30 30 32 20 20 3B | BEQ L002 ;| 00000460: 5B 4D 49 4E 20 B2 20 30 5D 00 78 0C C4 04 3A 20 |[MIN . 0].x...: | 00000470: 20 20 20 20 20 44 45 58 00 8D 0C C5 04 3A 20 20 | DEX.....: | 00000480: 20 20 20 20 53 54 58 20 24 43 43 30 46 00 A1 0C | STX $CC0F...| 00000490: CE 04 3A 20 20 20 20 20 20 4C 44 41 20 23 24 31 |..: LDA #$1| 000004A0: 34 00 C4 0C D8 04 3A 20 20 20 20 20 20 4A 53 52 |4.....: JSR| 000004B0: 20 4F 55 54 20 20 3B 20 43 48 52 4F 55 54 20 22 | OUT ; CHROUT "| 000004C0: 44 45 4C 22 00 D8 0C E2 04 3A 20 20 20 20 20 20 |DEL".....: | 000004D0: 4A 4D 50 20 4C 30 30 32 00 FF 0C EC 04 3B B2 B2 |JMP L002.....;..| 000004E0: B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 |................| 000004F0: B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 00 |................| 00000500: 13 0D F6 04 4C 30 31 30 20 20 20 4C 44 41 20 23 |....L010 LDA #| 00000510: 24 39 33 00 26 0D 00 05 3A 20 20 20 20 20 20 4A |$93.&...: J| 00000520: 53 52 20 4F 55 54 00 3A 0D 0A 05 3A 20 20 20 20 |SR OUT.:...: | 00000530: 20 20 4C 44 58 20 23 24 30 38 00 4E 0D 14 05 3A | LDX #$08.N...:| 00000540: 20 20 20 20 20 20 4C 44 59 20 23 24 30 31 00 61 | LDY #$01.a| 00000550: 0D 1E 05 3A 20 20 20 20 20 20 4A 53 52 20 50 41 |...: JSR PA| 00000560: 52 00 75 0D 28 05 3A 20 20 20 20 20 20 4C 44 58 |R.u.(.: LDX| 00000570: 20 23 24 31 30 00 89 0D 32 05 3A 20 20 20 20 20 | #$10...2.: | 00000580: 20 4C 44 59 20 23 24 43 43 00 9E 0D 3C 05 3A 20 | LDY #$CC...<.: | 00000590: 20 20 20 20 20 4C 44 41 20 24 43 43 30 46 00 B2 | LDA $CC0F..| 000005A0: 0D 46 05 3A 20 20 20 20 20 20 4A 53 52 20 4E 41 |.F.: JSR NA| 000005B0: 4D 45 00 C6 0D 50 05 3A 20 20 20 20 20 20 4C 44 |ME...P.: LD| 000005C0: 41 20 23 24 30 30 00 D7 0D 5A 05 3A 20 20 20 20 |A #$00...Z.: | 000005D0: 20 20 4A 53 52 20 93 00 E9 0D 64 05 3A 20 20 20 | JSR ....d.: | 000005E0: 20 20 20 4A 4D 50 20 87 59 00 10 0E B6 0B 3B B2 | JMP .Y.....;.| 000005F0: B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 |................| 00000600: B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 |................| 00000610: 00 1C 0E B7 0B AC B2 24 43 43 30 30 00 2D 0E B8 |.......$CC00.-..| 00000620: 0B 2E C6 20 22 4E 41 4D 45 20 3A 20 22 00 00 00 |... "NAME : "...|
....... [ PROGRAMM : ].;.... [ E
INGABE NAMEN (L16)].X.... [ VERSUCH 1
].^...:.D...:.P.(.. 36864.~.2..OP
T OO,P...4...$C000...5.:...<.IN .$FFE
4...=.OUT .$FFD2.C.>.PAR .$FFBA.T.?.
NAME .$FFBD...@.. .$FFD5...A..Y .$A474
...B.. .$AB1E...F.:...P.:.2.Z.; ........
...........................H.\.:
LDA #$00._.].: STA $CC07...^.; ..
.....................................L00
1 LDA #$93.....: JSR OUT ; CHRO
UT.N...: LDA #$00.....: LDY #$
CC.....: JSR . ; TEXT "NAME : "....
.: LDX #00.,...: STX $CC0F.@..
.L002 LDA #".".S...: JSR OUT.G...
: LDA #".".|...: STX $CC0F....
.: JSR OUT.....: JSR IN ; C
HRIN.....: CMP #00.S...: BEQ L
002...$.: CMP #$0D ;[.].....:
BEQ L010...8.: CMP #$14 ;[DE.E].2
.B.: BEQ L020.P.C.: JSR OUT
; CHROUT.E.V.: LDX $CC0F...`.:
CPX #$0F ;[MAX . 15]...J.: BEQ L0
10.A.T.: STA $CC10,X ; SPEICHER NAM
E.P.~.: INX.....: STX $CC0F...
..: JMP L002. ...;.................
.................5...L020 LDX $CC0F.I.
..: CPX #$00.I...: BEQ L002 ;
[MIN . 0].X.D.: DEX...E.: STX
$CC0F...N.: LDA #$14.D.X.: JSR
OUT ; CHROUT "DEL".X...: JMP L002
.....;..................................
....L010 LDA #$93.&...: JSR OUT.:
...: LDX #$08.N...: LDY #$01.A
...: JSR PAR.U.(.: LDX #$10...
2.: LDY #$CC...<.: LDA $CC0F..
.F.: JSR NAME.F.P.: LDA #$00.W
.Z.: JSR ....D.: JMP .Y.....;.
.......................................$
CC00.-....F "NAME : "...
> CLICK IMAGE PREVIEW FOR FULL MODAL