Board.KolibriOS.org

Official KolibriOS board
It is currently Tue May 21, 2019 11:58 pm

All times are UTC+03:00




Post new topic  Reply to topic  [ 16 posts ]  Go to page 1 2 Next
Author Message
PostPosted: Mon Feb 17, 2014 6:07 pm 
Offline

Joined: Mon Mar 27, 2006 6:33 am
Posts: 658
Немного затраченного времени и "перенёс" вариант консольного тетриса
сделанного на Форт :)

Attachment:
CTETRIS.ZIP [30.79 KiB]
Downloaded 184 times

Для запуска
1. Cкопировать "директории" из папки LIB архива в одноимённую папку LIB на /rd/1 диск
2. Скопировать файлы MeForth и INIT.F (исходник программы консольного тетриса в текстовом формате) в корень диска /rd/1
3. Запустить MeForth Форт систему (для автоматического запуска INIT.F файла)

Более удачный вариант запуска:

Подготовим файлы.

1. Переименовываем INIT.F в Tetris.F (в файле корректируем пути к LIB файлам где они будут располагаться)
2. В пустом INIT.F файле прописываем строку загрузки необходимого файла Tetris.f
(по примеру строк в тетрис файле с указанием где данный файл находится)
3. INIT.F копируем на /rd/1 диск

4. Запустить MeForth Форт систему (для автоматического запуска INIT.F файла)

В дальнейшем INIT.F файл располагаем на /rd/1 и запуск его по вызову МeForth системы.

P.S. Убрана "баго-фича", но возможно добавлены другие.
P.S. На будущее есть вариант собирать автономные, компактные Форт программы для Колибри.

P.P.S. В консольное окно Форт системы можно с помощью API функций Колибри выводить также графику и управлять системными возможностями.
(слова в Форт системе SYS1 SYS2 SYS3 SYS4 SYS5 SYSV по количеству входных параметров функции)


Last edited by Kopa on Mon Feb 01, 2016 11:02 pm, edited 10 times in total.

Top
   
PostPosted: Mon Feb 17, 2014 8:05 pm 
Offline

Joined: Tue Apr 12, 2011 11:19 pm
Posts: 1148
Скриншот в студию попрошу.

_________________
я лишь учусь


Top
   
PostPosted: Mon Feb 17, 2014 8:46 pm 
Offline

Joined: Mon Mar 27, 2006 6:33 am
Posts: 658
punk_joker wrote:
Скриншот в студию попрошу.

Пожалуйста, вполне юзабельно.
Attachment:
ctetris.png
ctetris.png [ 37.59 KiB | Viewed 3335 times ]


P.S. Управление клавишами курсора (на экране немного не так).


Last edited by Kopa on Tue Feb 18, 2014 7:37 pm, edited 6 times in total.

Top
   
PostPosted: Mon Feb 17, 2014 8:54 pm 
Offline
Designer
User avatar

Joined: Thu Jan 25, 2007 3:33 pm
Posts: 5047
Выглядит очень круто.

_________________
Через тернии к звездам


Top
   
PostPosted: Mon Feb 17, 2014 10:24 pm 
Offline

Joined: Tue Apr 12, 2011 11:19 pm
Posts: 1148
Действительно круто

_________________
я лишь учусь


Top
   
PostPosted: Tue Feb 18, 2014 7:43 pm 
Offline

Joined: Mon Mar 27, 2006 6:33 am
Posts: 658
Обновил данный тетрис - пофиксил "баго-фичу" и мелкие недочёты, но заметил (у меня) что если переместить окно программы в верхнюю часть монитора
то видны мерцания верхней части окна програмы (думал что перерисовка на обратном ходе луча поможет, но возможно что то не так надо делать или "глубже" копать)

P.S. Можно добавить запись на вику о программе на Форт языке местной разработки (базис SPF4 системы) :)
"пототанный" kpack из 130Кб -> 24 Кб.


Last edited by Kopa on Tue Feb 18, 2014 8:45 pm, edited 1 time in total.

Top
   
PostPosted: Tue Feb 18, 2014 7:57 pm 
Offline

Joined: Mon Sep 24, 2007 11:11 am
Posts: 2814
Омг, а почему не console.obj?


Top
   
PostPosted: Tue Feb 18, 2014 8:08 pm 
Offline

Joined: Mon Mar 27, 2006 6:33 am
Posts: 658
SoUrcerer wrote:
Омг, а почему не console.obj?

Функционал скрипта-программы не соответствует. но Форт можно использовать в консольных скриптах (и больше) по желанию.:)
и необходимости использования cosole.obj возможно нет необходимости, да и не знаю как загружать obj библиотеки в Форт пока.

P.S. А что с console.obj ? Сделать на Forth fconsole.obj вариант данной либы? (из листинга Форт системы, наверное возможно, если разобраться как это делается в Fasm),
но мне пока и данного варианта достаточно для "экспериментов" программирования под Колибри и реализации некоторых задумок.


Top
   
PostPosted: Mon Mar 03, 2014 12:39 am 
Offline
Mentor
User avatar

Joined: Tue Jan 15, 2008 11:27 am
Posts: 752
MEFORTH - хорошо. Но если есть исходники, то может попробовать продвинуться до KForth? ;)
Начать можно со стиля окна и его заголовка.


Top
   
PostPosted: Mon Mar 03, 2014 2:42 pm 
Offline

Joined: Mon Mar 27, 2006 6:33 am
Posts: 658
Albom wrote:
MEFORTH - хорошо. Но если есть исходники, то может попробовать продвинуться до KForth? ;)
Начать можно со стиля окна и его заголовка.

Не понятно. Сменить название на КForth? :)
MeForth никак не относится к Menuet т.к. кросс компилируется из основы SPF4 системы на Windows/Linux в образ для трансляции Fasm
из ранее опубликованных исходников на местном форуме.
(планируется и самосборка из среды Колибри и "отторжение" исполняемого кода)

P.S. Стиль окна и его заголовки можно и сейчас создавать используя вызовы системных функций в коде Форт программы. (слова SYS1 SYS2 ... по количеству входных параметров)
В окно консоли, по моему, тоже можно выводить графические примитивы.
но хочется иметь IDE с необходимым функционалом. Что тоже реально сделать. Форт хороший инструментарий для "разных" экспериментов. :D (тема 'непаханных" возможностей)
Есть и вариант почти тогоже кода интегрённого с FASM в исполняемом файле.
Перекрёстная тема на Форт форуме Консольный Тетрис для SPF4


Top
   
PostPosted: Sun Apr 20, 2014 12:31 pm 
Offline
Designer
User avatar

Joined: Thu Jan 25, 2007 3:33 pm
Posts: 5047
> 1. Cкопировать "директории" из папки LIB архива в одноимённую папку LIB на /rd/1 диск
> 2. Скопировать файлы MeForth и INIT.F (исходник программы консольного тетриса в текстовом формате) в корень диска /rd/1
> 3. Запустить MeForth Форт систему (для автоматического запуска INIT.F файла)

Да это целый квест. Игрушка понравилась, но вот пользоваться ей нормально невозможно. Если бы MeForth воспринимал параметр с путём к *.F файлу - другое дело.
Исходники Форта есть?

_________________
Через тернии к звездам


Top
   
PostPosted: Sun Apr 20, 2014 3:00 pm 
Offline

Joined: Mon Mar 27, 2006 6:33 am
Posts: 658
Leency wrote:
Да это целый квест. Игрушка понравилась, но вот пользоваться ей нормально невозможно. Если бы MeForth воспринимал параметр с путём к *.F файлу - другое дело.
Исходники Форта есть?

Всё есть и есть желание сделать сборку Форт системы в Kolibri OS и целевую компиляцию с минимальным размером кода. (или варьируемую)
Подправлю в ближайшее время игру и ещё что-нибудь на Форте добавлю (из игрового направления? и не обязательно консоль подобного) :D

P.S. Ссылка на исходники данной версии SPF4 cм. выше в перекрёстной теме на Форт форуме.
А с отрисовкой графики при перемещении окна программы к верхней части экрана монитора нет мерцания?


Top
   
PostPosted: Sun Apr 20, 2014 3:48 pm 
Offline
Designer
User avatar

Joined: Thu Jan 25, 2007 3:33 pm
Posts: 5047
Можно ссылку на рабочие исходники? Т.к. я скачал kolspforth11.rar который после компиляции не работает.

Чтоб не забыть http://fforum.winglion.ru/viewtopic.php?p=38932#p38932

_________________
Через тернии к звездам


Top
   
PostPosted: Sun Apr 20, 2014 5:19 pm 
Offline

Joined: Mon Mar 27, 2006 6:33 am
Posts: 658
Leency wrote:
Можно ссылку на рабочие исходники? Т.к. я скачал kolspforth11.rar который после компиляции не работает.

Чтоб не забыть http://fforum.winglion.ru/viewtopic.php?p=38932#p38932

Почему kolspforth11.rar? (там 12) и как не работает? (запуск кросс-сборки под win или lin) под lin не знаю (не собирал), а под win версию нужно брать не старше spf4.18 (вроде должна быть в архиве для кросс сборки для KolibriOS или на sourceforge) для получения FASM файла форт системы.

P.S. ? Посмотрю ещё раз может есть какие то ньюансы.


Top
   
PostPosted: Mon Apr 21, 2014 1:59 am 
Offline
Designer
User avatar

Joined: Thu Jan 25, 2007 3:33 pm
Posts: 5047
> kolspforth11.rar
последняя версия с оффсайта

> там 12
какая-то юзерская сборка

Ты когда-то собирал Форт и он работал в Колибри?
Если да, но скинь мне его исходники.

_________________
Через тернии к звездам


Top
   
Display posts from previous:  Sort by  
Post new topic  Reply to topic  [ 16 posts ]  Go to page 1 2 Next

All times are UTC+03:00


Who is online

Users browsing this forum: No registered users and 2 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

Search for:
Jump to:  
Powered by phpBB® Forum Software © phpBB Limited