|
nedoPC.orgElectronics hobbyists community established in 2002 |
|
Author |
Message |
Lavr
Supreme God
Joined: 21 Oct 2009 08:08 Posts: 7777 Location: Россия
|
Джентльмены, а кто умеет написать редактор с разделяющимся окном, как у M$ ? Много я пользовал разных ассемблерных редакторов с подсветкой и прочими "блэкджеками", но чтобы было разделение окна - такого не встречалось... А между тем для программирования это очень удобно! У M$ даже под ДОС у Edit-a экран делился... Сегодня "пошпионил" как это сделано у Ворда: судя по ID окон, как я и предполагал, это два отдельных RichEdit-a, и "палка"-разделитель - это тоже "окно" со своим ID. Но как-то эти RichEdit-ы должны синхронизироваться, т.к. текст в них изменяется синхронно...
_________________ iLavr
|
27 Nov 2017 23:01 |
|
|
Shaos
Admin
Joined: 08 Jan 2003 23:22 Posts: 22536 Location: Silicon Valley
|
Вроде был какой-то ассемблер для 8080, где можно было просто писать A=B
|
18 Mar 2018 02:31 |
|
|
shoorick
Doomed
Joined: 05 Nov 2007 05:08 Posts: 487 Location: Украина
|
|
18 Mar 2018 07:03 |
|
|
Paguo-86PK
Maniac
Joined: 12 Apr 2011 20:43 Posts: 267 Location: Tashkent
|
Этo наверное аналог Sphinx C-- типа был? Но я говорю о мнемониках, а не о языке. Т.е. если мнемоники переименовать и дополнить арифметическими знаками, то можно из них выстраивать мнемо-формулы (а не математические формулы переводить в код). Вот, моя первая попытка: Выглядит ужасно , но гораздо компактнее ассемблера. Здесь требуется основательнее продумать синтаксис P.S.: Попробовал дизассемблером заняться… "«МОНИТОР»"
|
19 Mar 2018 02:12 |
|
|
shoorick
Doomed
Joined: 05 Nov 2007 05:08 Posts: 487 Location: Украина
|
fasmg довольно мощьнъ: на нем вполне можно значительно повысить уровень, хотя вряд ли будет легко реализовать синтаксис подобный С или Васику, но существенный комфорт можно достичь. Был еще язык такой: PL/M-80 - я на нем не писал, но попадалась мне книжка о нем, листал с удовольствием. Сложилось у меня впечатление, что сквозь процедурный внешний вид просматривается нечто вроде высокоуровневого ассемблера fasmg - реализация некоторых 16/32-битных команд для 8080: "extra85.inc" | | | | Code: ;======================================================================= ; extra commands for 8080/8085 as existing commands combinations ;======================================================================= include "warn.inc" ;----------------------------------------------------------------------- ;element register ;element B? : register + 0000h ;element C? : register + 0FF1h ;element D? : register + 0112h ;element E? : register + 0FF3h ;element H? : register + 0224h ;element L? : register + 0FF5h ;element M? : register + 0FF6h ;element A? : register + 0FF7h ;element SP? : register + 0F3Fh ;element PSW? : register + 03FFh ;; ||| ;; ||\- any 8-bit register operation ;; |\-- any 16-bit operation, except push&pop ;; \--- push&pop operations ;----------------------------------------------------------------------- macro MOVX? r1,r2 ; r1h:r1l <- r2h:r2l reg16 dest,r1 reg16 src,r2 if dest = 3 | src = 3 err "Bad register pair" else db 040h or dest shl 4 or src shl 1 db 040h or dest shl 4 or src shl 1 or 9 end if end macro ;----------------------------------------------------------------------- macro ADDX? r1,r2 ; r1h:r1l = r1h:r1l + r2h:r2l reg16 dest,r1 reg16 src,r2 if dest = 3 | src = 3 err "Bad register pair" else if dest = 2 warn 'Usage of ADDX H,X (DAD possible)' end if db 040h or 7 shl 3 or dest shl 1 or 1 ; mov a,r1l db 080h or src shl 1 or 1 ; add r2l db 040h or dest shl 4 or 8 or 7 ; mov r1l,a db 040h or 7 shl 3 or dest shl 1 ; mov a,r1h db 088h or src shl 1 ; adc r2h db 040h or dest shl 4 or 7 ; mov r1h,a end if end macro ;----------------------------------------------------------------------- macro ADCX? r1,r2 ; r1h:r1l = r1h:r1l + r2h:r2l reg16 dest,r1 reg16 src,r2 if dest = 3 | src = 3 err "Bad register pair" else db 040h or 7 shl 3 or dest shl 1 or 1 ; mov a,r1l db 088h or src shl 1 or 1 ; adc r2l db 040h or dest shl 4 or 8 or 7 ; mov r1l,a db 040h or 7 shl 3 or dest shl 1 ; mov a,r1h db 088h or src shl 1 ; adc r2h db 040h or dest shl 4 or 7 ; mov r1h,a end if end macro ;----------------------------------------------------------------------- macro SUBX? r1,r2 ; r1h:r1l = r1h:r1l - r2h:r2l reg16 dest,r1 reg16 src,r2 if dest = 3 | src = 3 err "Bad register pair" else db 040h or 7 shl 3 or dest shl 1 or 1 ; mov a,r1l db 090h or src shl 1 or 1 ; sub r2l db 040h or dest shl 4 or 8 or 7 ; mov r1l,a db 040h or 7 shl 3 or dest shl 1 ; mov a,r1h db 098h or src shl 1 ; sbb r2h db 040h or dest shl 4 or 7 ; mov r1h,a end if end macro ;----------------------------------------------------------------------- macro SBBX? r1,r2 ; r1h:r1l = r1h:r1l - r2h:r2l reg16 dest,r1 reg16 src,r2 if dest = 3 | src = 3 err "Bad register pair" else db 040h or 7 shl 3 or dest shl 1 or 1 ; mov a,r1l db 098h or src shl 1 or 1 ; sbb r2l db 040h or dest shl 4 or 8 or 7 ; mov r1l,a db 040h or 7 shl 3 or dest shl 1 ; mov a,r1h db 098h or src shl 1 ; sbb r2h db 040h or dest shl 4 or 7 ; mov r1h,a end if end macro ;----------------------------------------------------------------------- macro RALX? r1 reg16 dest,r1 if dest = 3 err "Bad register pair" else if dest = 2 warn "Usage of RALX H (DAD possible)" end if db 040h or 7 shl 3 or dest shl 1 or 1 ; mov a,r1l db 017h ; ral db 040h or dest shl 4 or 8 or 7 ; mov r1l,a db 040h or 7 shl 3 or dest shl 1 ; mov a,r1h db 017h ; ral db 040h or dest shl 4 or 7 ; mov r1h,a end if end macro ;----------------------------------------------------------------------- macro RARX? r1 reg16 dest,r1 if dest = 3 err "Bad register pair" else db 040h or 7 shl 3 or dest shl 1 ; mov a,r1h db 01Fh ; rar db 040h or dest shl 4 or 7 ; mov r1h,a db 040h or 7 shl 3 or dest shl 1 or 1 ; mov a,r1l db 01Fh ; rar db 040h or dest shl 4 or 8 or 7 ; mov r1l,a end if end macro ;----------------------------------------------------------------------- ; ;----------------------------------------------------------------------- macro PUSHX? push b push d push h end macro ;----------------------------------------------------------------------- macro POPX? pop h pop d pop b end macro ;----------------------------------------------------------------------- macro PUSHA? push psw pushx end macro ;----------------------------------------------------------------------- macro POPA? popx pop psw end macro ;----------------------------------------------------------------------- ; ;----------------------------------------------------------------------- macro SHLD32? addr ; DEHL -> addr shld addr xchg shld addr+2 xchg end macro macro LHLD32? addr ; DEHL <- addr lhld addr+2 xchg lhld addr end macro ;----------------------------------------------------------------------- macro LXI32? data ; DEHL = data lxi h,data and 65535 lxi d,data shr 16 end macro ;----------------------------------------------------------------------- | | | | |
немного не по теме, но можно, например, взять реализацию команд Z80 для fasmg и, подкорректировав специфичные команды, сделать кроссассемблер с Z80 на 8080 ну и т.д. - полет фантазии ограничен наличием времени и желания
|
20 Mar 2018 00:56 |
|
|
Lavr
Supreme God
Joined: 21 Oct 2009 08:08 Posts: 7777 Location: Россия
|
shoorick, а где-то на форуме ты давненько давал свою ссылку на свой пакет WinAsm Studio, настроенный на работу с кодом 8080 и под "Специалист". Я твой пакет тогда скачивал, но под Вынь 98 что-то не пошло, а сейчас что-то ссылку не нахожу... Напомни еще раз, пожалуйста?
_________________ iLavr
|
10 Jan 2021 13:51 |
|
|
shoorick
Doomed
Joined: 05 Nov 2007 05:08 Posts: 487 Location: Украина
|
А нэту! Сайт WinAsm уже больше года как почил... А у меня на сайте старая версия, еще с фасмом. Я чё-нить слеплю и перезалью (в теч недели). Кое-что тут есть.
|
10 Jan 2021 22:57 |
|
|
Lavr
Supreme God
Joined: 21 Oct 2009 08:08 Posts: 7777 Location: Россия
|
Спасибо, shoorick! Если не трудно - перезалей сюда архивом. Не хотел тебя беспокоить, ибо помнил, что оно было - но весь форум перерыл и не нашел...
_________________ iLavr
|
10 Jan 2021 23:58 |
|
|
Lavr
Supreme God
Joined: 21 Oct 2009 08:08 Posts: 7777 Location: Россия
|
Скачал твою старую версию с сайта, но что-то я затупил... Вот то, что ты показал на скриншоте - у меня никак не получается, хотя вроде всё, что мог - потыкал... Я имею в виду - split активного окна попалам: как это делается? И если тебя не затруднит - положи в архиве Хелп к WinAsm: я пытался скачать, но что-то и официальная ссылка протухла... https://winasm-studio.software.informer.com/download/
_________________ iLavr
|
11 Jan 2021 02:13 |
|
|
Lavr
Supreme God
Joined: 21 Oct 2009 08:08 Posts: 7777 Location: Россия
|
И ты ведь прав! Это, действительно ОНО! А я по всяким меню тычу... Как тут говаривали в былые времена: два чая - этому господину! И тут вот еще вопрос назрел: пока суть да дело, я еще нашарил в сети архив WinAsm, чтобы Хелп почитать... А Хелп у меня почему-то вот так виден: То есть, кроме меню никакого Хелпа практически нет... Я потыкал другие файлы *.CHM-Help, вроде всё нормально... Здесь вот оный Хелп в архиве, посмотрите, пожалуйста, он виден в принципе-то?
_________________ iLavr
|
11 Jan 2021 04:46 |
|
|
Icer
Senior
Joined: 21 Aug 2018 07:39 Posts: 164 Location: Кемеровская обл.
|
Правой кнопкой мыши на файле->свойства и разблокировать если вытащить из архива, то не нужно
|
11 Jan 2021 04:51 |
|
|
Lavr
Supreme God
Joined: 21 Oct 2009 08:08 Posts: 7777 Location: Россия
|
Точно! Да... к прибамбасам Венды_7 я никак не привыкну... А ведь тоооолько хотел сказать: А вот под 98-й Вендой всёёёё видно!
_________________ iLavr
|
11 Jan 2021 05:11 |
|
|
Lavr
Supreme God
Joined: 21 Oct 2009 08:08 Posts: 7777 Location: Россия
|
Если вдруг есть русский Хелп - приложи его, а? Хотя, вроде везде пишут, что нет русского Хелпа... Но вдруг...
_________________ iLavr
|
11 Jan 2021 07:00 |
|
|
shoorick
Doomed
Joined: 05 Nov 2007 05:08 Posts: 487 Location: Украина
|
у меня стоит и налажено, хотя и под линуксом, но просто запаковать не фен-шуй, надо вычищать, и хелпы искать, т.к. я ими не пользуюсь. что-то переводил...
|
11 Jan 2021 07:33 |
|
|
Lavr
Supreme God
Joined: 21 Oct 2009 08:08 Posts: 7777 Location: Россия
|
Ну я не тороплюсь... пока WinAsm поосваиваю - в общем - то, что хотелось, но настроек у него дофига!
_________________ iLavr
|
11 Jan 2021 07:51 |
|
|
Who is online |
Users browsing this forum: No registered users and 34 guests |
|
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot post attachments in this forum
|
|