Монолоадер для чайников.

[Gutten]

скорее всего да. Что мешает проверить самому?

[ZX_NOVOSIB]

Проверить самому??
Хм.. А это идея.

[ZX_NOVOSIB]

Так лучше???

 ORG 23894

        LD   BC,#1605
        LD   DE,(23796)
        LD   HL,42000
        CALL   15635
        CALL   42000
        DI
        LD   BC,#7D05
        LD   DE,(23796)
        LD   HL,26000
        CALL   15635
        
        LD   A,19
        LD   BC,32765
        OUT  (C),A
        LD   (65532),A
        LD   A,16
        OUT  (C),A
        
        LD   A,(65532)
        CP   19
        JR   Z,ZX48

 ZX128 LD   A,19
        LD   BC,32765
        OUT  (C),A
        
        LD   BC,#1105
        LD   DE,(23796)
        LD   HL,49152
        CALL  15635
        CALL  49152

        LD   A,16
        LD   BC,32765
        OUT  (C),A
        
        LD   SP,24137
        CALL  26000
        LD   A,1
        LD   (29326),A
 RUN    JP   24158

 ZX48   LD   SP,24137
        CALL  26000
        JR RUN

Есть какие замечания?
Вроде убрал всё лишнее (DI, EI и прочее). При упаковке хрустом выставлял в параметрах блока DI. Только када картинка на экран рисуется, то я там х.з. чо происходит, поэтому на всякий случай поставил DI сразу по возврату из "картинко-показывалки". Заодно избавился от бейсика вообще, - в монолоадере было 3 строки, стала одна )))

CP и JR Z оказались отличной заменой бейсик-нагромождениям "if peek x=y then randimze usr z"

[Shiny]

        LD   A,19
        LD   BC,32765
        OUT  (C),A
        LD   (65532),A
        LD   A,16
        OUT  (C),A
        
        LD   A,(65532)
        CP   19
        JR   Z,ZX48

 ZX128 LD   A,19
        LD   BC,32765
        OUT  (C),A

лишнее телодвижение. проще включить страницу 6, потом 3

[goodboy]

при проверке режима можно сначала включить четвертую, а потом третью.

ld a,20
......
dec a ; a=19

уже экономим байт
и вместо

ld (xxxx),a
.......
ld a,(xxxx)

сделать

ld hl,xxxx
ld (hl),a
.......
ld a,(hl)

ещё экономим байт

[Gutten]

а зачем 1 загонять в 29326? Что это даёт?

[Advertiser]

[ZX_NOVOSIB]

Что мешает проверить самому?

Проверить самому??
Хм.. А это идея.

а зачем 1 загонять в 29326? Что это даёт?

Как насчёт проверить самому?
Можно же загрузить блок, распаковать его и в эмуле посмотреть что-там лежало до 1 (подскажу, там до 1 лежал 0), а потом прям во время игры по Ctrl+P (в спекуляторе так) позаносить эти значения и сразу станет ясно, зачем нужна 1 ))

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

лишнее телодвижение. проще включить страницу 6, потом 3

Это как? Это то о чём Гудбой писал или ты о чём-то другом?

[Shiny]

Это как? Это то о чём Гудбой писал или ты о чём-то другом?

ну так наверное:

        LD   A,16
        LD   BC,32765
        OUT  (C),A
        LD   (65532),A
        LD   A,19
        OUT  (C),A
        
        LD   A,(65532)
        CP   16
        JR   Z,ZX48
 ZX128

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

кстати, проверка на 128 некорректная, по адресу в страницах может находиться любое значение.

[Gutten]

Ну проверить я и сам догадался, только в той версии, что у меня есть этот кусок иначе выглядит:
LD A,(5B94)
LD (728e),A; 29326

А в 5B94 содержится не 0 или 1, а FF. Я туда загнал 1, но ничего не изменилось в игре.

[ZX_NOVOSIB]

Ну проверить я и сам догадался, только в той версии, что у меня есть

О какой версии речь?

А в 5B94 содержится не 0 или 1, а FF. Я туда загнал 1, но ничего не изменилось в игре.

Загонять надо именно в 728E (в любой версии, хоть в фирменной), а не в 5B94 (это вообще левый адрес мало относящийся к игре).