Basic Loader Creator

[introspec]

OK, устал об этом думать, по-настоящему хороших мыслей нет. Есть только предложение сберечь один байт заменив *0 на *VAL "2^8".

Была ещё идея напустить тумана таким манером:
LET USR=CODE"[145]"*CODE"[163]":PRINT USR (PEEK USR+VAL"2^8"*PEEK (USR+SGN PI)):
но по этому коду хорошо видно, что писали его поздно вечером и без идей

[Advertiser]

[Faster]

Была ещё идея напустить тумана таким манером:
LET USR=CODE"[145]"*CODE"[163]":PRINT USR (PEEK USR+VAL"2^8"*PEEK (USR+SGN PI)):
но по этому коду хорошо видно, что писали его поздно вечером и без идей

А есть смысл пускать туман? При наличии эмуляторов подобные вещи теряют всякий смысл, впрочем эту фразу я отношу и к прочей защите. Да и есть ли смысл защищать? Кому надо те и так разберутся что и как, а кто новичок, так пусть учится, не жалко.

[introspec]

А есть смысл пускать туман?

Никакого, это просто просто спорт такой

---------- Post added at 07:22 ---------- Previous post was at 07:19 ----------

если размер кода не критичен то можно после rem в начале программы впихнуть достаточно большой кусок который при загрузке с ленты (prog=23755) точно дойдёт до адреса 23872

ВОТ, вот это уже мысль!

[goodboy]

если размер кода не критичен то можно после rem в начале программы впихнуть достаточно большой кусок который при загрузке с ленты (prog=23755) точно дойдёт до адреса 23872 (и дальше).

10 rem start1; qwertyuiop; start2
20 goto usr 23872

при загрузке с ленты начнёт выполняться start2
при загрузке с дискеты start1

как я понял introspec хочет только максимально оптимизировать бейсик программу, а не запутать взломщика

[Лас]

Есть только предложение сберечь один байт заменив *0 на *VAL "2^8".

*NOT PI

[introspec]

*NOT PI

Не, там ноль не настоящий, там 256 подразумевается.

---------- Post added at 08:23 ---------- Previous post was at 07:40 ----------

Ты имеешь ввиду сразу после кода #D? У меня так тоже не получилось. VARS по-прежнему указывает на адрес после кода. Может я что-то не так делал?

У меня всё получилось. Проверь у себя заявленную длину первой строки бейсик программы, по идее, если она неверная, работать не должно.

[Faster]

У меня всё получилось. Проверь у себя заявленную длину первой строки бейсик программы, по идее, если она неверная, работать не должно.

Спасибо, про длину забыл, теперь и у меня заработало.

[Slider]

Не, там ноль не настоящий, там 256 подразумевается.[COLOR="Silver"]

Очень вряд ли. let s=not pi присваивает s именно 0 а не 256. sgn pi - это 1