OpenSE BASIC на PentEvo

ZX evolution software and hardware

Postby breeze » 10 Jan 2012, 17:06

Как-то давным давно, один умный дядька решил избавится от коммерческого BASIC 48 и переписать его с нуля сделав под лицензией GNU.
Не буду вдаваться в более глубокие дебри, скажу лишь посмотрев сей Basic под Unreal Speccy решил прошить как Custom Rom.

Тут меня ждала первая подача. Манагер EvoReseta «Update Custom Rom» хотел видеть только файл с расширением ROM и никак не меньше длины 65535. Хорошо что не так давно savelij выложил пример custom.rom и этот вопрос решился простым склеиванием 4х копий в один файл. Прошились. Выбираем Reset=>Custom Rom. Reset и… правилно! висяк :)

Я так понимаю, что без какой-то начальной инициализации PentEvo[?], тупо запустить прошивку не получится?

Кому интересно, саму прошивку и сорцы можно скачать тут -> http://sourceforge.net/projects/sebasic ... E%20BASIC/
User avatar
breeze
 
Posts: 764
Joined: 07 Feb 2009, 17:19
Location: Оттуда
Group: Registered users

Postby DimkaM » 10 Jan 2012, 17:37

У тебя в какой по счёту банке(16к) оно лежит?
Сделай хобету с включалкой этой банки, тама кода 15байт.

И прилепи плиз свой ром(полностью) сюда.
ZX-Evo rev B, ZX-Evo rev C, ZXNetUsb rev A, ZXNetUsb rev С
http://nedoos.ru/ http://ti6.zxevo.ru/
DimkaM
 
Posts: 1387
Joined: 24 Mar 2010, 13:42
Location: джунгли Амазонки
Group: Registered users

Postby DimkaM » 10 Jan 2012, 17:55

Примерно так:

ld a,1
out (0xbf),a
ld bc,0x3ff7
ld a,OpenSE_page ^ %00111111
out (c),a
xor a
out (0xbf),a
rst 0
ZX-Evo rev B, ZX-Evo rev C, ZXNetUsb rev A, ZXNetUsb rev С
http://nedoos.ru/ http://ti6.zxevo.ru/
DimkaM
 
Posts: 1387
Joined: 24 Mar 2010, 13:42
Location: джунгли Амазонки
Group: Registered users

Postby savelij » 10 Jan 2012, 17:58

Все гораздо проще. Сброс производится в сервис пагу посему достаточно добавить там с адрес 0 сервис паги (смещение 0xc000 в custom rom) такое?

ld a,0xc9
ld (любой адрес в озу),a
ld hl,0
ld sp,любой удобный адрес в озу
push hl
jp адрес куда положили код 0xc9

и оно само улетит в басик.
savelij
 
Posts: 568
Joined: 10 Jun 2008, 17:35
Group: Registered users

Postby нолька » 10 Jan 2012, 18:10

ld hl,#ffff:ld (hl),0:jp (hl)
я проснулся среди ночи и понял, что всё...
всё идет по плану
User avatar
нолька
рОвный
 
Posts: 264
Joined: 08 Apr 2007, 21:12
Group: Registered users

Postby breeze » 10 Jan 2012, 19:02

DimkaM wrote:И прилепи плиз свой ром(полностью) сюда.


не совсем понял что ты имел ввиду под «полностью», там просто «opense.rom» повторяется 4 раза.
Attachments
test.rom.zip
(13.63 KB) Downloaded 913 times
User avatar
breeze
 
Posts: 764
Joined: 07 Feb 2009, 17:19
Location: Оттуда
Group: Registered users

Postby breeze » 10 Jan 2012, 19:08

savelij wrote:Все гораздо проще.


Честно не совсем понял. ты предлагаешь изменить первых 3 байта прошивки на JP ADDR с твоей процедурой? или что?
User avatar
breeze
 
Posts: 764
Joined: 07 Feb 2009, 17:19
Location: Оттуда
Group: Registered users

Postby нолька » 10 Jan 2012, 19:13

кастом ром состоит из 4х штук 16к, последние 16к это сервис ром в который идет сброс, там размести указанную процедуру а бейсик скопируй в первые 3 штуки
я проснулся среди ночи и понял, что всё...
всё идет по плану
User avatar
нолька
рОвный
 
Posts: 264
Joined: 08 Apr 2007, 21:12
Group: Registered users

Postby breeze » 10 Jan 2012, 19:15

DimkaM wrote:Примерно так:


короче тупо набрал сей код в аласме :) сработало

ld a,%00111111
User avatar
breeze
 
Posts: 764
Joined: 07 Feb 2009, 17:19
Location: Оттуда
Group: Registered users

Postby breeze » 10 Jan 2012, 19:16

нолька wrote:там размести указанную процедуру а бейсик скопируй в первые 3 штуки


всё понял! спасибо!
User avatar
breeze
 
Posts: 764
Joined: 07 Feb 2009, 17:19
Location: Оттуда
Group: Registered users

Next

Return to Пентева - софт и железо

Who is online

Users browsing this forum: No registered users and 1 guest