INTL 3:770/1 3:770/3
REPLYADDR ank@spamfence.net
REPLYTO 3:770/3.0 UUCP
MSGID: <87bkhs599e.fsf@usenet.ankman.de> 78517612
REPLY:  07e2091a
PID: SoupGate-Win32 v1.05
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)
SEEN-BY: 1/19 123 15/0 16/0 18/200 19/10 37 90/1 105/81 106/201 123/130
SEEN-BY: 123/131 129/305 132/174 142/104 153/757 7715 154/10 203/0
SEEN-BY: 218/700 840 220/70 221/1 6 360 226/17 30 227/114 229/110
SEEN-BY: 229/112 113 206 275 307 317 400 426 428 470 664 700 230/0
SEEN-BY: 240/5832 266/512 267/800 280/5003 282/1038 291/111 301/1
SEEN-BY: 317/3 320/119 219 319 2119 322/0 757 325/304 326/101 335/364
SEEN-BY: 341/66 342/19 200 396/45 423/81 460/58 633/280 712/848 770/1
SEEN-BY: 770/3 100 340 772/210 220 230 5058/104
PATH: 770/3 1 218/840 221/6 1 320/219 229/426