Важная информация

User Tag List

Страница 3 из 3 ПерваяПервая 123
Показано с 21 по 28 из 28

Тема: Кросс Паскаль для Z80

  1. #21
    Guru Аватар для andrews
    Регистрация
    20.04.2006
    Адрес
    Санкт-Петербург
    Сообщений
    2,694
    Спасибо Благодарностей отдано 
    423
    Спасибо Благодарностей получено 
    197
    Поблагодарили
    175 сообщений
    Mentioned
    4 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Расскажите, кто знает, как собрать FPC-Z80 для таргет z80-zxspectrum из исходников? Или где взять такую готовую сборку?

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

    Цитата Сообщение от Oleg N. Cher Посмотреть сообщение
    которому впервые достался Спектрум
    ну мне первый спектрум попался еще тогда, когда и Ленинграда-48 толком не было. Но это была российская огромная двухсторонняя плата с неисчислимой кучей корпусов. Что-то разведено по плате, что-то монтажным проводом. Ножки какие-то откушены и затем снова припаяны. Но по утверждению чела, который мне ее притащил и сказал:
    "Давай цветной моник, ща мы ее подключим" и без клавиатуры должна зафурычить.

    Слава Богу мы ее не подключили к новгородскому промышленному монитору. Заземление у нас там было не на каждом рабочем месте, а без него он нам немало аппаратуры пожёг.

    Я попросил схему. Так она была на синьке и нифига в ней не разобрать. После чего я сказал. Не ребят...схемы четкой нет, плата невообразимо сложная...я пас. Верните счастливому владельцу, который ее собрал и оживил. Теперь уже не вспомню было это до 1987 года или после.

    И первое, что я купил домой это был Партнер 01.01 А на работе тоже были МСУВТ -В7( разработчик ВНИИЭМ, изготовитель АЭМЗ Александрия Кировоградской) с 1983 года.
    Последний раз редактировалось andrews; 28.01.2023 в 00:32.

  2. #22
    Veteran Аватар для Oleg N. Cher
    Регистрация
    24.08.2007
    Адрес
    Днепропетровская обл.
    Сообщений
    1,616
    Спасибо Благодарностей отдано 
    2,199
    Спасибо Благодарностей получено 
    141
    Поблагодарили
    107 сообщений
    Mentioned
    1 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Ну вот видите как долго к Спеку душой прирастали. А тут поковыряли чуток, и "всё не так" Тут же дело в восприятии.

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

    Цитата Сообщение от Andrew771 Посмотреть сообщение
    Нинаю, у меня нормально лёг, аж на Цивилизацию замахнулся)
    "У меня нормально" за отмазку не канает. Это же не превозношение Ваших возможностей по Паскалю, а всеобще грустная ситуация с проецированием кода на ЯВУ на Z80.

    Где однобайтовая арифметика? Она нужна, я Вас уверяю. Где арифметика со знаком? Вам нужна была совместимость с Дельфи, я помню, Вы о ней говорили. Так вот это смешные фантазии, пока нет арифметики со знаком. "Мне не надо - значит никому не надо" не катит. Где разные модели вызова процедур, инлайн, передача параметров в регистрах, разные низкоуровневые плюшечки? Есть такое? Эти фишки очень нужны для разработки. Заставлять программиста почти всё делать на асме некрасиво.

  3. #23
    Veteran
    Регистрация
    29.12.2010
    Адрес
    Москва
    Сообщений
    1,858
    Спасибо Благодарностей отдано 
    131
    Спасибо Благодарностей получено 
    104
    Поблагодарили
    62 сообщений
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Цитата Сообщение от andrews Посмотреть сообщение
    Нужен "софт из коробки". Установил и в папочке Examples нашел нужное окружение(TRDOS, без системы, что-то другое) и построил и запустил Hello, world!

    Потом уже юзверь начинает ковыряться и разбираться. И на что у него мозгов и времени хватит, то он и сделает. STEP BY STEP.
    Вот такой я сделал интерфейс:


    А в файле формата PRG, который предлагается выбрать, пишешь свою программу на Паскале (можно даже в обычном Блокноте Windows) без всяких лишних довесков, например:

    Код:
    program Kubik;
    
    CONST
    	HowManyTimes = 1000;
    VAR
    	{ Завести 6 переменных (по количеству граней кубика). }
    	one, two, three, four, five, six, n, number: WORD;
    BEGIN
    	RANDOMIZE;
    	{ Обнулить наши счётчики граней кубика. }
    	one := 0; two := 0; three := 0; four := 0; five := 0; six := 0;
    	{ Повторить 1000 раз выбрасывание кубика }
    	FOR n := 1 TO HowManyTimes DO
    	BEGIN
    		{ и посчитать сколько раз выпала каждая грань. }
    		number := random(5)+1;
    		case number of
    			1: one := one + 1;
    			2: two := two + 1;
    			3: three := three + 1;
    			4: four := four + 1;
    			5: five := five + 1;
    			6: six := six + 1;
    		end;
    	END;
    
    	{ Нарисовать цветную таблицу } {
    				+---+------------+
    				| 1 |    200     |
    				+---+------------+
    				| 2 |    200     |
    				+---+------------+
    				| 3 |    200     |
    				+---+------------+
    				| 4 |    300     |
    				+---+------------+
    				| 5 |     50     |
    				+---+------------+
    				| 6 |     50     |
    				+---+------------+
    	}
    	BORDER(0); Textbackground(0);
    	Textcolor(5); Clrscr;
    	Writeln('+---+------------+');
    	Write('| '); Textcolor(2); write(1);
    		Textcolor(5); Writeln(' |            |');
    	Writeln('+---+------------+');
    
    	Write('| '); Textcolor(6); write(2);
    		Textcolor(5); Writeln(' |            |');
    	Writeln('+---+------------+');
    
    	Write('| '); Textcolor(4); write(3);
    		Textcolor(5); Writeln(' |            |');
    	Writeln('+---+------------+');
    
    	Write('| '); Textcolor(3); write(4);
    		Textcolor(5); Writeln(' |            |');
    	Writeln('+---+------------+');
    
    	Write('| '); Textcolor(1); write(5);
    		Textcolor(5); Writeln(' |            |');
    	Writeln('+---+------------+');
    
    	Write('| '); Textcolor(7); write(6);
    		Textcolor(5); Writeln(' |            |');
    	Writeln('+---+------------+');
    
    
    	{ и вывести результаты. }
    	Gotoxy(10, 1); Textcolor(2); Write(one);
    	Gotoxy(10, 3); Textcolor(6); Write(two);
    	Gotoxy(10, 5); Textcolor(4); Write(three);
    	Gotoxy(10, 7); Textcolor(3); Write(four);
    	Gotoxy(10, 9); Textcolor(1); Write(five);
    	Gotoxy(10, 11); Textcolor(7); Write(six);
    
    END.
    После нажатия кнопки и выбора файла PRG всё сразу компилируется в файл ASM - на чистом ассемблере для Спектрума.

    Это всё, что нужно знать начинающему
    Миниатюры Миниатюры Нажмите на изображение для увеличения. 

Название:	zxlikepascal.png 
Просмотров:	31 
Размер:	5.3 Кб 
ID:	78423  
    Последний раз редактировалось Andrew771; 31.01.2023 в 17:41.

  4. #24
    Veteran Аватар для Oleg N. Cher
    Регистрация
    24.08.2007
    Адрес
    Днепропетровская обл.
    Сообщений
    1,616
    Спасибо Благодарностей отдано 
    2,199
    Спасибо Благодарностей получено 
    141
    Поблагодарили
    107 сообщений
    Mentioned
    1 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Начинающему также нужно знать, что продвинутые юзеры ZX Like Pascal не могут работать с ним без допиливания компилятора.

  5. #25
    Veteran
    Регистрация
    29.12.2010
    Адрес
    Москва
    Сообщений
    1,858
    Спасибо Благодарностей отдано 
    131
    Спасибо Благодарностей получено 
    104
    Поблагодарили
    62 сообщений
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Цитата Сообщение от Oleg N. Cher Посмотреть сообщение
    Начинающему также нужно знать, что продвинутые юзеры ZX Like Pascal не могут работать с ним без допиливания компилятора.
    какое допиливание? Там всё уже сделано из коробки, демо-файлы посмотри

  6. #26
    Veteran Аватар для Oleg N. Cher
    Регистрация
    24.08.2007
    Адрес
    Днепропетровская обл.
    Сообщений
    1,616
    Спасибо Благодарностей отдано 
    2,199
    Спасибо Благодарностей получено 
    141
    Поблагодарили
    107 сообщений
    Mentioned
    1 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    microxa, [07.11.2022 21:20]
    Зхлайк тоже позволяет почувствовать себя Виртом

    Oleg N. Cher, [07.11.2022 21:20]
    Это Андрюха чувствует себя Виртом, а мы так, сирые юзверы ������

    microxa, [07.11.2022 21:22]
    Я дохрена там подделал за ним. Красоту асм вставок с передачей в регистрах

    Oleg N. Cher, [07.11.2022 21:22]
    В своё время я предлагал ему делать компиль как универсальный, кроссплатформенно-мультитаргетный, с модульностью, библиотеками, смарт-линковкой

    Oleg N. Cher, [07.11.2022 21:22]
    Он мне сказал, что ему нужен чисто язык-инвалид для Спека

    Oleg N. Cher, [07.11.2022 21:22]
    Подделал это круто, сделай же это публичным

    Oleg N. Cher, [07.11.2022 21:23]
    У меня вот навскидку есть пара знакомых, кто пользуется ZX Like, а про твои наработки наверняка не слышали

    Oleg N. Cher, [07.11.2022 21:23]
    И ещё один чел занялся GCC для БК, чего-то там ваяет

    microxa, [07.11.2022 21:23]
    Оно даже Андрюхе не нать

  7. Этот пользователь поблагодарил Oleg N. Cher за это полезное сообщение:

    Andrew771 (31.01.2023)

  8. #27
    Veteran
    Регистрация
    29.12.2010
    Адрес
    Москва
    Сообщений
    1,858
    Спасибо Благодарностей отдано 
    131
    Спасибо Благодарностей получено 
    104
    Поблагодарили
    62 сообщений
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Цитата Сообщение от Oleg N. Cher Посмотреть сообщение
    Он мне сказал, что ему нужен чисто язык-инвалид для Спека
    Да, это так, я его писал, чтоб игры ваять на Спеке. А универсальность убивает память и быстродействие, к сожалению.

  9. #28
    Veteran Аватар для Oleg N. Cher
    Регистрация
    24.08.2007
    Адрес
    Днепропетровская обл.
    Сообщений
    1,616
    Спасибо Благодарностей отдано 
    2,199
    Спасибо Благодарностей получено 
    141
    Поблагодарили
    107 сообщений
    Mentioned
    1 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Не всегда, смотря как реализовать.

Страница 3 из 3 ПерваяПервая 123

Информация о теме

Пользователи, просматривающие эту тему

Эту тему просматривают: 1 (пользователей: 0 , гостей: 1)

Похожие темы

  1. SjASMPlus Z80 кросс ассемблер
    от Aprisobal в разделе Программирование
    Ответов: 1663
    Последнее: 19.06.2021, 01:36
  2. SNASM кросс ассемблер для 6502/Z80
    от drbars в разделе Программирование
    Ответов: 4
    Последнее: 25.04.2018, 01:16
  3. Кросс-компилятор бейсика для БК
    от litwr в разделе БК-0010/0011
    Ответов: 2
    Последнее: 30.03.2018, 18:03
  4. Кросс-ассемблеры Z80 для Pc
    от Aprisobal в разделе Программирование
    Ответов: 16
    Последнее: 15.01.2011, 22:46
  5. кросс компилятор С для Z80
    от vitasam в разделе Программирование
    Ответов: 24
    Последнее: 04.03.2007, 18:03

Ваши права

  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения
  •