21.03.2015 / 16:24 | |
MisterN Пользователь Сейчас: Offline
Регистрация: 13.05.2013
| pro_xaker2000, а ничего, что у тебя цикл for начинается с нуля а массив минимум (1)?!
|
21.03.2015 / 18:48 | |
pro_xaker2000 Пользователь Сейчас: Offline
Имя: игорь Регистрация: 10.03.2015
| MisterN, а так можно 10 dim d$(21) 20 dim c$(21) 30 for i%=0 to 20 40 read a$ 50 read b$ 60 d$(i%)=a$ 70 c$(i%)=b$ 80 next i% 90 for i%=0 to 20 100 gelload d$(i%),c$(i%) 110 next i% 120 data lalalalalala трара и код продолжаеться вопрос:можно data писать не в конце?
|
21.03.2015 / 18:56 | |
MisterN Пользователь Сейчас: Offline
Регистрация: 13.05.2013
| pro_xaker2000, цикл for должен начинатся так: |
21.03.2015 / 20:18 | |
Gifo_Gsoul Пользователь Сейчас: Offline
Имя: Gifo_Gsoul Откуда: Ур Регистрация: 26.06.2014
| MisterN, у него верно начинается цикл, с 0 тоже может, и массивы, кстати, начинаются как раз с 0 и кончаются N-1, где N - размер массива
__________________
</Твой код отражает эволюцию твоего мышления .../> |
22.03.2015 / 18:27 | |
MisterN Пользователь Сейчас: Offline
Регистрация: 13.05.2013
| Если есть 4 спрайта движения(направления), то как автоматизировать замену спрайта при смене направления не убирая остальные спрайты вручную?
|
22.03.2015 / 19:12 | |
Magatino Администратор Сейчас: Offline
Имя: Alexandr Откуда: Где Ленин родился. Simbirsk City Регистрация: 28.01.2011
| MisterN, Ты имеешь в виду это? |
22.03.2015 / 19:15 | |
MisterN Пользователь Сейчас: Offline
Регистрация: 13.05.2013
| Magatino, там один спрайт, а у меня спрайт зависит от неправления
|
22.03.2015 / 19:26 | |
Magatino Администратор Сейчас: Offline
Имя: Alexandr Откуда: Где Ленин родился. Simbirsk City Регистрация: 28.01.2011
| MisterN, Нажал на право, даёшь спрайту картинку правой стороны, нажал на лево, даёшь спрайту картинку левой стороны, что тебе надо ещё? |
22.03.2015 / 19:35 | |
MisterN Пользователь Сейчас: Offline
Регистрация: 13.05.2013
| Magatino, так у меня спрайт остается
|
28.03.2015 / 11:45 | |
WrencH Пользователь Сейчас: Offline
Имя: Григорий Молчанов Регистрация: 26.03.2015
| Скачал МБ 1.9.1 by kiriman & dzanis. Впечатления хорошие. Ищу способ адекватного вызова подпрограмм, но обязательно с передачей параметров, например такого вида (должна выводить заголовок экрана): 100 rem draw screen title (param: title$)
110 setcolor 0,0,128: rem backgroung color="lightblue"
120 fr 0,0,scw(0),18: rem draw lightblue bar on the top of the screen
130 titlewidth%=stw(title$): rem get titlewidth
140 sc 255,255,255: rem set text color="white"
150 ds title$,(scw(0)-titlewidth%)/2,3: rem adjust title to the center of the screen
160 repaint
170 return
Вначале экспериментировал с вызовом CALL/ENDSUB. Результат неудовлетворительный. Вызов CALL трет значения не только параметров, но и вообще всех переменных в программе. В связи с этим была предпринята попытка не вполне корректного использования директивы ENTER "progname.lis" c последующим безусловным переходом GOTO. Ничего из этой идеи не получилось. Идея использовать для передачи параметров RMS - видимо последняя надежда обреченного кодера, хуже чем 10 лет расстрела. Обращаюсь за помощью к тем, кто хорошо знаком со структурой и внутренним устройством данной реализации интерпретатора. Существует ли в рамках МБ 1.9.1 выход без вмешательства в байткод, пусть даже костыльно-ориентированный, но все же не настолько медленный и печальный, как передача через RMS? Спасибо. |