Мощная среда ZXDev для разработки НА ПЯТИ ЯЗЫКАХ для ZX готова к тестированию

[Alex Rider]

Могу поделиться Delphi-исходниками своей TapTool на Delphi.

[Advertiser]

[Oleg N. Cher]

Это, разумеется, сделано для эффективности и компактности машинного кода. Если знаете Си, то вот как именно это реализовано:

#define __hash__ #
#define __id__(x) x
#define __ld_a__(x) if(x==0) {__asm xor a,a __endasm;}else{__asm ld a,__id__(__hash__)x __endasm;}
#define __ld_c__(x) __asm ld c,__id__(__hash__)x __endasm

import void Basic_BORDER_stdcall (SHORTINT color);
#ifndef BORDER_fastcall
  #define Basic_BORDER Basic_BORDER_stdcall
#else //BORDER_fastcall
  #define Basic_BORDER(color) __ld_a__(color); \
    __asm \
    call 0x229B \
    __endasm;
#endif

import void Basic_PAPER_stdcall (SHORTINT color);
import void Basic_PAPER_fastcall (void /* Register C */);
#ifndef PAPER_fastcall
  #define Basic_PAPER Basic_PAPER_stdcall
#else //PAPER_fastcall
  #define Basic_PAPER(color) __ld_c__(color); Basic_PAPER_fastcall()
#endif

[Sergey]

Приветствую, Олег!
Интеллекта не хватает, твою систему освоить. Поэтому пока балуюсь только гольным sdcc.
Не подскажешь ли, как мне 1) crt0.rel свой сделать, 2) как на выходе бинарные файлы получать вместо ihx?

[Oleg N. Cher]

Приветствую, Олег!
Интеллекта не хватает, твою систему освоить. Поэтому пока балуюсь только гольным sdcc.
Не подскажешь ли, как мне 1) crt0.rel свой сделать, 2) как на выходе бинарные файлы получать вместо ihx?

Та ладно, Сергей, не прибедняйтесь. Не так там уж сложно всё. Впрочем, готов поотвечать на вопросы в аське, ирц, жаббере или на форуме ZX.Oberon2.Ru/Forum, милости прошу, пишите ЛС, если есть охота.

crt0.rel я никогда не делал, даже не баловался. Если честно, я даже не знаю зачем оно надо. Тут нам вместе надо обратиться к гуру SDCC.

Перегнать IHX в BIN можно несколькими способами. ZXDev использует утилиту Hex2bin, скачивается отсюда: http://sourceforge.net/projects/hex2bin. Есть планы сделать утилиту, напрямую конвертирующую IHX в TAP/TZX/TRD (с добавкой произвольного загрузчика). Первая версия уже почти-почти готова (но пока умеет только BIN в TAP, без IHX).

[Eltaron]

как мне 1) crt0.rel свой сделать, 2) как на выходе бинарные файлы получать вместо ihx?

http://zx.pk.ru/showpost.php?p=539849&postcount=36

[Oleg N. Cher]

По реквесту AlCo сделал возможность автосборки и запуска Оберон-программ для Спека нажатием F12 (можно переделать на любую другую комбинацию или отдельную клавишу). Сделано несложно, а именно: для модуля Module.odc (или Mod/Module.odc) ищется одноименный файл Obj/Module.bat, всё остальное делает уже сам батник. Проверяет существование откомпилированных модулей (при необходимости перекомпилируя их), вызывает сишный компилер, проверяет не вернул ли он ошибку; если да, то останавливается; если нет, для основного модуля вызываются Hex2bin, bin2trd, далее целевой собранный TRD-шник запускается в эмуле, связанном с расширением .trd. Запускать TRD-шник автоматически при старте умеют не все эмули. Бороться с этим планирую переходом на формат TAP.

Есть ещё варианты как сделать. Например, если одноименного батника для модуля нет, можно запускать в зависимости от выбранной команды один из батников (Bin/compile, Bin/build, Bin/run) на всю подсистему, они-то и будут знать как компилировать, собирать и запускать программы заданным компилером. Ещё вариант: ручной выбор из меню компилятора и целевой платформы, а батники будут лежать в папке bin компилятора. Эти варианты обдумываются.

[Ewgeny7]

Прошу прощения, а под х64 будет работать? Пока что посылает лесом, ругается на х64.

[Oleg N. Cher]

Под x64 не тестировалось, но по идее никаких препятствий быть не должно. А как именно ругается?

[vlad]

А как именно ругается?

Вложение 40058
Запускал и в режиме совместимости, результат тот же.

[vlad]

Удалось найти пока только это: http://zx.pk.ru/showthread.php?t=18315 (тот же) и то что во вложении.