Subj : Re: Messing around, creating a disk editor.
To   : KP KP
From : Andreas Kohlbach
Date : Tue Jun 06 2023 21:52:29

On Tue, 6 Jun 2023 16:55:34 -0700 (PDT), KP KP wrote:
>
> I need some scrutinizing on my crappy coding expertise. Haven't made a
> program in years.. Could be junk or have no idea what I am
> doing. Gibberish? Lol.
>
>
> 10 PRINT "***** C64 DISK EDITOR *****"
> 20 PRINT
> 30 INPUT "Enter the name of the disk file: "; FILENAME$
> 40 PRINT
> 50 OPEN 1, 8, 15, FILENAME$
> 60 PRINT "1. Display sector"
> 70 PRINT "2. Edit sector"
> 80 PRINT "3. Save changes"
> 90 PRINT "4. Quit"
> 100 PRINT
> 110 INPUT "Enter your choice: "; CHOICE
> 120 PRINT
>
> 130 IF CHOICE = 1 THEN
> 140   INPUT "Enter the sector number to display: "; SECTOR
> 150   PRINT
> 160   SYS 64738

That'll do a System-Reset, and the rest is ignored. Worse, you leaving a
data channel open (line 50).

> 170   PRINT
> 180   GOTO 50
> 190 ELSEIF CHOICE = 2 THEN

Commodore BASIC (at least not of the C64) doesn't know "ELSE". May be of
the C128? But I never used it.
--
Andreas

--- SoupGate-Win32 v1.05
 * Origin: Agency HUB, Dunedin - New Zealand | Fido<>Usenet Gateway (3:770/3)

.