Вниз  RFO BASIC
- 5.09.2016 / 13:22
1961uvg
  Пользователь

1961uvg 
Сейчас: Offline
Да , действительно в доках его нет!
Но как я понял array.dims source [] - определяет вид и размер существующего массива.
Если его нет , то создает пустой массив с этим именем.

Изменено 1961uvg (5.09 / 13:45) (всего 1 раз)
- 5.09.2016 / 22:03
b0ing
  Пользователь

b0ing 
Сейчас: Offline
И снова здрасти! Увлекся созданием функции для прокрутки текста, получился... телевизор :-)
РФО это как кисть для художника ) К слову сказать, автор программы программировал еще в 1977 году для Apple, под IBM 360.
  http://apple2history.org/tag/paul-laughton/
Вобщем вот получившийся телек, и под ним получившаяся функция для прокрутки текста, надо отметить скорость ее работы напрямую зависит от аппаратной возможности устройства. Если девайс слабый, -лучше использовать функцию напрямую, как подпрограмму. Для увеличения скорости работы можно изменить параметр "a" в такой конструкции в конце функции:
    sv++
    if mod(sv,a)=0 then gr.render
Так как обновление графики в РФО сильно замедляет скорость работы программы, то можно схитрить и обновлять один раз за два, а то и за три такта. Дальнейшее увеличение параметра приведет к сильному подергиванию текста. Так что тестируйте, необходимая документация находится в шапке функции.
  1961uvg, я рад что, тебе не безразличен мой код :-)


Да и еще, чтобы наглядно увидеть работу функции, закоментируйте эту строчку:
gr.rect ramka,lt-ss/2,tp-ss/2,rt+ss/2,bt+ss/2

Изменено b0ing (5.09 / 22:11) (всего 1 раз)


Прикрепленные файлы:
FnTextScrollex.bas (3.94 кб.) Скачано 798 раз
FnTextScroll2ex.bas (5.39 кб.) Скачано 875 раз
- 6.09.2016 / 10:15
1961uvg
  Пользователь

1961uvg 
Сейчас: Offline
Очередной шедевр !
Отлично написано : листинг разбит по структурам .
Что способствует разбору программы.
Побольше бы комментариев - цены бы не было!
  Да и идеи интересные !
- 6.09.2016 / 10:27
1961uvg
  Пользователь

1961uvg 
Сейчас: Offline
levapbar
Хороший человек подсказал по твоему вопросу и привел пример :
Синтаксис: ARRAY.DIMS mas[],dan[],kol
mas[] - массив который замеряем
dan[] - сюда записывается размерность массива.
kol - количество индексов

пример:

DIM mas[30,20]
ARRAY.DIMS mas[],ind[],kol
!выведем сколько индексов у массива
PRINT kol
!Выведем размер индексов в данном случае 30,20
FOR q=1 TO kol
     PRINT ind[q]
NEXT

То-есть команда узнает количество индексов и размер. В данном случае был объявлен массив mas[30,20]. У данного массива 2 индекса (двухмерный). Первый индекс 30, второй 20. В переменную kol запишется количество индексов (в данном случае 2). В массив ind[] записывается размер индексов (в данном случае ind[1]=30, ind[2]=20).

  Побольше бы активности проявляли пользователи - мы бы далеко продвинулись!
- 6.09.2016 / 21:02
19Ram84
  Пользователь

19Ram84 
Сейчас: Offline
b0ing, Блин он че телик будет ловить?
У меня как раз есть аппаратная поддержка, встроенное тв показывает)
Не показывает :-(

Изменено 19Ram84 (6.09 / 21:06) (всего 1 раз)
- 6.09.2016 / 21:17
Витаминыч
  Супермодератор

Витаминыч 
Сейчас: Offline
19Ram84, "телевизор" не буквально же, ну :кек2: Функция телетекста получилась, по-русски -- субтитры.
__________________
 わからない!!
- 6.09.2016 / 21:29
19Ram84
  Пользователь

19Ram84 
Сейчас: Offline
Витаминыч, Ну да, это я понял когда запустил программу, и не нашел ручек переключения каналов :-D
- 6.09.2016 / 22:20
1961uvg
  Пользователь

1961uvg 
Сейчас: Offline
Антенну поправь!
А так довольно прикольно!
Одна текст перемещает в верх и в низ!
А другая как в телеке - телетекст!

Изменено 1961uvg (6.09 / 22:23) (всего 1 раз)
- 7.09.2016 / 00:35
levapbar
  Пользователь

levapbar 
Сейчас: Offline
1961uvg,
Спасибо!
Вот еще ARRAY.FILL у вас в доках нет.
Команда заполняет массив.
Например: у нас заполнен массив значениями 1,2,3,4,5,6,7,8,9,10
ARRAY.FILL mas[3,6], 88
массив станет выглядеть так: 1,2,88,88,88,88,88,88,9,10 :gg:
- 7.09.2016 / 06:33
1961uvg
  Пользователь

1961uvg 
Сейчас: Offline
Ну так и должно.
Ты с 3 элемента заменил шесть значений на 88.
Наверх  Всего сообщений: 2716
Фильтровать сообщения
Поиск по теме
Файлы топика (511)