Спасибо, вспомнил детство в обнимку с Биллом Гилбертом :)))
---------- Post added at 19:47 ---------- Previous post was at 19:46 ----------
Кстати, вчера думал об этом и побоялся - бейсик при таком раскладе ничего не затрёт случайно?
Вид для печати
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 хочет только максимально оптимизировать бейсик программу, а не запутать взломщика
Не, там ноль не настоящий, там 256 подразумевается.
---------- Post added at 08:23 ---------- Previous post was at 07:40 ----------
У меня всё получилось. Проверь у себя заявленную длину первой строки бейсик программы, по идее, если она неверная, работать не должно.