16.11.2014 / 13:20 | |
Ксакеп Модератор форума Сейчас: Offline
Регистрация: 20.06.2012
| RblSb, нет, применять методы, когда goto заменяется на эквивалентные структуры.
|
16.11.2014 / 15:04 | |
aNNiMON Супервизор Сейчас: Offline
Имя: Витёк Регистрация: 11.01.2010
| Ксакеп, легче руками запилить примеры MB —> Java и будет краткий экскурс в Java для мбшников.
__________________
let live |
16.11.2014 / 17:35 | |
Ксакеп Модератор форума Сейчас: Offline
Регистрация: 20.06.2012
| aNNiMON, там не всё так просто.
|
16.11.2014 / 17:36 | |
Vapigor Пользователь Сейчас: Offline
Регистрация: 15.03.2012
| Аннимон прав, мв должен быть лёгким для общего погружения в основы, а там хоть паскаль, хоть ява...
__________________
Делай шум! |
16.11.2014 / 17:45 | |
Kalter Пользователь Сейчас: Offline
Имя: Гриб Откуда: Оренбург - Нежинка Регистрация: 16.10.2013
| Я когда делать было нефиг писал классы (!) в МБ (!!). Весьма своеобразно, но правильно. Ещё от нумерации строк не избавиться. Процедуру то еле-еле сделать. Сам предпочитаю паскльную структуру. 10 REM MY PROGRAM :)
20 REM KALTER
30 REM [DATE]
40 REM CONST
50 MAX_NUM%=50
60 REM VAR
70 DIM MATRIX%(MAX_NUM%)
80 REM METHOD
90 INIT%=210
100 REM BEGIN
110 GOTO INIT%
200 END
210 REM INIT
220 FOR I%=0 TO MAX_NUM%-1
230 MATRIX%(I%)=I%
240 NEXT I%
300 RETURN
__________________
Homo homini penis est. Изменено Kalter (16.11 / 17:45) (всего 1 раз) |
16.11.2014 / 18:18 | |
aNNiMON Супервизор Сейчас: Offline
Имя: Витёк Регистрация: 11.01.2010
| Kalter, неплохой вариант!
__________________
let live |
16.11.2014 / 19:24 | |
Ксакеп Модератор форума Сейчас: Offline
Регистрация: 20.06.2012
| А что за RETURN?
|
16.11.2014 / 19:31 | |
Kalter Пользователь Сейчас: Offline
Имя: Гриб Откуда: Оренбург - Нежинка Регистрация: 16.10.2013
| Ах, точно, в коде допустил ошибку. На строке 15 (110) вместо GOTO надо GOSUB Открыть спойлер Закрыть спойлер Прекращает работу подпрограммы и передаёт управление следующей строчке, за GOSUB. __________________
Homo homini penis est. |
16.11.2014 / 19:43 | |
Ксакеп Модератор форума Сейчас: Offline
Регистрация: 20.06.2012
| Kalter, а если из подпрограммы вызвать ещё один GOSUB?
|
16.11.2014 / 19:48 | |
Kalter Пользователь Сейчас: Offline
Имя: Гриб Откуда: Оренбург - Нежинка Регистрация: 16.10.2013
| Ксакеп, всё будет нормально. Но переполнение стека вызовов (или как оно реализовано в интерпретаторе) не бесконечно. Доказательство тому рекурсия: 10 I%=0
20 I%=I%+1
30 PRINT I%
40 REPAINT
50 GOSUB 20
52 вызова, вроде. __________________
Homo homini penis est. |