Бейсик-помощь

[goodboy]

FOR g= 1 TO 8

для начала g=0 TO 7

- - - Добавлено - - -

I(g)

бейсик это воспринимает как ячейку массива

[Advertiser]

[ZEman]

для начала g=0 TO 7

но у меня то переменные I1 - I8 (то-есть от 1 до 8 ).

бейсик это воспринимает как ячейку массива

а чтоб номер переменной листал нельзя ?

[goodboy]

тогда начнётся сбой на этапе

POKE USR A$+g

число будет записано в ячейку на 1 больше чем USR A$,I1

[ZEman]

понятно.
спасибо за разъяснение.

[ZEman]

ещё один вопрос.
имеется такая строчка:

10 INPUT g: IF g<0 OR g>255 THEN GO TO 10

вводится значение g от 0 до 255.
но, есть ошибка.
если ввести вместо цифр какие-то буквы или команду - программа вывалится в ошибку.
как-то можно запретить вводить в INPUT буквы и команды ?

[null_device]

ZEman, обязательно нужен ручной ввод числового значения?
Как вариант, можно организовать его как ввод симовольной переменной с последующим преобразованием в число. Правда, получится, весьма громоздкая конструкция.

- - - Добавлено - - -

Например, вот такая:

10 INPUT LINE g$: IF LEN g$<1 OR LEN g$>3 THEN GOTO 10
12 IF LEN g$=3 AND CODE g$(1)>47 AND CODE g$(1)<51 THEN
IF CODE g$(2)>47 AND CODE g$(2)<54 THEN
IF CODE g$(3)>47 AND CODE g$(3)<54 THEN
LET g=(CODE g$(3)-48)+(CODE g$(2)-48)*10+(CODE g$(1)-48)*100: GOTO 22
14 IF LEN g$=2 AND CODE g$(1)>47 AND CODE g$(1)<58 THEN
IF CODE g$(2)>47 AND CODE g$(2)<58 THEN
LET g=(CODE g$(2)-48)+(CODE g$(1)-48)*10: GOTO 22
18 IF LEN g$=1 AND CODE g$(1)>47 AND CODE g$(1)<58 THEN
LET g=CODE g$(1)-48: GOTO 22
20 GOTO 10
22 STOP

[Black Cat / Era CG]

Можно запрашивать строку, а потом конвертить в число (обрабатывая "ошибки"), но это тоже не панацея.

[Black Cat / Era CG]

Есть же функция преобразования символов в чисто, правда не помню, как она реагирует на нецифровые символы.

[null_device]

Black Cat / Era CG, есть обратная функция - STR$.
Беда в том, что команда INPUT, может принимать в качестве входных числовых данных, любую белиберду. Алгебраические выражения и имена переменных.

[ZEman]

Видимо потом буду делать через inkey$ и let.
Так меньше проблем будет.