OK, устал об этом думать, по-настоящему хороших мыслей нет. Есть только предложение сберечь один байт заменив *0 на *VAL "2^8".
Была ещё идея напустить тумана таким манером:
LET USR=CODE"[145]"*CODE"[163]":PRINT USR (PEEK USR+VAL"2^8"*PEEK (USR+SGN PI)):
но по этому коду хорошо видно, что писали его поздно вечером и без идей
Когда на твой вопрос отвечает философ, перестаешь понимать вопрос
если размер кода не критичен то можно после rem в начале программы впихнуть достаточно большой кусок который при загрузке с ленты (prog=23755) точно дойдёт до адреса 23872 (и дальше).
10 rem start1; qwertyuiop; start2
20 goto usr 23872
при загрузке с ленты начнёт выполняться start2
при загрузке с дискеты start1
как я понял introspec хочет только максимально оптимизировать бейсик программу, а не запутать взломщика
Последний раз редактировалось goodboy; 29.04.2013 в 08:54.
С любовью к вам, Yandex.Direct
Размещение рекламы на форуме способствует его дальнейшему развитию
Не, там ноль не настоящий, там 256 подразумевается.
---------- Post added at 08:23 ---------- Previous post was at 07:40 ----------
У меня всё получилось. Проверь у себя заявленную длину первой строки бейсик программы, по идее, если она неверная, работать не должно.
Эту тему просматривают: 1 (пользователей: 0 , гостей: 1)