Например TDA7294

Форум РадиоКот :: Просмотр темы - data, read, restore. Как эти функции выглядят в Pascal?
Форум РадиоКот
https://radiokot.ru/forum/

data, read, restore. Как эти функции выглядят в Pascal?
https://radiokot.ru/forum/viewtopic.php?f=58&t=154106		 Страница 1 из 1
Автор:  Uma_an [ Вт апр 10, 2018 17:49:03 ]
Заголовок сообщения:  data, read, restore. Как эти функции выглядят в Pascal?
Здравия всем.

data, read, restore...были когда-то такие функции в обычном Basic. Как эти функции выглядят в MicroPascal for pic?
---------
чтоб было нагляднее вышеописанному, то нужно последовательно присвоить относительно большой объем переменной, т.е. по очереди я хочу считать вот это с основного кода программы, т.к. в еепром (128 байт) все данные не влазят. В одну строку для операторов DIM или ARRAY тоже. Можно в 3 строки реализовать, но хотелось бы не так "криво"...

Спойлерdata 134,214,1,1,2,1,1,3,1,1,2,1,1,1,1,2,1,2,5,1,1,2,1,16,2,2,1,2,2,2,1,1,2,3,1,1,1,1,3,2,1,2,1,17,2,1,1,3,1,1,1,1,4,2,2,1,1,1,1,1,1,1,1,3,2,16,1,2,1,1,1,1,2,2,3,1,3,2,1,1,3,2,1,1,1,18,2,1,1,2,1,1,1,2,1,4,3,1,1,1,2,1,1,1,4,17,2,7,1,1,2,3,5,1,1,1,3,1,1,19,5,1,4,1,1,2,1,1,2,2,1,1,2,4,1,1,2,16,1,1,4,2,2,1,5,1,2,3,4,5,1,16,3,5,2,1,3,2,1,1,3,1,1,1,1,1,1,2,2,17,1,1,5,2,1,1,4,1,3,3,2,1,2,3,1,17,1,1,1,4,1,3,6,1,3,1,4,1,1,20,1,1,1,6,1,1,3,2,1,1,3,1,3,4,2,17,1,2,1,2,1,4,2,4,2,1,1,1,2,1,7,16,1,2,6,2,7,4,4,1,1,20,1,3,1,1,1,1,2,1,4,1,1,1,1,1,1,1,2,1,1,4,2,16,1,1,2,2,4,1,2,2,1,3,2,1,2,4,1,1,2,16,1,1,1,1,1,2,2,2,1,6,1,1,1,1,1,1,1,4,3,16,2,1,1,1,2,4,1,2,2,1,1,2,1,1,2,1,4,2,1,16,1,2,1,1,2,1,1,2,1,1,1,1,1,1,1,2,1,1,1,2,1,1,1,1,1,1,1,16,2,1,7,1,4,2,1,4,1,1,2,4,2,16,4,1,1,5,1,1,1,1,2,2,1,2,6,1,3,16,3,2,2,1,2,1,3,1,2,1,2,2,1,2,3,1,1,18,1,1,1,1,2,1,3,1,3,2,1,1,1,3,3,3,1,1,1,17,1,1,1,6,1,1,2,1,2,2,3,1,3,3,1,2,1,16,1,2,1,1,2,2,1,1,5,1,1,2,1,1,2,1,2,4,1,16,3,2,1,1,3,1,1,6,2,2,3,1,6,16,3,1,1,1,1,4,2,1,3,1,1,1,1,1,1,2,2,21,2,4,3,2,2,1,7,1,1,4,4,17,2,2,1,3,2,1,1,6,1,1,1,1,4,2,3,17,2,1,2,1,1,4,1,3,1,1,1,4,8,1,1,16,2,1,3,1,1,1,1,1,3,2,2,4,1,2,2,2,2,17,1,2,2,3,2,1,1,2,4,4,1,2,1,2,1,19,2,6,1,2,1,5,4,1,4,1,2,2,1,16,3,1,6,1,2,1,2,2,1,3,1,6,1,1,1,16,1,2,1,2,2,1,1,1,2,1,2,1,2,1,1,1,2,2,1,1,1,2,1,16,3,1,1,1,1,1,2,1,1,1,2,3,1,1,1,1,2,1,1,1,2,1,2,16,1,2,4,4,2,4,1,4,3,1,6,16,1,2,1,3,3,1,1,3,1,1,2,1,1,1,1,1,1,3,2,1,1,16,5,1,2,3,4,1,2,2,1,1,1,3,2,2,2,16,2,2,1,2,1,1,1,1,1,2,1,1,1,1,1,1,1,1,3,1,1,1,1,1,2,16,1,2,1,1,2,1,1,2,1,5,1,2,1,1,1,2,1,1,5,16,1,4,2,1,2,1,1,1,2,1,4,2,1,2,1,5,1,16,7,4,1,3,4,3,2,1,5,18,1,4,3,1,1,1,3,1,1,1,3,2,2,2,1,2,2,17,5,1,1,1,1,2,2,3,2,2,1,1,1,2,1,1,5,16,2,1,1,1,1,2,1,2,5,1,1,2,1,1,1,1,2,1,1,3,1,16,1,1,3,3,1,2,1,1,2,2,1,2,1,1,1,1,2,1,1,2,1,17,3,1,2,1,1,1,1,1,1,4,1,1,1,3,3,1,1,3,1,17,1,2,1,3,1,3,2,1,1,1,3,1,1,1,3,1,3,1,1,17,1,4,1,3,1,1,4,2,3,2,5,21,1,1,1,1,4,1,1,1,4,3,1,3,2,2,1,1,4,16,2,1,4,2,1,1,1,1,1,3,1,4,3,1,1,2,3,16,8,1,1,1,1,2,2,1,2,3,2,2,1,1,1,2,1,16,4,2,3,2,1,1,1,2,1,2,2,1,2,3,1,20,1,1,1,2,1,1,2,2,2,1,3,1,2,2,3,1,1,1,1,19,3,1,1,1,2,1,1,1,2,1,3,1,1,1,1,1,1,3,2,20,2,1,2,1,3,2,3,2,2,4,1,1,1,2,1,1,2,17,3,1,2,5,1,1,1,4,1,3,7,1,2,16,2,2,2,1,1,3,1,3,2,5,3,1,4,18,4,1,5,1,1,2,3,2,1,2,2,4,1,1,2,16,1,2,1,3,1,3,2,4,2,1,1,1,3,1,6,16,2,1,5,3,1,1,1,1,3,4,6,1,1,18,4,1,1,1,1,1,1,1,1,1,1,5,1,2,3,1,1,2,1,18,3,4,2,2,2,2,2,1,3,1,1,1,6,18,3,4,2,2,1,4,1,1,3,1,9,17,1,1,1,1,5,2


P.s. сильно не пинать за ламерство )
Автор:  ARV [ Вт апр 10, 2018 20:12:35 ]
Заголовок сообщения:  Re: data, read, restore. Как эти функции выглядят в Pascal?
в обычном паскале это выглядит либо так
Код:
var data : array[0..NN] of char = (1,2,3,4,5....);
либо так
Код:
const data : array[0..NN] of char = (1,2,3,4,5...);

как же вы взялись писать программу на языке, которого не знаете?!
Автор:  Uma_an [ Ср апр 11, 2018 23:25:43 ]
Заголовок сообщения:  Re: data, read, restore. Как эти функции выглядят в Pascal?
ARV писал(а):
в обычном паскале это выглядит либо так
Код:
var data : array[0..NN] of char = (1,2,3,4,5....);
либо так
Код:
const data : array[0..NN] of char = (1,2,3,4,5...);

как же вы взялись писать программу на языке, которого не знаете?!


Спасибки :) Полностью прокатило на Pascale. На MicroPascale пришлось урезать количество данных, т.к. даже в ROM pic`a не влазило, с 1153 байт до 934, чтоб "влезло тело программы" (про eeprom я уже говорил: 128 байт).
...Не знал, что можно "просто" нажимать Enter и вводить данные далее...
...Интересен еще момент: (потом проверю), что после "For next" компилятор не ругается на "step 2" ... (это имхо в микроБейсике). Не ругается или ему пофиг.
... HEX на Паскале получился больше, чем на Бейсике... Я больше Паскалю доверяю, возможно, операторов было немного. Больше было данных.

как же вы взялись писать программу на языке, которого не знаете?![/uquote]
...как-то и не отвечу в одной фразе... Скорее, для себя, нравится познавать. Задумок много, а напрягать народ "сделайте всё вместо меня, а я воспользуюсь -- неправильно"
Страница 1 из 1 Часовой пояс: UTC + 3 часа
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
http://www.phpbb.com/