Che cosa è il BASIC "101 Giochi per computer"

Il dialetto di BASIC utilizzato nell'edizione Microcomputer di "101 Computer Games" eseguirà il corpo di un ciclo FOR ... NEXT almeno una volta. Questo differisce da BASIC-80 v. 5 .

Da pag. i12 , che elenca le eccezioni al "normale" BASIC:

FOR ... TO ... STEP

As in standard BASIC, except that the test for ending the loop is made after it h as been executed. That is, when this program is run:

10 FOR X=2 TO 1
20 PRINT "HI"
30 NEXT X
40 END

"HI" will be printed...

Per questo motivo, questo dialetto di BASIC non ha problemi a localizzare l'istruzione NEXT, o a condividere la stessa istruzione successiva con più istruzioni FOR. Non è richiesta alcuna analisi statica. Esegui semplicemente ogni istruzione nel momento in cui si verifica e alla fine otterrai l'istruzione NEXT, ovunque si trovi.

È possibile che BASIC-80 gestisca un NEXT fuori ordine?

È possibile che un'istruzione FOR salti il corpo del ciclo, come consentito dal BASIC-80 v.5, e che comunque permetta istruzioni NEXT fuori sequenza nella maggior parte dei casi. Ecco come:

• L'interprete ottiene due stati, "in esecuzione" e "ignora SUCCESSIVO"
• Quando si trova nello stato "in esecuzione", l'interprete esegue normalmente ogni istruzione.
• Quando si valuta un'istruzione FOR, se si desidera saltare il corpo del ciclo, lo stato viene modificato in "ignora SUCCESSIVO"
• Quando nello stato "saltando al prossimo", l'interprete salta ogni istruzione tranne NEXT e GOTO incondizionato.
  • Viene seguita un'istruzione GOTO incondizionata
  • Un'istruzione NEXT, se la sua variabile corrisponde a quella dell'istruzione FOR (o se la variabile non è specificata), torna allo stato "in esecuzione". Se la variabile non corrisponde, l'interprete rimane nello stato "saltando alla PROSSIMA".

Questo gestirà sequenze patologiche semplici come quella nella domanda. Non gestiva i casi in cui la NEXT era stata raggiunta da un'istruzione IF ... GOTO o da un GOSUB. Il codice che lo fa è molto peggio del già cattivo codice nella domanda che non è irragionevole dichiarare semplicemente che l'interprete non supporterà tali casi. Potrebbe anche essere permesso all'interprete di dare fuoco a tale codice.

Questo riporta indietro i vecchi tempi ...

Ho una copia del libro, 3rd printing, 1975. Ho controllato la tua inserzione e non è originale. Nel codice sorgente originale le dichiarazioni non hanno spazi e le assegnazioni hanno la parola chiave LET. Ad esempio

200 LETK=M:GOSUB600

Il dialetto è DIGITAL PDP-11 BASIC (non Basic-plus o BASIC-80). Per esperienza, non tutti questi giochi hanno funzionato su tutti i dialetti di BASIC. Ho un vago ricordo di dover ricodificare molti di questi giochi per farli lavorare su altri dialetti. Questo tipo di orribile struttura ad anello era sicuramente un problema.

Ho avuto esperienza con oltre 20 dialetti diversi di BASIC e posso dirvi che questa era una domanda irritata all'epoca. C'erano 2 campi principali.

In un campo c'erano gli interpreti completi, che analizzavano ogni riga di nuovo ogni volta che veniva visto. Hanno gestito un ciclo FOR spingendolo su una pila, identificato dalla sua variabile, e quindi scansionando la pila per una corrispondenza con ogni NEXT. Se hanno saltato un ciclo, avrebbero dovuto scansionare la sorgente per il NEXT. Alcuni lo hanno fatto, altri no.

L'altro campo era i tokenizer o semi-compilatori. Esaminerebbero tutte le linee prima dell'esecuzione e convertirle in una sorta di formato interno. Hanno anche abbinato i loop FOR / NEXT e hanno controllato gli obiettivi GOTO e GOSUB mancanti. DEC e BASIC-80 erano in questo campo, come ricordo, ma è passato molto tempo.

In risposta alle tue domande,

1. Sì, il dialetto di BASIC salta un ciclo se inizialmente soddisfatto
2. No, il sequenziamento di FOR NEXT non era un requisito documentato, ma il comportamento non era definito. Come professionista, ovviamente non l'ho mai fatto. :)

Spero che questo aiuti. Queste sono lingue orribili, ma se devi farlo ...

Non ho una copia delle specifiche per uno di questi antichi interpreti BASIC di fronte a me (potrebbe anche non esistere), ma ho intenzione di uscire su un arto e dire che l'interprete BASIC sarà non eseguire un NEXT su un ciclo FOR che non gli appartiene, anche se la variabile loop ha lo stesso nome.

Quindi, in altre parole, nel tuo esempio

200 K=M:GOSUB 600
205 E=0:IF K>6 THEN K=K-7
210 C=C+1:IF C<9 THEN F(N)=F(N)*6+K
215 FOR I=0 TO 5:IF B(I)<>0 THEN 230
220 NEXT I
225 RETURN
230 FOR I=7 TO 12:IF B(I)<>0 THEN E=1:RETURN
235 GOTO 220

quando la riga 235 viene eseguita e passa alla riga 220, la riga 220 NEXT il ciclo FOR in alto, non in basso.

Questo è evidente nel messaggio di errore "NEXT without FOR"; l'interprete BASIC rifiuta qualsiasi NEXT per il quale non ha trovato un FOR corrispondente. Questo accade tipicamente quando si ottiene il NEXT fuori servizio, come in

100 FOR I = 1 to 10
110 FOR J = 1 to 10
120 ...
130 NEXT I
140 NEXT J

Quindi, per rispondere alle tue domande puntate:

• Sì, se la variabile di loop si trova nel raggio di FOR.
• Sì, per quanto ne so, è il caso.