Нашел я эту процедуру. Насколько я понимаю, она ниасилит отличить режим 48к с залоченным портом #7FFD (48 BASIC из меню) и незалоченным (после USR0).
- - - Добавлено - - -Код:HE281_0 HALT
LD BC,H0000
LD HL,H0000
LD (H5C78),HL
LD (H5C79),HL
LD E,#00
LD A,#FF
LD HL,H5C78
HE295_0 INC E
JR NZ,HE299_0
INC BC
HE299_0 CP (HL)
JR NZ,HE295_0
LD A,B
CP #07
JR NZ,HE2BB_0
LD A,C
CP #5E
JR Z,HE2D5_0
CP #63
JR Z,HE2CE_0
JR HE2BB_0
Проверил в эмуле - да, ниасиливает. Она выдает в BC:
#075E - для 48к
#0759 - для 128к/+2 c включенным ПЗУ Basic 128 (при загрузке из меню или из бейсика 128)
#0763 - для 128к/+2/+2А/+3 с включенным ПЗУ Basic 48 (после USR0 или после выбора в меню 48 BASIC), независимо от залоченности порта #7FFD.

