Простейшая сферическая программа, три с половиной строки:
Код:
  10 CLEAR 24576  
  20 LOAD "" CODE 32768
  30 LET n=USR 32768
  40 SAVE "results" CODE 49152,n
20-й строкой загрузили кодовый блок, 30-й строкой запустили на исполнение.
После исполнения программа по RET возвращается в бейсик и в 40-й строке записывает результаты. Все.
Это все прекрасно работает в zx48, включая запись.
В zx128 это тоже работает, но только до окончания работы кодового блока, потом сброс.
Елси же zx128 запустить в режиме basic48 - то тоже все нормально.
Вопрос. Что не так с возвратом в бейсик в zx128 ? Кодовый блок что-то портит в переменных zx128 ? половинки регистров X\Y ?
Это лечится или сойдет и так?